<?php

/**
 * @file
 * Widgets for facets rendered a graph where the data is a combination of
 * 2 different facets.
 * The 'other' facet is set through the ComboGraph filter
 * Note that the execute function is not implemented but used from the parent class
 */

/**
 * Widget that renders facets as a graph based on this and a second facet.
 */
class FacetAPIGraphsWidgetGraphsCombo extends FacetAPIGraphsWidgetGraphs {

  /*
   * Which level of a hierarchy are we currently rendering
   */
  protected $level;

  /*
   * If there are no active items in a hierarchy, only render the
   * items in the root
   *
   */
  protected $renderroot;

  /**
   * Overrides constructor to reset the key.
   */
  public function __construct($id, array $realm, FacetapiFacet $facet, stdClass $settings) {
    parent::__construct($id, $realm, $facet, $settings);
    $this->key = $facet['name'];  // TODO Do we need the realm here too ? dont know
    $this->level = 0;
    $this->renderroot = TRUE;
  }

  /**
   * Recursive function that converts the render array into an array that can be
   * passed to theme_item_list().
   *
   * @param array $build
   *   The facet's render array.
   *
   * @return array
   *   The "items" parameter for theme_item_list().
   */
  function buildListItems(&$build) {
    if ($this->settings->settings['filters']['graph_combo_filter']['status'] == 0) {
      drupal_set_message("This type of facet must have a filter of type 'Graph Combo' before you can use it. " . $this->key, "error");
      return;
    }

    /*
     *  If there are more than 1 results to show, only show the deepest level
     *  if the facet is filtered by one of the results.
     *  This is to make sure that hierarchical taxonomies with a filter on
     *  parent & child
     *  render the child, and not the parent
     */
    if ($this->level == 0) {
      foreach($build as $item) {
        if (($item['#active'] == 1) && (!(empty($item['#item_children'])))) {
          $this->renderroot = FALSE;
          break;
        }
      }
    }

    $result = array (
     'data' => array(),
     'labels' => array(),
    );

    // Builds rows.
    $items = array();
    foreach ($build as $value => $item) {
        if (!empty($item['#item_children']) && (!$this->renderroot)) {
          $this->level++;
          $childresults = $this->buildListItems($item['#item_children']);
          if (count(($childresults['data'])) > 0) {
            foreach($childresults['data'] as $childkey => $childresult) {
              if (isset($result['data'][$childkey])) {
                $result['data'][$childkey] = $result['data'][$childkey] + $childresult;
              }
              else {
                $result['data'][$childkey] = $childresult;
              }
            }
            $result['labels'] = array_merge($result['labels'], $childresults['labels']);
          }
        }
        if (empty($item['#item_parents'])) { $this->level = 0; }
        if ((isset($item['#subitems'])) && (empty($childresults['data']))) {
          if (($this->renderroot) || ($this->level > 0)) {
            $result['labels'][] = $item['#markup'];
            foreach ($item['#subitems'] as $subitem) {
              $result['data'][$subitem['name']][$item['#markup']] = $subitem['count'];
            }
          }

        }
    }
    // We need to fill/pad all non-existent [data][keyxyz] values with 0 else the graph wont work
    foreach ($result['labels'] as $key => $label) {
      foreach ($result['data'] as $valuekey => $value) {
        if (!isset($result['data'][$valuekey][$label])) {
          $item = array (
              $label => 0,
          );
          $result['data'][$valuekey] = $this->array_insert($result['data'][$valuekey], $item, $key); // insert the missing name + value 0
        }
      }
    }
    // make sure all labels are unique
    $result['labels'] = array_unique($result['labels']);
    return $result;
  }

  /**
   * Local helper function to splice an array while keeping the keys
   * @param array $array
   *   input array
   * @param array $values
   *   keyed array to be inserted
   * @param integer $offset
   *   place in the array where $values needs to be inserted
   */
  protected function array_insert($array, $values, $offset) {
    return array_slice($array, 0, $offset, true) + $values + array_slice($array, $offset, NULL, true);
  }

  function settingsForm(&$form, &$form_state) {

    $miniid = substr($this->id, 9);
    if ($this->settings->settings['filters']['graph_combo_filter']['status'] == 1) {
      parent::settingsForm($form, $form_state);
    }
    else {
      $form['widget']['widget_settings'][$miniid][$this->id][$miniid.'message'] = array(
          '#type' => 'markup',
          '#markup' => t("You must first add a filter of type 'Graph Combo' to this facet before you can select this option."),
          '#states' => array(
              'visible' => array(
                  'select[name="widget"]' => array('value' => $this->id),
              ),
          ),
      );

    }
  }
}