From a88fee9fa9b1ae78cb371872b3e720e08a1ce4b9 Mon Sep 17 00:00:00 2001
From: Jason MacWilliams <jason@discoverygarden.ca>
Date: Fri, 11 May 2012 16:36:56 -0300
Subject: [PATCH] added core object details code

---
 ObjectDetails.inc | 151 ++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 151 insertions(+)
 create mode 100644 ObjectDetails.inc

diff --git a/ObjectDetails.inc b/ObjectDetails.inc
new file mode 100644
index 00000000..76b11590
--- /dev/null
+++ b/ObjectDetails.inc
@@ -0,0 +1,151 @@
+<?php
+
+function fedora_repository_islandora_object_details_display() {
+  $profiles = array(
+    'hidden' => array(
+      "name" => "Hidden",
+      "module" => "fedora_repository",
+      "file" => "ObjectDetails.inc",
+      "function" => "fedora_repository_object_details_hidden",
+      "description" => t("No object details page"),
+    ),
+    'xslt' => array(
+      "name" => "XSLT",
+      "module" => "fedora_repository",
+      "file" => "ObjectDetails.inc",
+      "function" => "fedora_repository_object_details_xslt",
+      "description" => t("Show a datastream with an XSLT"),
+      "config" => "admin/settings/fedora_repository/object_details_xslt",
+    ),
+    'table' => array(
+      "name" => "Table",
+      "module" => "fedora_repository",
+      "file" => "ObjectDetails.inc",
+      "function" => "fedora_repository_object_details_table",
+      "description" => t("Show a datastream with a table"),
+    )
+  );
+  return $profiles;
+}
+
+function fedora_repository_object_details_hidden($item) {
+  // do nothing
+  return "";
+}
+
+function fedora_repository_object_details_XSLT($item) {
+  global $base_url;
+  $path = drupal_get_path('module', 'fedora_repository');
+  module_load_include('inc', 'fedora_repository', 'ConnectionHelper');
+
+  $dsid = variable_get('islandora_object_details_xslt_datastream', 'DC');
+  // special case for DC+QDC
+  if ($dsid == 'DC' || $dsid == 'QDC') {
+    $dsid = array_key_exists('QDC', $item->get_datastreams_list_as_array()) ? 'QDC' : 'DC';
+  }
+  $xmlstr = $item->get_datastream_dissemination($dsid);
+
+  if (empty($xmlstr)) {
+    return '';
+  }
+
+  try {
+    $proc = new XsltProcessor();
+  } catch (Exception $e) {
+    drupal_set_message($e->getMessage(), 'error');
+    return;
+  }
+
+  $proc->setParameter('', 'baseUrl', $base_url);
+  $proc->setParameter('', 'path', $base_url . '/' . $path);
+  $input = NULL;
+  $xsl = new DomDocument();
+  try {
+    $xsl->load('./'. $path .'/'. variable_get('islandora_object_details_xslt_sheet', 'xsl/convertQDC.xsl'));
+    $input = new DomDocument();
+    $input->loadXML(trim($xmlstr));
+  } catch (Exception $e) {
+    watchdog('fedora_repository', "Problem loading XSL file: @e", array('@e' => $e->getMessage()), NULL, WATCHDOG_ERROR);
+  }
+  $xsl = $proc->importStylesheet($xsl);
+  $newdom = $proc->transformToDoc($input);
+  $output = $newdom->saveHTML();
+  return $output;
+}
+
+function fedora_repository_object_details_table($item) {
+  global $base_url;
+  $path = drupal_get_path('module', 'fedora_repository');
+  module_load_include('inc', 'fedora_repository', 'ConnectionHelper');
+
+  $dsid = array_key_exists('QDC', $item->get_datastreams_list_as_array()) ? 'QDC' : 'DC';
+  $xmlstr = $item->get_datastream_dissemination($dsid);
+
+  if (empty($xmlstr)) {
+    return '';
+  }
+
+  $simplexml = new SimpleXMLElement($xmlstr);
+
+  $headers = array(
+    array(
+      'data' => t('Metadata'),
+      'colspan' => 2,
+    ),
+  );
+  $rows = array();
+  foreach ($simplexml->getNamespaces(TRUE) as $ns) {
+    foreach ($simplexml->children($ns) as $child) {
+      $rows[] = array(
+        array(
+          'data' => $child->getName(),
+          'class' => 'dc-tag-name',
+        ),
+        array(
+          'data' => (string)$child,
+          'class' => 'dc-content',
+        ),
+      );
+    }
+  }
+
+  return theme('table', $headers, $rows, array('class' => 'dc-table'));
+}
+
+// configuration pages
+function fedora_repository_object_details_XSLT_config() {
+  $form = array();
+  $form['config'] = array(
+    '#type' => 'fieldset',
+    '#title' => t("XSLT Options"),
+  );
+
+  $form['config']['warning'] = array(
+    '#value' => 'Note: the elements here do not currently work',
+    '#weight' => 0,
+  );
+  $form['config']['xslt'] = array(
+    '#type' => 'textfield',
+    '#title' => t("XSL transform to use"),
+    '#default_value' => variable_get('islandora_object_details_xslt_sheet', 'xsl/convertQDC.xsl'),
+    '#required' => TRUE,
+  );
+  $form['config']['dsid'] = array(
+    '#type' => 'textfield',
+    '#title' => t("Datastream to transform"),
+    '#default_value' => variable_get('islandora_object_details_xslt_datastream', 'DC'),
+    '#required' => TRUE,
+  );
+  $form['submit'] = array(
+    '#type' => 'submit',
+    '#value' => t("Submit"),
+    '#weight' => 1,
+  );
+
+  return $form;
+}
+
+function fedora_repository_object_details_XSLT_config_submit($form, &$form_state) {
+  variable_set('islandora_object_details_xslt_sheet', $form_state['values']['xslt']);
+  variable_set('islandora_object_details_xslt_datastream', $form_state['values']['dsid']);
+}