tripal/tripal_natural_diversity/tripal_natural_diversity.module

<?php

require_once('api/tripal_natural_diversity.api.inc');
require_once('includes/tripal_natural_diversity.schema.inc');

/**
 *  @file
 * This file contains the basic functions needed for this drupal module.
 * The drupal tripal_natural_diversity module maps directly to the chado X module.
 *
 * For documentation regarding the Chado X module:
 * @see http://gmod.org/wiki/Chado_General_Module
 *
 * @defgroup tripal_natural_diversity Natural Diversity Module
 * @ingroup tripal_modules
 */

/*************************************************************************
 * Implements hook_views_api()
 * Purpose: Essentially this hook tells drupal that there is views support for
 *  for this module which then includes tripal_natural_diversity.views.inc where all the
 *  views integration code is
 *
 * @ingroup tripal_natural_diversity
 */
function tripal_natural_diversity_views_api() {
  return array(
      'api' => 2.0,
  );
}

/**
 * Implements hook_theme
 *
 * @ingroup tripal_natural_diversity
 */
function tripal_natural_diversity_theme() {
  return array(
    'tripal_feature_nd_genotypes' => array(
      'arguments' => array('node' => NULL),
      'template' => 'tripal_feature_nd_genotypes',
    ),
    'tripal_stock_nd_genotypes' => array(
      'arguments' => array('node' => NULL),
      'template' => 'tripal_stock_nd_genotypes',
    ),
    'tripal_stock_nd_phenotypes' => array(
      'arguments' => array('node' => NULL),
      'template' => 'tripal_stock_nd_phenotypes',
    ),
  );
}

/**
 * @ingroup tripal_library
 */
function tripal_natural_diversity_block_info() {

  $blocks['ndfgenotype']['info'] = t('Tripal Natural Diversity Feature Genotypes');
  $blocks['ndfgenotype']['cache'] = BLOCK_NO_CACHE;

  $blocks['ndsgenotype']['info'] = t('Tripal Natural Diversity Library Genotypes');
  $blocks['ndsgenotype']['cache'] = BLOCK_NO_CACHE;

  $blocks['ndsphenotype']['info'] = t('Tripal Natural Diversity Stock Phenotypes');
  $blocks['ndsphenotype']['cache'] = BLOCK_NO_CACHE;

  return $blocks;
}
/**
 * @ingroup tripal_library
 */
function tripal_natural_diversity_block_view($delta = '') {

  if (user_access('access chado_library content') and arg(0) == 'node' and is_numeric(arg(1))) {
    $nid = arg(1);
    $node = node_load($nid);

    $block = array();
    switch ($delta) {
    	case 'ndfgenotype':
    	  $block['subject'] = t('Genotypes');
    	  $block['content'] = theme('tripal_feature_nd_genotypes', $node);
    	  break;
    	case 'ndsgenotype':
    	  $block['subject'] = t('Stock Genotypes');
    	  $block['content'] = theme('tripal_stock_nd_genotypes', $node);
    	  break;
    	case 'ndsphenotype':
    	  $block['subject'] = t('Phenotypes');
    	  $block['content'] = theme('tripal_stock_nd_phenotypes', $node);
    	  break;
    	default :
    }
    return $block;
  }
}
/**
 *
 * @ingroup tripal_natural_diversity
 */
function tripal_natural_diversity_node_view(&$node, $view_mode, $langcode) {
    if ($node->type == 'chado_feature') {
      // the tripal_genetic module provides a tripal_feature_genotype
      // template.  The only difference between them is the addition of
      // project information by this module's template.  Therefore,
      // if the tripal_genetic content is present get rid of as this
      // module superceeds it.
      if ($view_mode == 'full') {
        if (array_key_exists('tripal_feature_genotypes', $node->content)) {
          unset($node->content['tripal_feature_genotypes']);
        }
        $node->content['tripal_feature_nd_genotypes'] = array(
           '#value' => theme('tripal_feature_nd_genotypes', $node),
        );
      }
    }
    if ($node->type == 'chado_stock') {
      if ($view_mode == 'full') {
        $node->content['tripal_stock_nd_genotypes'] = array(
           '#value' => theme('tripal_stock_nd_genotypes', $node),
        );
        $node->content['tripal_stock_nd_phenotypes'] = array(
           '#value' => theme('tripal_stock_nd_phenotypes', $node),
        );
      }
    }
    break;
}