digitalobjects: digitalobject_reader.php annotate

author	Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de>
date	Tue, 02 Jun 2015 08:57:48 +0200
parents
children

rev	line source
0 6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	1 <?php
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	2
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	3 /* function reads the metadata from index meta and gives it back to the
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	4 * template.
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	5 */
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	6
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	7 #http://localhost:18080/ECHOdocuView/getDocinfo?mode=imagepath&url=http://md.mpiwg-berlin.mpg.de/indexMeta/MPIWG:WEBVEZ22
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	8 function digitalobject_getMetadata($objid){
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	9
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	10 $base = variable_get('digitalobjects_docuviewer_path');
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	11 #$path="http://localhost:18080/ECHOdocuView/getDocinfoJSON?mode=texttool&url=http://md.mpiwg-berlin.mpg.de/indexMeta/" . $objid;
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	12 $path = $base . "/getDocinfoJSON?mode=texttool&url=http://md.mpiwg-berlin.mpg.de/indexMeta/" . $objid;
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	13 $request = drupal_http_request($path);
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	14 #TODO give out a status message reports if servers is not available
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	15
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	16 if (isset($request->data)){
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	17 return drupal_json_decode($request->data);
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	18 }
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	19 else {
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	20 return null;
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	21 }
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	22
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	23 }
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	24
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	25 function digitalobjects_getBibFormattedMetaData($bibdata){
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	26 $bd = drupal_json_encode($bibdata);
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	27
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	28 $base = variable_get('digitalobjects_bibdata_path');
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	29 #$path="http://localhost:18080/metadata/getBibFormattedMetaDataJSON";
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	30 $path = $base ."/getBibFormattedMetaDataJSON";
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	31 $options = array(
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	32
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	33 'method' => 'POST',
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	34 'data' => 'bibdata=' . $bd
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	35 );
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	36 $request = drupal_http_request($path, $options);
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	37 return drupal_json_decode($request->data);
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	38
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	39 }
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	40
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	41
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	42 function digitalobjects_getBibFormattedDC($bibdata){
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	43 $bd = drupal_json_encode($bibdata);
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	44
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	45 $base = variable_get('digitalobjects_bibdata_path');
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	46 #$path="http://localhost:18080/metadata/getDCMappedDataJSON";
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	47 $path = $base ."/getDCMappedData";
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	48 $options = array(
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	49
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	50 'method' => 'POST',
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	51 'data' => 'bibdata=' . $bd
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	52 );
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	53 $request = drupal_http_request($path, $options);
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	54 #return drupal_json_decode($request->data);
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	55
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	56 return drupal_json_decode($request->data);
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	57
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	58 }
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	59
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	60
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	61 function digitalobjects_getBibFormattedLabel($bibdata){
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	62 $bd = drupal_json_encode($bibdata);
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	63
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	64 $base = variable_get('digitalobjects_bibdata_path');
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	65 #$path="http://localhost:18080/metadata/getBibFormattedMetaDataJSON";
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	66 $path = $base ."/getBibFormattedLabelJSON";
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	67 $options = array(
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	68
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	69 'method' => 'POST',
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	70 'data' => 'bibdata=' . $bd
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	71 );
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	72 $request = drupal_http_request($path, $options);
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	73 return drupal_json_decode($request->data);
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	74
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	75 }
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	76
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	77
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	78
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	79 function digitalobjects_getBibMappedData($bibdata){
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	80 $bd = drupal_json_encode($bibdata);
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	81
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	82 $base = variable_get('digitalobjects_bibdata_path');
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	83 #$path="http://localhost:18080/metadata/getBibFormattedMetaDataJSON";
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	84 $path = $base ."/getBibMappedDataJSON";
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	85
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	86 $options = array(
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	87
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	88 'method' => 'POST',
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	89 'data' => 'bibdata=' . $bd
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	90 );
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	91 $request = drupal_http_request($path, $options);
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	92 return drupal_json_decode($request->data);
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	93
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	94 }
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	95 #here.metadata.getBibFormattedMetaData(bibdata=docinfo.get('bib', None))
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	96
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	97
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	98
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	99 function digitalobjects_readMetadata($objid_full,$format="long"){
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	100
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	101 //objid_full can have the structure ID/Pagenumber
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	102
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	103
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	104 $objid_parts = explode("/",$objid_full);
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	105
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	106 $objid=$objid_parts[0];
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	107
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	108
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	109 if (isset($objid_parts[1])){
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	110 $pn=$objid_parts[1];
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	111 $pn_set=true;
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	112 } else {
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	113 $pn="1";
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	114 $pn_set=false;
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	115 }
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	116
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	117
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	118
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	119 $md = digitalobject_getMetadata($objid);
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	120
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	121 switch($format){
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	122 case "long":
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	123 $bib = isset($md['bib']) ?digitalobjects_getBibFormattedMetaData($md['bib']): null;
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	124 break;
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	125
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	126 case "short":
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	127 $bib = isset($md['bib']) ?digitalobjects_getBibFormattedLabel($md['bib']): null;
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	128
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	129 break;
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	130
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	131 case "DC":
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	132 $bibArray = isset($md['bib']) ?digitalobjects_getBibFormattedDC($md['bib']): null;
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	133
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	134
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	135
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	136 if (count($bibArray) == 0) {
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	137 $bibArray = array (
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	138 "creator" => $md['creator'],
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	139 "title" => $md['title'],
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	140 "date" => $md['date']
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	141 );
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	142 }
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	143
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	144
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	145 $bib = '<metadata xmlns:DC="http://purl.org/dc/terms/" xlink:href="http://md.mpiwg-berlin.mpg.de/purls/indexMeta/'. $objid . '">';
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	146
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	147 foreach ($bibArray as $key => $value){
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	148 $bib = $bib . "<DC:" . $key .">" . $value . "</DC:" . $key . ">";
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	149 }
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	150 $bib = $bib . '</metadata>';
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	151
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	152
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	153
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	154
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	155 } // close switch
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	156
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	157
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	158 if ($bib == null) {
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	159 $bibdata = array (
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	160 "Author" => $md['creator'],
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	161 "Title" => $md['title'],
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	162 "Date" => $md['date']
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	163 );
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	164 $bib="";
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	165 /*foreach ($bibdata as $key => $content){
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	166 $bib = $bib . '<tr><td class="type">' . $key . '</td>
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	167 <td class="content">' . $content . '</td></tr>';
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	168 }
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	169 */
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	170 foreach ($bibdata as $key => $content){
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	171 $bib = $bib . '<span class="type">' . $key . ':</span>
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	172 <span class="content">' . $content . ' </span>';
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	173 }
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	174 }
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	175
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	176
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	177
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	178 $access_type = isset($md['accessType']) ? $md['accessType'] : 'mpiwg';
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	179
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	180 if ($pn_set){
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	181 $titlepage=$pn; // im parameter war die Seitenzahl gesetzt.
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	182 } else
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	183 {
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	184 $titlepage = isset($md['titlePage']) ? $md['titlePage'] : 1;
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	185 }
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	186
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	187
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	188 $data = array(
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	189 "thumburl" => create_thumburl_from_dri($objid,$titlepage=$titlepage),
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	190 "viewerurl" => create_url_from_dri($objid,$access_type = $access_type,$titlepage=$titlepage),
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	191 "md" => $md,
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	192 "bibdata" => $bib,
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	193 "access_type" => $access_type,
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	194 );
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	195
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	196
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	197 return $data;
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	198 }
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	199
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	200
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	201 function create_library_path($id){
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	202 return "http://141.14.236.36/fmi/xsl/katalog/browserecord.xsl?-db=katalog&-lay=fullrecord&-encoding=UTF-8&-grammar=fmresultset&-max=1&Biblio::ID=" . $id . "&-find=";
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	203 }
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	204
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	205 function create_url_from_dri($dri,$access_type = "closed",$pn="1"){
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	206
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	207 if ($access_type=="free"){
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	208 return "http://echo.mpiwg-berlin.mpg.de/".$dri . "?pn=" . $pn;
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	209 }
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	210 else
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	211 return "http://libcoll.mpiwg-berlin.mpg.de/".$dri . "?pn=" . $pn;
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	212 }
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	213
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	214 function create_thumburl_from_dri($dri,$titlepage=1){
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	215 return "http://md.mpiwg-berlin.mpg.de/purls/image/".$dri."?pn=" . $titlepage;
6f6e07baad80 initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	216 }

0

6f6e07baad80 initial