EDIT

<?php

/**

 * @file

 * Description theming functions.

 *

 * @copyright

 *   (C) 2007-2012 EDIT

 *   European Distributed Institute of Taxonomy

 *   http://www.e-taxonomy.eu

 *

 *   The contents of this module are subject to the Mozilla

 *   Public License Version 1.1.

 * @see http://www.mozilla.org/MPL/MPL-1.1.html

 */

/**

 *

 * It is highly qeutionalbe if this function should be completely removed.

 * If a feature needs a different representation this should be edited directly

 * in the cdm data but it shoud not be tweeked like this in the portal.

 *

 * Used in:

 *  - theme_cdm_feature_nodesTOC()

 *  - theme_cdm_feature_nodes()

 *  - theme_cdm_media_mime_application()

 *  - theme_cdm_media_mime_text()

 *

 * TODO delete this function? (a.kohlbecker feb 2013)

 *

function theme_cdm_feature_name($variables) {

  $feature_name = $variables['feature_name'];

/**

 * of a specific feature. The structure is defined by specific FeatureTree.

 * The chosen FeatureTree is merged with the list of description elements prior to using this method.

 * The merged nodes can be obtained by making use of the

 * function cdm_ws_descriptions_by_featuretree().

 *

 *

 *

 * @return array

 * @ingroup compose

  RenderHints::pushToRenderStack('feature_nodes');

        has_feature_node_description_elements($node)) && $node->feature->uuid != UUID_IMAGE) { // skip empty or supressed features

       * Content/DISTRIBUTION.

       */

        $block = compose_feature_block_distribution($taxon, $node->descriptionElements, $node->feature);

      /*

       * Content/COMMON_NAME.

       */

      }

      else if ($node->feature->uuid == UUID_USE_RECORD) {

        $block_uses_content_html = theme('cdm_block_Uses', array('taxonUuid' => $taxon->uuid));

        $block->content[] = markup_to_render_array($block_uses_content_html);

        $block_content_is_empty = FALSE;

      /*

       * Content/ALL OTHER FEATURES.

       */

      else {

        $media_list = array();

        $out_child_elements = '';

          $taxon_uuid = NULL;

          if(isset($taxon) ) {

            $taxon_uuid = $taxon->uuid;

          $block_content_is_empty = empty($elements_render_array);

          $block->content[] = $elements_render_array;

          // subordinate features are printed inline in one floating text,

          if (isset($node->childNodes[0])) {

          // TODO support more than one level of children.

          $text = '';

          foreach ($node->childNodes as $child) {

            if (isset($child->descriptionElements) && is_array($child->descriptionElements)) {

              foreach ($child->descriptionElements as $element) {

                  $media_list = array_merge($media_list, $element->media);

                switch ($element->class) {

                  case 'TextData':

                      $out_child_elements = str_replace("\n", "<br/>", $element->multilanguageText_L10n->text);

                    }

                    break;

                  case 'CategoricalData':

                    $out_child_elements  = '<em>' . $child->feature->representation_L10n . '</em> '

                      . theme('cdm_descriptionElement_CategoricalData', array('element' => $element));

                    break;

                  case 'QuantitativeData':

                    $out_child_elements = '<em>' . $child->feature->representation_L10n . '</em> '

                      . theme('cdm_descriptionElement_QuantitativeData', array('element' => $element));

                }

              $out_child_elements = '';

          }

        $block->content[] = compose_feature_media_gallery($node, $media_list, $gallery_settings);

         * Footnotes for the feature block

         */

        $block->content[] = markup_to_render_array(theme('cdm_footnotes', array('footnoteListKey' => $node->feature->uuid)));

        $block->content[] = markup_to_render_array(theme('cdm_annotation_footnotes', array('footnoteListKey' => $node->feature->uuid)));

  } // END: creating a block per feature

  drupal_alter('cdm_feature_node_blocks', $block_list, $taxon);

   * @param $node

   * @param $media_list

   * @param $gallery_settings

   * @return array

   */

  function compose_feature_media_gallery($node, $media_list, $gallery_settings) {

      $media_list = array_merge($media_list, cdm_dataportal_media_from_descriptionElements($node->descriptionElements));

    }

    if (isset($media_list[0]) && isset($gallery_settings['cdm_dataportal_media_maxextend']) && isset($gallery_settings['cdm_dataportal_media_cols'])) {

        'mediaList' => $media_list,

        'galleryName' => CDM_DATAPORTAL_DESCRIPTION_GALLERY_NAME . '_' . $node->feature->uuid,

        'maxExtend' => $gallery_settings['cdm_dataportal_media_maxextend'],

        'cols' => $gallery_settings['cdm_dataportal_media_cols'],

        'captionElements' => $captionElements,

      ));

    return markup_to_render_array('');

  /**

   * @param $taxon

   * @param $descriptionElements

   *   an associative array with two elements:

   *   - '#type': must be 'DTO'

   *   - 'DistributionInfoDTO': a CDM DistributionInfoDTO object as returned by the DistributionInfo web service

   * @param $feature

   *

   * @ingroup compose

   */

  function compose_feature_block_distribution($taxon, $descriptionElements, $feature) {

    $text_data_glue = '';

    $text_data_sortOutArray = FALSE;

    $text_data_enclosingTag = 'ul';

    $text_data_out_array = array();

    $distributionElements = NULL;

    $distribution_info_dto = NULL;

    $distribution_sortOutArray = FALSE;

    if (variable_get('distribution_sort', 'NO_SORT') != 'NO_SORT') {

      $distribution_glue = '';

      $distribution_enclosingTag = 'dl';

    } else {

      $distribution_glue = '';

      $distribution_enclosingTag = 'ul';

    }

    if (!isset($descriptionElements['#type']) || !$descriptionElements['#type'] == 'DTO') {

      // skip the DISTRIBUTION section if there is no DTO type element

      return array(); // FIXME is it ok to return an empty array?

    }

      cdm_term_representation($feature, 'Unnamed Feature'),

      $feature

    );

      // --- TextData

      foreach ($descriptionElements['TextData'] as $text_data_element) {

        $asListElement = FALSE;

        $repr = drupal_render($text_data_render_array);

          // any content can be prefixed with some foot-note anchors?

          $text_data_glue = '<br/> ';

          $text_data_enclosingTag = 'p';

        }

      }

    }

    if ($text_data_out_array && variable_get(DISTRIBUTION_TEXTDATA_DISPLAY_ON_TOP, 0)) {

        $feature,

        $text_data_glue,

        $text_data_sortOutArray,

        $text_data_enclosingTag

      );

    // --- Distribution map

    $distribution_map_query_parameters = NULL;

    if (isset($descriptionElements['DistributionInfoDTO'])) {

      $distribution_map_query_parameters = $descriptionElements['DistributionInfoDTO']->mapUriParams;

    }

    $map_render_element = compose_distribution_map($taxon, $distribution_map_query_parameters);

    // --- tree or list

    $dto_out_array = array();

    if (isset($descriptionElements['DistributionInfoDTO'])) {

      $distribution_info_dto = $descriptionElements['DistributionInfoDTO'];

      // --- tree

      if (is_object($distribution_info_dto->tree)) {

        $dto_out_array[] = theme('cdm_description_ordered_distributions', array('distribution_tree' => $distribution_info_dto->tree));

      }

      // --- sorted element list

      if (is_array($distribution_info_dto->elements) && count($distribution_info_dto->elements) > 0) {

        foreach ($distribution_info_dto->elements as $descriptionElement) {

          if (is_object($descriptionElement->area)) {

            $sortKey = $descriptionElement->area->representation_L10n;

            $distributionElements[$sortKey] = $descriptionElement;

          }

        }

        ksort($distributionElements);

        $dto_out_array[] = drupal_render($distribution_element_render_array);

      }

      //

        $feature,

        $distribution_glue,

        $distribution_sortOutArray,

        $distribution_enclosingTag

      );

    // --- TextData at the bottom

    if ($text_data_out_array && !variable_get(DISTRIBUTION_TEXTDATA_DISPLAY_ON_TOP, 0)) {

        $feature,

        $text_data_glue,

        $text_data_sortOutArray,

        $text_data_enclosingTag

      );

    $block->content[] = markup_to_render_array(theme('cdm_annotation_footnotes', array('footnoteListKey' => UUID_DISTRIBUTION)));

    return $block;

  }

  /**

 * @see http://drupal.org/node/1354

 */

function theme_FeatureTree_hierarchy($variables) {

  $FeatureTreeUuid = $variables['FeatureTreeUuid'];

  if (!is_uuid($FeatureTreeUuid)) {

    return;

  }

  $out = '';

  $featureTree = cdm_ws_get(CDM_WS_FEATURETREE, array(

    $FeatureTreeUuid,

  ));

  if (isset($featureTree) && isset($featureTree->root)) {

    $out = '<ul class="' . $featureTree->class . '">';

    $out .= theme('FeatureTree_hierarchy_children', array('node' => $featureTree->root));

    $out .= '</ul>';

  }

  return $out;

}

/**

 * @todo Please document this function.

 * @see http://drupal.org/node/1354

 */

function theme_FeatureTree_hierarchy_children($variables) {

  $node = $variables['node'];

  $out = '';

      }

      $out .= '</li>';

    }

  }

  return $out;

}

/**

 * @param  feature:

 *  The feature to which the elements given in $elements are belonging to.

 * @param  glue:

 *  Defaults to empty string.

 * @param $sort

 *   Boolean Whether to sort the $elements alphabetically, default is FALSE

 * @param  $enclosing_tag

    $enclosing_tag = $feature_block_settings['as_list'];

  }

    sort($elements);

  //     this will become possible once all $elemets are real Drupal render arrays

/**

 *

 * @param array $variables

 *   An associative array containing:

 *  - element: the CategoricalData element

 * @return a html representation of the given CategoricalData element

 *

 * @ingroup themeable

  $element = $variables['element'];

    foreach ($element->stateData as $stateData) {

  }

  $footnote_key_list_str = cdm_create_description_element_footnotes($element);

 * Theme function to render CDM DescriptionElements of the type QuantitativeData.

 *

 * @param array $variables

 *   An associative array containing:

 *  - element: the QuantitativeData element

 * @return a html representation of the given QuantitativeData element

 *

 * @ingroup themeable

 */

  /*

   * - statisticalValues

   *   - value

   *   - modifiers

   *   - type

   * - unit->representation_L10n

   * - modifyingText

   * - modifiers

   * - sources

   */

  $element = $variables['element'];

  $out = '';

  $type_representation = NULL;

  $modifiers_strings = array();

  if (isset($element->statisticalValues)) {

    $value_array = array();

    foreach ($element->statisticalValues as $val) {

      if (isset($val->value)) {

        $value_array[] = $val->value;

      }

    }

    $out .= implode($value_array, ', ');

  }

    $out .= ' '. cdm_term_representation($element->unit);

  if (isset($element->statisticalValues->modifyingText_L10n)) {

    $out .=  ' ' . $element->statisticalValues->modifyingText_L10n;

  }

  $out .= ($modifiers_strings ? ' ' . cdm_modifers_representations($element->statisticalValues) : '');

}

 * Theme function to render CDM DescriptionElements of the type IndividualsAssociations.

 *

 *   An associative array containing:

 *  - element: the IndividualsAssociations element

 * @return html representation of the given IndividualsAssociations element

 *

 * @ingroup themeable

function theme_cdm_descriptionElement_IndividualsAssociation($variables) {

  $element = $variables['element'];

  $out = '';

  $render_array = compose_cdm_specimenOrObservation($element->associatedSpecimenOrObservation);

  if (isset($element->description_L10n)) {

    $out .=  ' ' . $element->description_L10n;

  }

  $out .= drupal_render($render_array);

  $footnote_key_list_str = cdm_create_description_element_footnotes($element);

  return $out . $footnote_key_list_str;

}

/**

 * Theme function to render CDM DescriptionElements of the type TaxonInteraction.

 *

 *   An associative array containing:

 *  - element: the TaxonInteraction element

 * @return html representation of the given TaxonInteraction element

 *

 * @ingroup themeable

function theme_cdm_descriptionElement_TaxonInteraction($variables) {

  $element = $variables['element'];

  $out = '';

  if (isset($element->description_L10n)) {

    $out .=  ' ' . $element->description_L10n;

  }

  if(isset($element->taxon2)){

    $out = theme('cdm_taxonName',

        array(

      );

  }

  return $out . $footnote_key_list_str;

}

 *    The CDM TextData description element which contains the textual  information.

 * @param $asListElement

 *    A boolean which determines whether the citations should

 *  @param $feature_uuid

 *   A drupal render array with the following elements being used:

 *    - #tag: either 'div', 'li', ...

 *    ⁻ #attributes: class attributes

 *    - #value_prefix: (optionally) contains footnote anchors

 *    - #value: contains the textual content

 *    - #value_suffix: (optionally) contains footnote keys

 *

 * @ingroup compose

  // FIXME $feature_block_settings should be passed as parameter!!!!!

  $feature_block_settings = get_feature_block_settings($feature_uuid);

  // FIXME remove this hack ---------------------------

  $default_theme = variable_get('theme_default', NULL);

  if($default_theme == 'garland_cichorieae' || $default_theme == 'cyprus'

    || $default_theme == 'flore_afrique_centrale' || $default_theme == 'flora_malesiana' || $default_theme == 'flore_gabon' ){

    $asListElement = $feature_block_settings['as_list'] == 'ul';

  }

  // --------------------------------------------------

    '#type' => 'html_tag',

    '#tag' => $asListElement ? 'li' : 'span',

    '#attributes' => array(

      'class' => 'DescriptionElement DescriptionElement-' . $element->class . '

      ' .  html_class_attribute_ref($element)

    ),

    '#value' => '',

    '#value_suffix' => NULL

  );

    $element_text = str_replace("\n", "<br/>", $element->multilanguageText_L10n->text);

  if (!empty($annotations_and_sources['names_used_in_source']) && empty($element_text)) {

    // $element_text ==  NULL  usually occurs only in the case of CITATIONS!!!

    $names_used_in_source_markup = join(', ', $annotations_and_sources['names_used_in_source']) . ': ';

  }

  if(!empty($annotations_and_sources['source_references'])){

    $source_references_markup = '<span class="sources">'. join(' ', $annotations_and_sources['source_references']) . '<span>';

  }

  $render_array['#value-suffix'] = $annotations_and_sources['foot_note_keys'];

}

   * @param $element

   * @param $feature_block_settings

   * @param $element_text

   * @param $footnote_list_key_suggestion

   * @return array

   *   an associative array with the following elements:

   *   - foot_note_keys: all footnote keys as markup

   *   - source_references: an array of the source references citations

   *   - names used in source: an associative array of the names in source,

   *

      'foot_note_keys' => NULL,

      'source_references' => array(),

      'names_used_in_source' => array()

          array(

            'source' => $source,

            'doLink' => $feature_block_settings['link_to_reference']

          )

        );

          if (empty($element_text)) {

            $annotations_and_sources['source_references'][] = $referenceCitation;

          }

          else {

            $annotations_and_sources['source_references'][] = ' (' . $referenceCitation . ')';

          }

        }

          $source,

          $feature_block_settings['link_to_name_used_in_source']

        );

        if(!empty($name_in_source_render_array)){