|
@@ -1,1247 +0,0 @@
|
|
|
-<?php
|
|
|
-
|
|
|
-class chado_linker__relationship extends TripalField {
|
|
|
- // The default lable for this field.
|
|
|
- public static $default_label = 'Relationships';
|
|
|
-
|
|
|
- // The default description for this field.
|
|
|
- public static $default_description = 'Relationships between records.';
|
|
|
-
|
|
|
- // Add any default settings elements. If you override the globalSettingsForm()
|
|
|
- // or the instanceSettingsForm() functions then you need to be sure that
|
|
|
- // any settings you want those functions to manage are listed in this
|
|
|
- // array.
|
|
|
- public static $default_settings = array(
|
|
|
- 'chado_table' => '',
|
|
|
- 'chado_column' => '',
|
|
|
- 'base_table' => '',
|
|
|
- );
|
|
|
-
|
|
|
- // Provide a list of instance specific settings. These can be access within
|
|
|
- // the instanceSettingsForm. When the instanceSettingsForm is submitted
|
|
|
- // then Drupal with automatically change these settings for the instnace.
|
|
|
- // It is recommended to put settings at the instance level whenever possible.
|
|
|
- public static $default_instance_settings = array(
|
|
|
- 'relationships' => array(
|
|
|
- 'option1_vocabs' => '',
|
|
|
- 'option2_vocab' => '',
|
|
|
- 'option2_parent' => '',
|
|
|
- 'relationship_types' => '',
|
|
|
- ),
|
|
|
- );
|
|
|
-
|
|
|
- // Set this to the name of the storage backend that by default will support
|
|
|
- // this field.
|
|
|
- public static $default_storage = 'field_chado_storage';
|
|
|
-
|
|
|
- /**
|
|
|
- * @see TripalField::formatterView()
|
|
|
- */
|
|
|
- public function formatterView(&$element, $entity_type, $entity, $langcode, $items, $display) {
|
|
|
- // Get the settings
|
|
|
- $settings = $display['settings'];
|
|
|
-
|
|
|
- $rows = array();
|
|
|
- $headers = array('Subject' ,'Type', 'Object');
|
|
|
- $headers = array('Relationship');
|
|
|
-
|
|
|
- foreach ($items as $delta => $item) {
|
|
|
- if (!$item['value']) {
|
|
|
- continue;
|
|
|
- }
|
|
|
- $subject_name = $item['value']['subject']['name'];
|
|
|
- $subject_type = $item['value']['subject']['type'];
|
|
|
- $object_name = $item['value']['object']['name'];
|
|
|
- $object_type = $item['value']['object']['type'];
|
|
|
- $phrase = $item['value']['phrase'];
|
|
|
-
|
|
|
- // Handle some special cases.
|
|
|
- // For mRNA objects we don't want to show the CDS, exons, 5' UTR, etc.
|
|
|
- // we want to show the parent gene and the protein.
|
|
|
- if ($object_type == 'mRNA' and ($subject_type != 'polypeptide')) {
|
|
|
- continue;
|
|
|
- }
|
|
|
- if ($subject_type == 'mRNA' and ($object_type != 'gene')) {
|
|
|
- continue;
|
|
|
- }
|
|
|
-
|
|
|
- $phrase = preg_replace("/$subject_type/", "<b>$subject_type</b>", $phrase);
|
|
|
- $phrase = preg_replace("/$object_type/", "<b>$object_type</b>", $phrase);
|
|
|
-
|
|
|
- if (array_key_exists('entity', $item['value']['object'])) {
|
|
|
- list($entity_type, $object_entity_id) = explode(':', $item['value']['object']['entity']);
|
|
|
- if ($object_entity_id != $entity->id) {
|
|
|
- $link = l($object_name, 'bio_data/' . $object_entity_id);
|
|
|
- $phrase = preg_replace("/$object_name/", $link, $phrase);
|
|
|
- }
|
|
|
- }
|
|
|
- if (array_key_exists('entity', $item['value']['subject'])) {
|
|
|
- list($entity_type, $subject_entity_id) = explode(':', $item['value']['subject']['entity']);
|
|
|
- if ($subject_entity_id != $entity->id) {
|
|
|
- $link = l($subject_name, 'bio_data/' . $subject_entity_id);
|
|
|
- $phrase = preg_replace("/$subject_name/", $link, $phrase);
|
|
|
- }
|
|
|
- }
|
|
|
-
|
|
|
- $rows[] = array($phrase);
|
|
|
- }
|
|
|
-
|
|
|
-
|
|
|
- // the $table array contains the headers and rows array as well as other
|
|
|
- // options for controlling the display of the table. Additional
|
|
|
- // documentation can be found here:
|
|
|
- // https://api.drupal.org/api/drupal/includes%21theme.inc/function/theme_table/7
|
|
|
- $table = array(
|
|
|
- 'header' => $headers,
|
|
|
- 'rows' => $rows,
|
|
|
- 'attributes' => array(
|
|
|
- 'id' => 'chado-linker--relationship-table',
|
|
|
- 'class' => 'tripal-data-table'
|
|
|
- ),
|
|
|
- 'sticky' => FALSE,
|
|
|
- 'caption' => '',
|
|
|
- 'colgroups' => array(),
|
|
|
- 'empty' => 'There are no relationships',
|
|
|
- );
|
|
|
-
|
|
|
- // once we have our table array structure defined, we call Drupal's theme_table()
|
|
|
- // function to generate the table.
|
|
|
- if (count($items) > 0) {
|
|
|
- $element[0] = array(
|
|
|
- '#type' => 'markup',
|
|
|
- '#markup' => theme_table($table),
|
|
|
- );
|
|
|
- }
|
|
|
- }
|
|
|
- /**
|
|
|
- * @see TripalField::widgetForm()
|
|
|
- */
|
|
|
- public function widgetForm(&$widget, &$form, &$form_state, $langcode, $items, $delta, $element) {
|
|
|
- parent::widgetForm($widget, $form, $form_state, $langcode, $items, $delta, $element);
|
|
|
-
|
|
|
- $field_name = $this->field['field_name'];
|
|
|
- $field_type = $this->field['type'];
|
|
|
- $field_table = $this->instance['settings']['chado_table'];
|
|
|
- $field_column = $this->instance['settings']['chado_column'];
|
|
|
-
|
|
|
- // Get the instance settings
|
|
|
- $instance = $this->instance;
|
|
|
- $settings = $instance['settings']['relationships'];
|
|
|
-
|
|
|
- $option1_vocabs = $settings['option1_vocabs'];
|
|
|
- $option2_vocab = $settings['option2_vocab'];
|
|
|
- $option2_parent = $settings['option2_parent'];
|
|
|
- $option3_rtypes = $settings['relationship_types'];
|
|
|
-
|
|
|
- // For testing if there are selected vocabs for option1 we'll copy the
|
|
|
- // contents in a special variable for later.
|
|
|
- $option1_test = $option1_vocabs;
|
|
|
-
|
|
|
- // Get the FK column that links to the base table.
|
|
|
- $chado_table = $this->instance['settings']['chado_table'];
|
|
|
- $base_table = $this->instance['settings']['base_table'];
|
|
|
- $schema = chado_get_schema($chado_table);
|
|
|
- $pkey = $schema['primary key'][0];
|
|
|
- $fkeys = array_values($schema['foreign keys'][$base_table]['columns']);
|
|
|
- $fkey = $fkeys[0];
|
|
|
-
|
|
|
- // Get the field defaults.
|
|
|
- $record_id = '';
|
|
|
- $fkey_value = $element['#entity'] ? $element['#entity']->chado_record_id : '';
|
|
|
- $subject_id = '';
|
|
|
- $subject_uniquename = '';
|
|
|
- $type_id = '';
|
|
|
- $type = '';
|
|
|
- $object_id = '';
|
|
|
- $object_uniquename = '';
|
|
|
- $value = '';
|
|
|
- $rank = '';
|
|
|
-
|
|
|
- // Handle special cases
|
|
|
- $subject_id_key = 'subject_id';
|
|
|
- $object_id_key = 'object_id';
|
|
|
- if ($chado_table == 'organism_relationship') {
|
|
|
- $subject_id_key = 'subject_organism_id';
|
|
|
- $object_id_key = 'object_organism_id';
|
|
|
- }
|
|
|
- else if ($chado_table == 'nd_reagent_relationship') {
|
|
|
- $subject_id_key = 'subject_reagent_id';
|
|
|
- $object_id_key = 'object_reagent_id';
|
|
|
- }
|
|
|
- else if ($chado_table == 'project_relationship') {
|
|
|
- $subject_id_key = 'subject_project_id';
|
|
|
- $object_id_key = 'object_project_id';
|
|
|
- }
|
|
|
-
|
|
|
- // If the field already has a value then it will come through the $items
|
|
|
- // array. This happens when editing an existing record.
|
|
|
- if (array_key_exists($delta, $items)) {
|
|
|
- $record_id = isset($items[$delta][$field_table . '__' . $pkey]) ? $items[$delta][$field_table . '__' . $pkey] : '';
|
|
|
- $subject_id = isset($items[$delta][$field_table . '__' . $subject_id_key]) ? $items[$delta][$field_table . '__' . $subject_id_key] : '';
|
|
|
- $type_id = isset($items[$delta][$field_table . '__type_id']) ? $items[$delta][$field_table . '__type_id'] : '';
|
|
|
- $object_id = isset($items[$delta][$field_table . '__' . $object_id_key]) ? $items[$delta][$field_table . '__' . $object_id_key] : '';
|
|
|
-
|
|
|
- if (isset($items[$delta][$field_table . '__value'])) {
|
|
|
- $value = $items[$delta][$field_table . '__value'];
|
|
|
- }
|
|
|
- if (isset($items[$delta][$field_table . '__rank'])) {
|
|
|
- $rank = $items[$delta][$field_table . '__rank'];
|
|
|
- }
|
|
|
-
|
|
|
- $object_uniquename = isset($items[$delta]['object_name']) ? $items[$delta]['object_name'] : '';
|
|
|
- $subject_uniquename = isset($items[$delta]['subject_name']) ? $items[$delta]['subject_name'] : '';
|
|
|
- $type = isset($items[$delta]['type_name']) ? $items[$delta]['type_name'] : '';
|
|
|
- }
|
|
|
-
|
|
|
- // Check $form_state['values'] to see if an AJAX call set the values.
|
|
|
- if (array_key_exists('values', $form_state) and array_key_exists($delta, $form_state['values'])) {
|
|
|
-// $record_id = tripal_chado_get_field_form_values($field_name, $form_state, $delta, $field_table . '__' . $pkey);
|
|
|
-// $subject_id = tripal_chado_get_field_form_values($field_name, $form_state, $delta, $field_table . '__subject_id');
|
|
|
-// $subject_uniquename = tripal_chado_get_field_form_values($field_name, $form_state, $delta, 'subject_name');
|
|
|
-// $type_id = tripal_chado_get_field_form_values($field_name, $form_state, $delta, $field_table . '__type_id');
|
|
|
-// $type = tripal_chado_get_field_form_values($field_name, $form_state, $delta, 'type_name');
|
|
|
-// $object_id = tripal_chado_get_field_form_values($field_name, $form_state, $delta, $field_table . '__object_id');
|
|
|
-// $object_uniquename = tripal_chado_get_field_form_values($field_name, $form_state, $delta, 'object_name');
|
|
|
-// $value = tripal_chado_get_field_form_values($field_name, $form_state, $delta, $field_table . '__value');
|
|
|
-// $rank = tripal_chado_get_field_form_values($field_name, $form_state, $delta, $field_table . '__rank');
|
|
|
- }
|
|
|
-
|
|
|
- $widget['#table_name'] = $chado_table;
|
|
|
-
|
|
|
- $widget['#fkeys'] = $schema['foreign keys'];
|
|
|
- $widget['#base_table'] = $base_table;
|
|
|
- $widget['#chado_record_id'] = isset($form['#entity']) ? $form['#entity']->chado_record_id : '';
|
|
|
- //$widget['#element_validate'] = array('chado_linker__relationship_validate');
|
|
|
- $widget['#theme'] = 'chado_linker__relationship_widget';
|
|
|
- $widget['#prefix'] = "<span id='$chado_table-$delta'>";
|
|
|
- $widget['#suffix'] = "</span>";
|
|
|
-
|
|
|
- $widget['value'] = array(
|
|
|
- '#type' => 'value',
|
|
|
- '#value' => array_key_exists($delta, $items) ? $items[$delta]['value'] : '',
|
|
|
- );
|
|
|
- $widget[$field_table . '__' . $pkey] = array(
|
|
|
- '#type' => 'value',
|
|
|
- '#default_value' => $record_id,
|
|
|
- );
|
|
|
- $widget[$field_table . '__' . $subject_id_key] = array(
|
|
|
- '#type' => 'value',
|
|
|
- '#default_value' => $subject_id,
|
|
|
- );
|
|
|
- $widget[$field_table . '__type_id'] = array(
|
|
|
- '#type' => 'value',
|
|
|
- '#default_value' => $type_id,
|
|
|
- );
|
|
|
- $widget[$field_table . '__' . $object_id_key] = array(
|
|
|
- '#type' => 'value',
|
|
|
- '#default_value' => $object_id,
|
|
|
- );
|
|
|
- if (array_key_exists('value', $schema['fields'])) {
|
|
|
- $widget[$field_table . '__value'] = array(
|
|
|
- '#type' => 'value',
|
|
|
- '#default_value' => $value,
|
|
|
- );
|
|
|
- }
|
|
|
- if (array_key_exists('rank', $schema['fields'])) {
|
|
|
- $widget[$field_table . '__rank'] = array(
|
|
|
- '#type' => 'value',
|
|
|
- '#default_value' => $rank,
|
|
|
- );
|
|
|
- }
|
|
|
- $widget['subject_name'] = array(
|
|
|
- '#type' => 'textfield',
|
|
|
- '#title' => t('Subject'),
|
|
|
- '#default_value' => $subject_uniquename,
|
|
|
- '#required' => $element['#required'],
|
|
|
- '#maxlength' => array_key_exists('length', $schema['fields'][$subject_id_key]) ? $schema['fields'][$subject_id_key]['length'] : 255,
|
|
|
- '#size' => 35,
|
|
|
- '#autocomplete_path' => "admin/tripal/storage/chado/auto_name/$base_table",
|
|
|
- );
|
|
|
-
|
|
|
- // Getting default values
|
|
|
- $default_voc = '';
|
|
|
- if (isset($form_state['field'][$field_name]['und']['instance']['default_value'][0]['vocabulary'])) {
|
|
|
- $default_voc = $form_state['field'][$field_name]['und']['instance']['default_value'][0]['vocabulary'];
|
|
|
- }
|
|
|
- $default_term = '';
|
|
|
- if (isset($form_state['field'][$field_name]['und']['instance']['default_value'][0]['type_name'])) {
|
|
|
- $default_term = $form_state['field'][$field_name]['und']['instance']['default_value'][0]['type_name'];
|
|
|
- }
|
|
|
-
|
|
|
- $default_type_id = $type_id;
|
|
|
- if (!$type_id && isset($form_state['field'][$field_name]['und']['instance']['default_value'][0]['type_id'])) {
|
|
|
- $default_type_id = $form_state['field'][$field_name]['und']['instance']['default_value'][0]['type_id'];
|
|
|
- }
|
|
|
- // Option 3: Custom list of Relationship Types
|
|
|
- $rtype_options = array();
|
|
|
- $rtype_options[] = 'Select a Type';
|
|
|
- if ($option3_rtypes) {
|
|
|
- $rtypes = explode(PHP_EOL, $option3_rtypes);
|
|
|
- foreach($rtypes AS $rtype) {
|
|
|
- // Ignore empty lines
|
|
|
- if (trim($rtype) == '') {
|
|
|
- continue;
|
|
|
- }
|
|
|
- $term = tripal_get_cvterm(array('name' => trim($rtype)));
|
|
|
- // Try to get term with vocabulary specified
|
|
|
- if (!$term) {
|
|
|
- $tmp = explode('|', trim($rtype), 2);
|
|
|
- $cv = tripal_get_cv(array('name' => trim($tmp[0])));
|
|
|
- $rtype = trim($tmp[1]);
|
|
|
- $term = tripal_get_cvterm(array('name' => $rtype, 'cv_id' => $cv->cv_id));
|
|
|
- }
|
|
|
- $rtype_options[$term->cvterm_id] = $term->name;
|
|
|
- }
|
|
|
- $widget['type_id'] = array(
|
|
|
- '#type' => 'select',
|
|
|
- '#title' => t('Relationship Type'),
|
|
|
- '#options' => $rtype_options,
|
|
|
- '#default_value' => $default_type_id,
|
|
|
- );
|
|
|
- if ($type_id && !key_exists($type_id, $rtype_options)) {
|
|
|
- form_set_error($this->field['field_name'] . '[' . $langcode . '][' . $delta . '][type_id]', 'Illegal option detected for Relationship Type. Please contact site administrator to fix the problem');
|
|
|
- }
|
|
|
- }
|
|
|
- // Option 2: Child terms of a selected cvterm
|
|
|
- else if ($option2_vocab) {
|
|
|
- $values = array(
|
|
|
- 'cv_id' => $option2_vocab,
|
|
|
- 'name' => $option2_parent
|
|
|
- );
|
|
|
- $parent_term = tripal_get_cvterm($values);
|
|
|
-
|
|
|
- // If the term wasn't found then see if it's a synonym.
|
|
|
- if(!$parent_term) {
|
|
|
- $values = array(
|
|
|
- 'synonym' => array(
|
|
|
- 'name' => trim($option2_parent),
|
|
|
- )
|
|
|
- );
|
|
|
- $synonym = tripal_get_cvterm($values);
|
|
|
- if ($synonym && $synonym->cv_id->cv_id == $option2_vocab) {
|
|
|
- $parent_term = $synonym;
|
|
|
- }
|
|
|
- }
|
|
|
- // Get the child terms of the parent term found above.
|
|
|
- $sql =
|
|
|
- "SELECT
|
|
|
- subject_id,
|
|
|
- (SELECT name from {cvterm} where cvterm_id = subject_id) AS name
|
|
|
- FROM {cvtermpath}
|
|
|
- WHERE
|
|
|
- object_id = :parent_cvterm_id
|
|
|
- AND
|
|
|
- cv_id = :parent_cv_id
|
|
|
- ORDER BY name
|
|
|
- ";
|
|
|
- $args = array(
|
|
|
- ':parent_cvterm_id' => $parent_term->cvterm_id,
|
|
|
- ':parent_cv_id' => $parent_term->cv_id->cv_id
|
|
|
- );
|
|
|
- $results = chado_query($sql, $args);
|
|
|
- while($child = $results->fetchObject()) {
|
|
|
- $rtype_options[$child->subject_id] = $child->name;
|
|
|
- }
|
|
|
- $widget['type_id'] = array(
|
|
|
- '#type' => 'select',
|
|
|
- '#title' => t('Relationship Type'),
|
|
|
- '#options' => $rtype_options,
|
|
|
- '#default_value' => $default_type_id,
|
|
|
- );
|
|
|
- if ($type_id && !key_exists($type_id, $rtype_options)) {
|
|
|
- form_set_error($this->field['field_name'] . '[' . $langcode . '][' . $delta . '][type_id]', 'Illegal option detected for Relationship Type. Please contact site administrator to fix the problem');
|
|
|
- }
|
|
|
- }
|
|
|
- // Option 1: All terms of selected vocabularies
|
|
|
- else if ($option1_test && array_pop($option1_test)) {
|
|
|
- $sql = "SELECT cvterm_id, name FROM {cvterm} WHERE cv_id IN (:cv_id) ORDER BY name";
|
|
|
- $results = chado_query($sql, array(':cv_id' => $option1_vocabs));
|
|
|
- while ($obj = $results->fetchObject()) {
|
|
|
- $rtype_options[$obj->cvterm_id] = $obj->name;
|
|
|
- }
|
|
|
- $widget['type_id'] = array(
|
|
|
- '#type' => 'select',
|
|
|
- '#title' => t('Relationship Type'),
|
|
|
- '#options' => $rtype_options,
|
|
|
- '#default_value' => $default_type_id,
|
|
|
- );
|
|
|
- if ($type_id && !key_exists($type_id, $rtype_options)) {
|
|
|
- form_set_error($this->field['field_name'] . '[' . $langcode . '][' . $delta . '][type_id]', 'Illegal option detected for Relationship Type. Please contact site administrator to fix the problem');
|
|
|
- }
|
|
|
- }
|
|
|
- // Default option:
|
|
|
- else {
|
|
|
- // Set up available cvterms for selection
|
|
|
- $vocs = array(0 => 'Select a vocabulary');
|
|
|
- $vocs = tripal_get_cv_select_options();
|
|
|
- $cv_id = isset($form_state['values'][$field_name]['und'][0]['vocabulary']) ? $form_state['values'][$field_name]['und'][0]['vocabulary'] : 0;
|
|
|
- // Try getting the cv_id from cvterm for existing records
|
|
|
- if (!$cv_id && $type_id) {
|
|
|
- $cvterm = tripal_get_cvterm(array('cvterm_id' => $type_id));
|
|
|
- if (isset($cvterm->cv_id->cv_id)) {
|
|
|
- $cv_id = $cvterm->cv_id->cv_id;
|
|
|
- $default_term = $cvterm->name;
|
|
|
- }
|
|
|
- }
|
|
|
- if (!$cv_id) {
|
|
|
- $cv_id = $default_voc;
|
|
|
- }
|
|
|
- $widget['vocabulary'] = array(
|
|
|
- '#type' => 'select',
|
|
|
- '#title' => t('Vocabulary'),
|
|
|
- '#options' => $vocs,
|
|
|
- '#required' => $element['#required'],
|
|
|
- '#default_value' => $cv_id,
|
|
|
- '#ajax' => array(
|
|
|
- 'callback' => "chado_linker__relationship_widget_form_ajax_callback",
|
|
|
- 'wrapper' => "$chado_table-$delta",
|
|
|
- 'effect' => 'fade',
|
|
|
- 'method' => 'replace'
|
|
|
- ),
|
|
|
- );
|
|
|
- if ($cv_id) {
|
|
|
- $options = array();
|
|
|
- $widget['type_name'] = array(
|
|
|
- '#type' => 'textfield',
|
|
|
- '#title' => t('Relationship Type'),
|
|
|
- '#size' => 15,
|
|
|
- '#default_value' => $default_term,
|
|
|
- '#autocomplete_path' => "admin/tripal/storage/chado/auto_name/cvterm/$cv_id"
|
|
|
- );
|
|
|
- }
|
|
|
- }
|
|
|
-
|
|
|
- $widget['object_name'] = array(
|
|
|
- '#type' => 'textfield',
|
|
|
- '#title' => t('Object'),
|
|
|
- '#default_value' => $object_uniquename,
|
|
|
- '#required' => $element['#required'],
|
|
|
- '#maxlength' => array_key_exists('length', $schema['fields'][$object_id_key]) ? $schema['fields'][$object_id_key]['length'] : 255,
|
|
|
- '#size' => 35,
|
|
|
- '#autocomplete_path' => "admin/tripal/storage/chado/auto_name/$base_table",
|
|
|
- );
|
|
|
- }
|
|
|
- /**
|
|
|
- * @see TripalField::validate()
|
|
|
- */
|
|
|
- function validate($entity_type, $entity, $langcode, $items, &$errors) {
|
|
|
- $field_name = $this->field['field_name'];
|
|
|
- $field_type = $this->field['type'];
|
|
|
- $field_table = $this->instance['settings']['chado_table'];
|
|
|
- $field_column = $this->instance['settings']['chado_column'];
|
|
|
- $base_table = $this->instance['settings']['base_table'];
|
|
|
-
|
|
|
- $schema = chado_get_schema($field_table);
|
|
|
- $fkeys = $schema['foreign keys'];
|
|
|
-
|
|
|
- // Handle special cases
|
|
|
- $subject_id_key = 'subject_id';
|
|
|
- $object_id_key = 'object_id';
|
|
|
- if ($field_table == 'organism_relationship') {
|
|
|
- $subject_id_key = 'subject_organism_id';
|
|
|
- $object_id_key = 'object_organism_id';
|
|
|
- }
|
|
|
- else if ($field_table == 'nd_reagent_relationship') {
|
|
|
- $subject_id_key = 'subject_reagent_id';
|
|
|
- $object_id_key = 'object_reagent_id';
|
|
|
- }
|
|
|
- else if ($field_table == 'project_relationship') {
|
|
|
- $subject_id_key = 'subject_project_id';
|
|
|
- $object_id_key = 'object_project_id';
|
|
|
- }
|
|
|
-
|
|
|
- foreach ($items as $delta => $item) {
|
|
|
- $subject_id = $item[$field_table . '__' . $subject_id_key];
|
|
|
- $object_id = $item[ $field_table . '__' . $object_id_key];
|
|
|
- $type_id = $item[$field_table . '__type_id'];
|
|
|
- $type_id = isset($item['type_id']) ? $item['type_id'] : $type_id;
|
|
|
- $type_name = isset($item['type_name']) ? $item['type_name'] : '';
|
|
|
- $subject_name = $item['subject_name'];
|
|
|
- $object_name = $item['object_name'];
|
|
|
-
|
|
|
-
|
|
|
- // If the row is empty then just continue, there's nothing to validate.
|
|
|
- if (!$type_id and !$type_name and !$subject_name and !$object_name) {
|
|
|
- continue;
|
|
|
- }
|
|
|
-
|
|
|
- // Make sure we have values for all of the fields.
|
|
|
- $form_error = FALSE;
|
|
|
- if (!$type_name && !$type_id) {
|
|
|
- $errors[$this->field['field_name']][$langcode][$delta][] = array(
|
|
|
- 'error' => 'chado_linker__relationship',
|
|
|
- 'message' => t("Please provide the type of relationship."),
|
|
|
- );
|
|
|
- }
|
|
|
- if ($entity and !$subject_name) {
|
|
|
- $errors[$this->field['field_name']][$langcode][$delta][] = array(
|
|
|
- 'error' => 'chado_linker__relationship',
|
|
|
- 'message' => t("Please provide the subject of the relationship."),
|
|
|
- );
|
|
|
- }
|
|
|
- if ($entity and !$object_name) {
|
|
|
- $errors[$this->field['field_name']][$langcode][$delta][] = array(
|
|
|
- 'error' => 'chado_linker__relationship',
|
|
|
- 'message' => t("Please provide the object of the relationship."),
|
|
|
- );
|
|
|
- }
|
|
|
- if ($form_error) {
|
|
|
- continue;
|
|
|
- }
|
|
|
-
|
|
|
- // Before submitting this form we need to make sure that our subject_id and
|
|
|
- // object_ids are real values. There are two ways to get the value, either
|
|
|
- // just with the text value or with an [id: \d+] string embedded. If the
|
|
|
- // later we will pull it out.
|
|
|
- $subject_id = '';
|
|
|
- $fkey_rcolumn = $fkeys[$base_table]['columns'][$subject_id_key];
|
|
|
- $matches = array();
|
|
|
- if ($entity) {
|
|
|
- if(preg_match('/\[id: (\d+)\]/', $subject_name, $matches)) {
|
|
|
- $subject_id = $matches[1];
|
|
|
- $values = array($fkey_rcolumn => $subject_id);
|
|
|
- $subject = chado_select_record($base_table, array($fkey_rcolumn), $values);
|
|
|
- if (count($subject) == 0) {
|
|
|
- $errors[$this->field['field_name']][$langcode][$delta][] = array(
|
|
|
- 'error' => 'chado_linker__relationship',
|
|
|
- 'message' => t("The subject record cannot be found using the specified id (e.g. [id: xx])."),
|
|
|
- );
|
|
|
- }
|
|
|
- }
|
|
|
- else {
|
|
|
- $values = array('uniquename' => $subject_name);
|
|
|
- $subject = chado_select_record($base_table, array($fkey_rcolumn), $values);
|
|
|
- if (count($subject) == 0) {
|
|
|
- $errors[$this->field['field_name']][$langcode][$delta][] = array(
|
|
|
- 'error' => 'chado_linker__relationship',
|
|
|
- 'message' => t("The subject record cannot be found. Please check spelling."),
|
|
|
- );
|
|
|
- }
|
|
|
- elseif (count($subject) > 1) {
|
|
|
- $errors[$this->field['field_name']][$langcode][$delta][] = array(
|
|
|
- 'error' => 'chado_linker__relationship',
|
|
|
- 'message' => t("The subject is not unique and therefore the relationship cannot be made."),
|
|
|
- );
|
|
|
- }
|
|
|
- }
|
|
|
- }
|
|
|
-
|
|
|
- // Now check for a matching object.
|
|
|
- $object_id = '';
|
|
|
- $fkey_rcolumn = $fkeys[$base_table]['columns'][$object_id_key];
|
|
|
- $matches = array();
|
|
|
- if ($entity) {
|
|
|
- if (preg_match('/\[id: (\d+)\]/', $object_name, $matches)) {
|
|
|
- $object_id = $matches[1];
|
|
|
- $values = array($fkey_rcolumn => $object_id);
|
|
|
- $object = chado_select_record($base_table, array($fkey_rcolumn), $values);
|
|
|
- if (count($subject) == 0) {
|
|
|
- $errors[$this->field['field_name']][$langcode][$delta][] = array(
|
|
|
- 'error' => 'chado_linker__relationship',
|
|
|
- 'message' => t("The object record cannot be found using the specified id (e.g. [id: xx])."),
|
|
|
- );
|
|
|
- }
|
|
|
- }
|
|
|
- else {
|
|
|
- $values = array('uniquename' => $object_name);
|
|
|
- $object = chado_select_record($base_table, array($fkey_rcolumn), $values);
|
|
|
- if (count($object) == 0) {
|
|
|
- $errors[$this->field['field_name']][$langcode][$delta][] = array(
|
|
|
- 'error' => 'chado_linker__relationship',
|
|
|
- 'message' => t("The object record cannot be found. Please check spelling."),
|
|
|
- );;
|
|
|
- }
|
|
|
- elseif (count($object) > 1) {
|
|
|
- $errors[$this->field['field_name']][$langcode][$delta][] = array(
|
|
|
- 'error' => 'chado_linker__relationship',
|
|
|
- 'message' => t("The object is not unique and therefore the relationship cannot be made."),
|
|
|
- );
|
|
|
- }
|
|
|
- }
|
|
|
- }
|
|
|
-
|
|
|
- // Make sure that either our object or our subject refers to the base record.
|
|
|
- if ($entity) {
|
|
|
- $chado_record_id = $entity->chado_record_id;
|
|
|
- if ($object_id != $chado_record_id and $subject_id != $chado_record_id) {
|
|
|
- $errors[$this->field['field_name']][$langcode][$delta][] = array(
|
|
|
- 'error' => 'chado_linker__relationship',
|
|
|
- 'message' => t("Either the subject or the object in the relationship must refer to this record."),
|
|
|
- );
|
|
|
- }
|
|
|
-
|
|
|
- // Make sure that the object and subject are not both the same thing.
|
|
|
- if ($object_id == $subject_id) {
|
|
|
- $errors[$this->field['field_name']][$langcode][$delta][] = array(
|
|
|
- 'error' => 'chado_linker__relationship',
|
|
|
- 'message' => t("The subject and the object in the relationship cannot both refer to the same record."),
|
|
|
- );
|
|
|
- }
|
|
|
- }
|
|
|
- }
|
|
|
- }
|
|
|
- /**
|
|
|
- * @see TripalField::submit()
|
|
|
- */
|
|
|
- public function widgetFormSubmit($form, &$form_state, $entity_type, $entity, $langcode, $delta) {
|
|
|
-return;
|
|
|
- $field_name = $this->field['field_name'];
|
|
|
- $field_type = $this->field['type'];
|
|
|
- $field_table = $this->instance['settings']['chado_table'];
|
|
|
- $field_column = $this->instance['settings']['chado_column'];
|
|
|
- $base_table = $this->instance['settings']['base_table'];
|
|
|
- $chado_record_id = $entity->chado_record_id;
|
|
|
-
|
|
|
- $schema = chado_get_schema($field_table);
|
|
|
- $fkeys = $schema['foreign keys'];
|
|
|
-
|
|
|
- $type_name = array_key_exists('type_name', $item) ? $item['type_name'] : '';
|
|
|
- $subject_id = $form_state['values'][$field_name][$langcode][$delta][$field_table . '__subject_id'];
|
|
|
- $object_id = $form_state['values'][$field_name][$langcode][$delta][ $field_table . '__object_id'];
|
|
|
- $type_id = $form_state['values'][$field_name][$langcode][$delta][$field_table . '__type_id'];
|
|
|
-
|
|
|
- $subject_name = $form_state['values'][$field_name][$langcode][$delta]['subject_name'];
|
|
|
- $object_name = $form_state['values'][$field_name][$langcode][$delta]['object_name'];
|
|
|
-
|
|
|
- // If the row is empty then skip this one, there's nothing to validate.
|
|
|
- if (!($type_id or !$type_name) and !$subject_name and !$object_name) {
|
|
|
- return;
|
|
|
- }
|
|
|
-
|
|
|
- // Get the subject ID.
|
|
|
- $subject_id = '';
|
|
|
- $fkey_rcolumn = $fkeys[$base_table]['columns']['subject_id'];
|
|
|
- $matches = array();
|
|
|
- if (preg_match('/\[id: (\d+)\]/', $subject_name, $matches)) {
|
|
|
- $subject_id = $matches[1];
|
|
|
- }
|
|
|
- else {
|
|
|
- $values = array('uniquename' => $subject_name);
|
|
|
- $subject = chado_select_record($base_table, array($fkey_rcolumn), $values);
|
|
|
- $subject_id = $subject[0]->$fkey_rcolumn;
|
|
|
- }
|
|
|
-
|
|
|
- // Get the object ID.
|
|
|
- $object_id = '';
|
|
|
- $fkey_rcolumn = $fkeys[$base_table]['columns']['object_id'];
|
|
|
- $matches = array();
|
|
|
- if (preg_match('/\[id: (\d+)\]/', $object_name, $matches)) {
|
|
|
- $object_id = $matches[1];
|
|
|
- }
|
|
|
- else {
|
|
|
- $values = array('uniquename' => $object_name);
|
|
|
- $object = chado_select_record($base_table, array($fkey_rcolumn), $values);
|
|
|
- $object_id = $object[0]->$fkey_rcolumn;
|
|
|
- }
|
|
|
-
|
|
|
- // Set the IDs according to the values that were determined above.
|
|
|
- $form_state['values'][$field_name][$langcode][$delta][$field_table . '__subject_id'] = $subject_id;
|
|
|
- $form_state['values'][$field_name][$langcode][$delta][$field_table . '__object_id'] = $object_id;
|
|
|
- $form_state['values'][$field_name][$langcode][$delta][$field_table . '__type_id'] = $type_name;
|
|
|
- $form_state['values'][$field_name][$langcode][$delta][$field_table . '__rank'] = $item['_weight'];
|
|
|
-
|
|
|
- }
|
|
|
- /**
|
|
|
- * @see TripalField::load()
|
|
|
- */
|
|
|
- public function load($entity, $details = array()) {
|
|
|
- $settings = $this->field['settings'];
|
|
|
-
|
|
|
- $record = $details['record'];
|
|
|
-
|
|
|
- $field_name = $this->field['field_name'];
|
|
|
- $field_type = $this->field['type'];
|
|
|
- $field_table = $this->instance['settings']['chado_table'];
|
|
|
- $field_column = $this->instance['settings']['chado_column'];
|
|
|
- $base_table = $this->instance['settings']['base_table'];
|
|
|
-
|
|
|
- // Get the PKey for this table
|
|
|
- $schema = chado_get_schema($field_table);
|
|
|
- $pkey = $schema['primary key'][0];
|
|
|
-
|
|
|
- // Get the Pkeys for the subject and object tables
|
|
|
- $subject_fkey_table = '';
|
|
|
- $object_fkey_table = '';
|
|
|
- $fkeys = $schema['foreign keys'];
|
|
|
- foreach ($fkeys as $fktable => $details) {
|
|
|
- foreach ($details['columns'] as $fkey_lcolumn => $fkey_rcolumn) {
|
|
|
- if ($fkey_lcolumn == 'subject_id') {
|
|
|
- $subject_fkey_table = $fktable;
|
|
|
- }
|
|
|
- if ($fkey_lcolumn == 'object_id') {
|
|
|
- $object_fkey_table = $fktable;
|
|
|
- }
|
|
|
- }
|
|
|
- }
|
|
|
- $subject_schema = chado_get_schema($subject_fkey_table);
|
|
|
- $object_schema = chado_get_schema($object_fkey_table);
|
|
|
- $subject_pkey = $subject_schema['primary key'][0];
|
|
|
- $object_pkey = $object_schema['primary key'][0];
|
|
|
-
|
|
|
- // Get the FK that links to the base record.
|
|
|
- $schema = chado_get_schema($field_table);
|
|
|
- $fkey_lcolumn = key($schema['foreign keys'][$base_table]['columns']);
|
|
|
- $fkey_rcolumn = $schema['foreign keys'][$base_table]['columns'][$fkey_lcolumn];
|
|
|
-
|
|
|
- // Set some defaults for the empty record.
|
|
|
- $entity->{$field_name}['und'][0] = array(
|
|
|
- 'value' => array(),
|
|
|
- $field_table . '__' . $pkey => '',
|
|
|
- $field_table . '__subject_id' => '',
|
|
|
- $field_table . '__object_id' => '',
|
|
|
- $field_table . '__type_id' => '',
|
|
|
- // These elements don't need to follow the naming scheme above
|
|
|
- // becasue we don't need the chado_field_storage to try and
|
|
|
- // save these values.
|
|
|
- 'object_name' => '',
|
|
|
- 'subject_name' => '',
|
|
|
- 'type_name' => '',
|
|
|
- );
|
|
|
-
|
|
|
- // If the table has rank and value fields then add those to the default
|
|
|
- // value array.
|
|
|
- if (array_key_exists('value', $schema['fields'])) {
|
|
|
- $entity->{$field_name}['und'][0][$field_table . '__value'] = '';
|
|
|
- }
|
|
|
- if (array_key_exists('rank', $schema['fields'])) {
|
|
|
- $entity->{$field_name}['und'][0][$field_table . '__rank'] = '';
|
|
|
- }
|
|
|
-
|
|
|
- // If we have no record then just return.
|
|
|
- if (!$record) {
|
|
|
- return;
|
|
|
- }
|
|
|
-
|
|
|
- // Expand the object to include the relationships.
|
|
|
- $options = array(
|
|
|
- 'return_array' => 1,
|
|
|
- // we don't want to fully recurse we only need information about the
|
|
|
- // relationship type and the object and subject
|
|
|
- 'include_fk' => array(
|
|
|
- 'type_id' => 1,
|
|
|
- 'object_id' => array(
|
|
|
- 'type_id' => 1,
|
|
|
- ),
|
|
|
- 'subject_id' => array(
|
|
|
- 'type_id' => 1,
|
|
|
- ),
|
|
|
- ),
|
|
|
- );
|
|
|
- $rel_table = $base_table . '_relationship';
|
|
|
- $schema = chado_get_schema($rel_table);
|
|
|
- if (array_key_exists('rank', $schema['fields'])) {
|
|
|
- $options['order_by'] = array('rank' => 'ASC');
|
|
|
- }
|
|
|
- $record = chado_expand_var($record, 'table', $rel_table, $options);
|
|
|
- if (!$record->$rel_table) {
|
|
|
- return;
|
|
|
- }
|
|
|
- $srelationships = null;
|
|
|
- $orelationships = null;
|
|
|
- if ($rel_table == 'organism_relationship') {
|
|
|
- $srelationships = $record->$rel_table->subject_organism_id;
|
|
|
- $orelationships = $record->$rel_table->object_organism_id;
|
|
|
- }
|
|
|
- else if ($rel_table == 'nd_reagent_relationship') {
|
|
|
- $srelationships = $record->$rel_table->subject_reagent_id;
|
|
|
- $orelationships = $record->$rel_table->object_reagent_id;
|
|
|
- }
|
|
|
- else if ($rel_table == 'project_relationship') {
|
|
|
- $srelationships = $record->$rel_table->subject_project_id;
|
|
|
- $orelationships = $record->$rel_table->object_project_id;
|
|
|
- }
|
|
|
- else {
|
|
|
- $srelationships = $record->$rel_table->subject_id;
|
|
|
- $orelationships = $record->$rel_table->object_id;
|
|
|
- }
|
|
|
-
|
|
|
- $i = 0;
|
|
|
- if ($orelationships) {
|
|
|
- foreach ($orelationships as $relationship) {
|
|
|
- $rel_acc = $relationship->type_id->dbxref_id->db_id->name . ':' . $relationship->type_id->dbxref_id->accession;
|
|
|
- $rel_type = $relationship->type_id->name;
|
|
|
- $verb = self::get_rel_verb($rel_type);
|
|
|
- $subject_name = $relationship->subject_id->name;
|
|
|
- $subject_type = $relationship->subject_id->type_id->name;
|
|
|
- $object_name = $relationship->object_id->name;
|
|
|
- $object_type = $relationship->object_id->type_id->name;
|
|
|
- $entity->{$field_name}['und'][$i]['value'] = array(
|
|
|
- 'type' => $relationship->type_id->name,
|
|
|
- 'subject' => array(
|
|
|
- 'type' => $subject_type,
|
|
|
- 'name' => $subject_name,
|
|
|
- ),
|
|
|
- 'type' => $relationship->type_id->name,
|
|
|
- 'object' => array(
|
|
|
- 'type' => $object_type,
|
|
|
- 'name' => $object_name,
|
|
|
- 'entity' => 'TripalEntity:' . $entity->id,
|
|
|
- )
|
|
|
- );
|
|
|
- if (property_exists($relationship->subject_id, 'uniquename')) {
|
|
|
- $entity->{$field_name}['und'][$i]['value']['subject']['identifier'] = $relationship->subject_id->uniquename;;
|
|
|
- }
|
|
|
- if (property_exists($relationship->object_id, 'uniquename')) {
|
|
|
- $entity->{$field_name}['und'][$i]['value']['object']['identifier'] = $relationship->object_id->uniquename;
|
|
|
- }
|
|
|
- if (property_exists($relationship->subject_id, 'entity_id')) {
|
|
|
- $entity_id = $relationship->subject_id->entity_id;
|
|
|
- $entity->{$field_name}['und'][$i]['value']['subject']['entity'] = 'TripalEntity:' . $entity_id;
|
|
|
- }
|
|
|
- $rel_type_clean = lcfirst(preg_replace('/_/', ' ', $rel_type));
|
|
|
- $entity->{$field_name}['und'][$i]['value']['phrase'] = 'The ' . $subject_type . ', ' .
|
|
|
- $subject_name . ', ' . $verb . ' ' . $rel_type_clean . ' this ' .
|
|
|
- $object_type . '.';
|
|
|
-
|
|
|
- $entity->{$field_name}['und'][$i]['semantic_web'] = array(
|
|
|
- 'type' => $rel_acc,
|
|
|
- 'subject' => $relationship->subject_id->type_id->dbxref_id->db_id->name . ':' . $relationship->subject_id->type_id->dbxref_id->accession,
|
|
|
- 'object' => $relationship->object_id->type_id->dbxref_id->db_id->name . ':' . $relationship->object_id->type_id->dbxref_id->accession,
|
|
|
- );
|
|
|
-
|
|
|
- $entity->{$field_name}['und'][$i][$field_table . '__' . $pkey] = $relationship->$pkey;
|
|
|
- $entity->{$field_name}['und'][$i][$field_table . '__subject_id'] = $relationship->subject_id->$subject_pkey;
|
|
|
- $entity->{$field_name}['und'][$i][$field_table . '__type_id'] = $relationship->type_id->cvterm_id;
|
|
|
- $entity->{$field_name}['und'][$i][$field_table . '__object_id'] = $relationship->object_id->$object_pkey;
|
|
|
-
|
|
|
- $entity->{$field_name}['und'][$i]['type_name'] = $relationship->type_id->name;
|
|
|
- $entity->{$field_name}['und'][$i]['subject_name'] = $relationship->subject_id->name . ' [id: ' . $relationship->subject_id->$fkey_rcolumn . ']';
|
|
|
- $entity->{$field_name}['und'][$i]['object_name'] = $relationship->object_id->name . ' [id: ' . $relationship->object_id->$fkey_rcolumn . ']';
|
|
|
- if (array_key_exists('value', $schema['fields'])) {
|
|
|
- $entity->{$field_name}['und'][$i][$field_table . '__value'] = $relationship->value;
|
|
|
- }
|
|
|
- if (array_key_exists('rank', $schema['fields'])) {
|
|
|
- $entity->{$field_name}['und'][$i][$field_table . '__rank'] = $relationship->rank;
|
|
|
- }
|
|
|
- $i++;
|
|
|
- }
|
|
|
- }
|
|
|
-
|
|
|
- if ($srelationships) {
|
|
|
- foreach ($srelationships as $relationship) {
|
|
|
- $rel_acc = $relationship->type_id->dbxref_id->db_id->name . ':' . $relationship->type_id->dbxref_id->accession;
|
|
|
- $rel_type = $relationship->type_id->name;
|
|
|
- $verb = self::get_rel_verb($rel_type);
|
|
|
- $subject_name = $relationship->subject_id->name;
|
|
|
- $subject_type = $relationship->subject_id->type_id->name;
|
|
|
- $object_name = $relationship->object_id->name;
|
|
|
- $object_type = $relationship->object_id->type_id->name;
|
|
|
- $entity->{$field_name}['und'][$i]['value'] = array(
|
|
|
- '@type' => $relationship->type_id->name,
|
|
|
- 'subject' => array(
|
|
|
- 'type' => $subject_type,
|
|
|
- 'name' => $subject_name,
|
|
|
- 'entity' => 'TripalEntity:' . $entity->id,
|
|
|
- ),
|
|
|
- 'type' => $relationship->type_id->name,
|
|
|
- 'object' => array(
|
|
|
- 'type' => $object_type,
|
|
|
- 'name' => $object_name,
|
|
|
- )
|
|
|
- );
|
|
|
- if (property_exists($relationship->subject_id, 'uniquename')) {
|
|
|
- $entity->{$field_name}['und'][$i]['value']['subject']['identifier'] = $relationship->subject_id->uniquename;
|
|
|
- }
|
|
|
- if (property_exists($relationship->object_id, 'uniquename')) {
|
|
|
- $entity->{$field_name}['und'][$i]['value']['object']['identifier'] = $relationship->object_id->uniquename;
|
|
|
- }
|
|
|
- if (property_exists($relationship->object_id, 'entity_id')) {
|
|
|
- $entity_id = $relationship->object_id->entity_id;
|
|
|
- $entity->{$field_name}['und'][$i]['value']['object']['entity'] = 'TripalEntity:' . $entity_id;
|
|
|
- }
|
|
|
- $rel_type_clean = lcfirst(preg_replace('/_/', ' ', $rel_type));
|
|
|
- $entity->{$field_name}['und'][$i]['value']['phrase'] = 'This ' .
|
|
|
- $subject_type . ' ' . $verb . ' ' . $rel_type_clean . ' the ' .
|
|
|
- $object_type . ', ' . $object_name . '.';
|
|
|
-
|
|
|
-
|
|
|
- $entity->{$field_name}['und'][$i]['semantic_web'] = array(
|
|
|
- 'type' => $rel_acc,
|
|
|
- 'subject' => $relationship->subject_id->type_id->dbxref_id->db_id->name . ':' . $relationship->subject_id->type_id->dbxref_id->accession,
|
|
|
- 'object' => $relationship->object_id->type_id->dbxref_id->db_id->name . ':' . $relationship->object_id->type_id->dbxref_id->accession,
|
|
|
- );
|
|
|
-
|
|
|
-
|
|
|
- $entity->{$field_name}['und'][$i][$field_table . '__' . $pkey] = $relationship->$pkey;
|
|
|
- $entity->{$field_name}['und'][$i][$field_table . '__subject_id'] = $relationship->subject_id->$subject_pkey;
|
|
|
- $entity->{$field_name}['und'][$i][$field_table . '__type_id'] = $relationship->type_id->cvterm_id;
|
|
|
- $entity->{$field_name}['und'][$i][$field_table . '__object_id'] = $relationship->object_id->$object_pkey;
|
|
|
-
|
|
|
- $entity->{$field_name}['und'][$i]['type_name'] = $relationship->type_id->name;
|
|
|
- $entity->{$field_name}['und'][$i]['subject_name'] = $relationship->subject_id->name . ' [id: ' . $relationship->subject_id->$fkey_rcolumn . ']';
|
|
|
- $entity->{$field_name}['und'][$i]['object_name'] = $relationship->object_id->name . ' [id: ' . $relationship->object_id->$fkey_rcolumn . ']';
|
|
|
-
|
|
|
- if (array_key_exists('value', $schema['fields'])) {
|
|
|
- $entity->{$field_name}['und'][$i][$field_table . '__value'] = $relationship->value;
|
|
|
- }
|
|
|
- if (array_key_exists('rank', $schema['fields'])) {
|
|
|
- $entity->{$field_name}['und'][$i][$field_table . '__rank'] = $relationship->rank;
|
|
|
- }
|
|
|
- $i++;
|
|
|
- }
|
|
|
- }
|
|
|
- }
|
|
|
- /**
|
|
|
- * A helper function to define English verbs for relationship types.
|
|
|
- *
|
|
|
- * @param $rel_type
|
|
|
- * The vocabulary term name for the relationship.
|
|
|
- *
|
|
|
- * @return
|
|
|
- * The verb to use when creating a sentence of the relationship.
|
|
|
- */
|
|
|
- public static function get_rel_verb($rel_type) {
|
|
|
- $rel_type_clean = lcfirst(preg_replace('/_/', ' ', $rel_type));
|
|
|
- $verb = $rel_type_clean;
|
|
|
- switch ($rel_type_clean) {
|
|
|
- case 'integral part of':
|
|
|
- case 'instance of':
|
|
|
- $verb = 'is an';
|
|
|
- break;
|
|
|
- case 'proper part of':
|
|
|
- case 'transformation of':
|
|
|
- case 'genome of':
|
|
|
- case 'part of':
|
|
|
- $verb = 'is a';
|
|
|
- case 'position of':
|
|
|
- case 'sequence of':
|
|
|
- case 'variant of':
|
|
|
- $verb = 'is a';
|
|
|
- break;
|
|
|
- case 'derives from':
|
|
|
- case 'connects on':
|
|
|
- case 'contains':
|
|
|
- case 'finishes':
|
|
|
- case 'guides':
|
|
|
- case 'has origin':
|
|
|
- case 'has part':
|
|
|
- case 'has quality':
|
|
|
- case 'is consecutive sequence of':
|
|
|
- case 'maximally overlaps':
|
|
|
- case 'overlaps':
|
|
|
- case 'starts':
|
|
|
- break;
|
|
|
- default:
|
|
|
- $verb = 'is';
|
|
|
- }
|
|
|
-
|
|
|
- return $verb;
|
|
|
- }
|
|
|
-
|
|
|
- /**
|
|
|
- * @see TripalField::instanceSettingsForm()
|
|
|
- */
|
|
|
- public function instanceSettingsForm() {
|
|
|
-
|
|
|
- $element = parent::instanceSettingsForm();
|
|
|
-
|
|
|
- //$element = parent::instanceSettingsForm();
|
|
|
- $element['relationships'] = array(
|
|
|
- '#type' => 'fieldset',
|
|
|
- '#title' => 'Allowed Relationship Types',
|
|
|
- '#description' => t('There are three ways that relationship types
|
|
|
- can be limited for users who have permission to add new relationships.
|
|
|
- Please select the most appropriate for you use case. By default
|
|
|
- all vocabularies are provided to the user which allows use of any
|
|
|
- term for the relationship type.'),
|
|
|
- '#collapsed' => TRUE,
|
|
|
- '#collapsible' => TRUE,
|
|
|
- '#theme' => 'chado_linker__relationship_instance_settings'
|
|
|
- );
|
|
|
-// $element['instructions'] = array(
|
|
|
-// '#type' => 'item',
|
|
|
-// '#markup' => 'You may provide a list of terms that will be available in a select box
|
|
|
-// as the relationship types. This select box will replace the vocabulary select box if the
|
|
|
-// following value is set.'
|
|
|
-// );
|
|
|
- $vocs = tripal_get_cv_select_options();
|
|
|
- $element['relationships']['option1'] = array(
|
|
|
- '#type' => 'item',
|
|
|
- '#title' => 'Option #1',
|
|
|
- '#description' => t('Use this option to limit the vocabularies that a user .
|
|
|
- could use to specify relationship types. With this option any term in .
|
|
|
- the vocabulary can be used for the relationship type. You may select
|
|
|
- more than one vocabulary.'),
|
|
|
-
|
|
|
- );
|
|
|
- $element['relationships']['option1_vocabs'] = array(
|
|
|
- '#type' => 'select',
|
|
|
- '#multiple' => TRUE,
|
|
|
- '#options' => $vocs,
|
|
|
- '#size' => 6,
|
|
|
- '#default_value' => $this->instance['settings']['relationships']['option1_vocabs'],
|
|
|
- // TODO add ajax here so that the relationship autocomplete below works
|
|
|
- );
|
|
|
-
|
|
|
- $element['relationships']['option2'] = array(
|
|
|
- '#type' => 'item',
|
|
|
- '#title' => '<b>Option #2</b>',
|
|
|
- '#description' => 'Some vocabularies are heirarchichal (an ontology). Within this
|
|
|
- heirarchy groups of related terms typically fall under a common parent. If you
|
|
|
- wish to limit the list of terms that a user can use for the relationship type,
|
|
|
- you can provide the parent term here. Then, only that term\'s children will
|
|
|
- be avilable for use as a relationship type.',
|
|
|
- );
|
|
|
- $element['relationships']['option2_vocab'] = array(
|
|
|
- '#type' => 'select',
|
|
|
- '#description' => 'Specify Default Vocabulary',
|
|
|
- '#multiple' => FALSE,
|
|
|
- '#options' => $vocs,
|
|
|
- '#default_value' => $this->instance['settings']['relationships']['option2_vocab'],
|
|
|
- '#ajax' => array(
|
|
|
- 'callback' => "chado_linker__relationship_instance_settings_form_ajax_callback",
|
|
|
- 'wrapper' => 'relationships-option2-parent',
|
|
|
- 'effect' => 'fade',
|
|
|
- 'method' => 'replace'
|
|
|
- ),
|
|
|
- );
|
|
|
- $element['relationships']['option2_parent'] = array(
|
|
|
- '#type' => 'textfield',
|
|
|
- '#description' => 'Specify a Heirarchical Parent Term',
|
|
|
- '#default_value' => $this->instance['settings']['relationships']['option2_parent'],
|
|
|
- '#autocomplete_path' => "admin/tripal/storage/chado/auto_name/cvterm/",
|
|
|
- '#prefix' => '<div id=relationships-option2-parent>',
|
|
|
- '#suffix' => '</div>'
|
|
|
- );
|
|
|
- $element['relationships']['option3'] = array(
|
|
|
- '#type' => 'item',
|
|
|
- '#title' => 'Option #3',
|
|
|
- '#description' => 'Provide terms separated by a new line. The term provided should be
|
|
|
- unique and distinguishable by the name. You can use a bar | to separate a vocabulary
|
|
|
- and a term to allow more specific assignment.',
|
|
|
- );
|
|
|
- $element['relationships']['relationship_types'] = array(
|
|
|
- '#type' => 'textarea',
|
|
|
- '#default_value' => $this->instance['settings']['relationships']['relationship_types'],
|
|
|
- );
|
|
|
-
|
|
|
- return $element;
|
|
|
-
|
|
|
- }
|
|
|
- /**
|
|
|
- * @see TripalField::instanceSettingsFormValidate()
|
|
|
- */
|
|
|
- public function instanceSettingsFormValidate($form, &$form_state) {
|
|
|
-
|
|
|
- $element = parent::instanceSettingsFormValidate();
|
|
|
-
|
|
|
- // Get relationships settings
|
|
|
- $settings = $form_state['values']['instance']['settings']['relationships'];
|
|
|
- $form_state['values']['instance']['settings']['relationships']['relationship_types']= trim($settings['relationship_types']);
|
|
|
-
|
|
|
- // Make sure only one option is selected
|
|
|
- $option1test = $settings['option1_vocabs'];
|
|
|
- $option1 = isset($settings['option1_vocabs']) && array_pop($option1test);
|
|
|
- $option2 = (isset($settings['option2_vocab']) && $settings['option2_vocab']) || $settings['option2_parent'];
|
|
|
- $option3 = isset($settings['relationship_types']) && trim($settings['relationship_types']);
|
|
|
- if ($option1 && ($option2 || $option3) == 1 ||
|
|
|
- $option2 && ($option1 || $option3) == 1 ||
|
|
|
- $option3 && ($option1 || $option2) == 1
|
|
|
- ) {
|
|
|
- form_set_error(
|
|
|
- "instance][settings][relationships",
|
|
|
- t("Only one option is allowed to limit the relationship types.")
|
|
|
- );
|
|
|
- return;
|
|
|
- }
|
|
|
-
|
|
|
- // For option3, make sure the supplied types are valid cvterms
|
|
|
- if ($option3) {
|
|
|
- $rel_types = explode(PHP_EOL, $settings['relationship_types']);
|
|
|
- foreach($rel_types AS $type) {
|
|
|
- $type = trim($type);
|
|
|
- // Ignore empty lines
|
|
|
- if ($type == '') {
|
|
|
- continue;
|
|
|
- }
|
|
|
- // Find the matching cvterm
|
|
|
- $sql = "SELECT cvterm_id FROM {cvterm} WHERE name = :name";
|
|
|
- $results = chado_query($sql, array(':name' => $type));
|
|
|
- $terms = array();
|
|
|
- while ($obj = $results->fetchObject()) {
|
|
|
- $terms[] = $obj;
|
|
|
- }
|
|
|
- // Don't save the form if a term can not be found or it matches more than one cvterm
|
|
|
- $cv = '';
|
|
|
- if (count($terms) == 0) {
|
|
|
- // If a term can not be found, maybe the type contains '|', parse it as 'vocabulary|cvterm'
|
|
|
- if (strpos($type, '|')) {
|
|
|
- $tmp = explode('|', $type, 2);
|
|
|
- $type = trim($tmp[1]);
|
|
|
- $cv = tripal_get_cv(array('name' => trim($tmp[0])));
|
|
|
- if($cv) {
|
|
|
- $sql = "SELECT cvterm_id FROM {cvterm} WHERE name = :name AND cv_id = :cv_id";
|
|
|
- $results = chado_query($sql, array(':name' => $type, ':cv_id' => $cv->cv_id));
|
|
|
- while ($obj = $results->fetchObject()) {
|
|
|
- $terms[] = $obj;
|
|
|
- }
|
|
|
- }
|
|
|
- else {
|
|
|
- $cv = $tmp[0];
|
|
|
- }
|
|
|
- }
|
|
|
- if (count($terms) != 1) {
|
|
|
- $message = "The term '@type' can not be found.";
|
|
|
- $token = array('@type' => $type);
|
|
|
- if ($cv) {
|
|
|
- $message = "The term '@type' can not be found within the vocabulary '@vocab'.";
|
|
|
- $token['@vocab'] = $cv;
|
|
|
- }
|
|
|
- form_set_error(
|
|
|
- "instance][settings][relationships][relationship_types",
|
|
|
- t($message, $token)
|
|
|
- );
|
|
|
- }
|
|
|
- }
|
|
|
- else if (count($terms) > 1) {
|
|
|
- // If a type matches more than one term, parse it as 'vocabulary|cvterm' and try again
|
|
|
- if (strpos($type, '|')) {
|
|
|
- $tmp = explode('|', $type, 2);
|
|
|
- $type = trim($tmp[1]);
|
|
|
- $cv = tripal_get_cv(array('name' => trim($tmp[0])));
|
|
|
- if ($cv) {
|
|
|
- $sql = "SELECT cvterm_id FROM {cvterm} WHERE name = :name AND cv_id = :cv_id";
|
|
|
- $results = chado_query($sql, array(':name' => $type, ':cv_id' => $cv->cv_id));
|
|
|
- while ($obj = $results->fetchObject()) {
|
|
|
- $terms[] = $obj;
|
|
|
- }
|
|
|
- }
|
|
|
- }
|
|
|
- if(count($terms) != 1) {
|
|
|
- form_set_error(
|
|
|
- "instance][settings][relationships][relationship_types",
|
|
|
- t("The term '@type' matches more than one term. Please specify its vocabulary in
|
|
|
- the format of 'vocabulary|@type'.", array('@type' => $type))
|
|
|
- );
|
|
|
- }
|
|
|
- }
|
|
|
- }
|
|
|
- }
|
|
|
-
|
|
|
- // For option2: Make sure the parent term is a valid cvterm
|
|
|
- if ($option2) {
|
|
|
- $cv_id = $settings['option2_vocab'];
|
|
|
- $supertype = $settings['option2_parent'];
|
|
|
- $term = tripal_get_cvterm(array(
|
|
|
- 'name' => trim($supertype),
|
|
|
- 'cv_id' => $cv_id,
|
|
|
- ));
|
|
|
- // Tripal cv autocomplete also allow cvterm synonyms, if the parent term doesn't match
|
|
|
- // a cvterm, try cvtermsynonym
|
|
|
- if (!$term) {
|
|
|
- $synonym = tripal_get_cvterm(
|
|
|
- array(
|
|
|
- 'synonym' => array(
|
|
|
- 'name' => trim($supertype),
|
|
|
- )
|
|
|
- )
|
|
|
- );
|
|
|
- if ($synonym && $synonym->cv_id->cv_id == $cv_id) {
|
|
|
- $term = $synonym;
|
|
|
- }
|
|
|
- }
|
|
|
- if (!isset($term->cvterm_id)) {
|
|
|
- form_set_error(
|
|
|
- "instance][settings][relationships][option2_parent",
|
|
|
- t("The term '@type' is not a valid term for the vocabulary selected.", array('@type' => $supertype))
|
|
|
- );
|
|
|
- }
|
|
|
- }
|
|
|
- }
|
|
|
-}
|
|
|
-
|
|
|
-/**
|
|
|
- * Theme function for the chado_linker__relationship_widget.
|
|
|
- */
|
|
|
-function theme_chado_linker__relationship_widget($variables) {
|
|
|
- $element = $variables['element'];
|
|
|
- $field_name = $element['#field_name'];
|
|
|
- $field = field_info_field($field_name);
|
|
|
- $field_type = $field['type'];
|
|
|
- $field_table = $field['settings']['chado_table'];
|
|
|
- $field_column = $field['settings']['chado_column'];
|
|
|
- $layout = "
|
|
|
- <div class=\"chado-linker--relationship-widget\">
|
|
|
- <div class=\"chado-linker--relationship-widget-item\">" .
|
|
|
- drupal_render($element['subject_name']) . "
|
|
|
- </div>
|
|
|
- <div class=\"chado-linker--relationship-widget-item\">" .
|
|
|
- drupal_render($element['vocabulary']) . "
|
|
|
- </div>
|
|
|
- <div class=\"chado-linker--relationship-widget-item\">" .
|
|
|
- drupal_render($element['type_name']) . "
|
|
|
- </div>
|
|
|
- <div class=\"chado-linker--relationship-widget-item\">" .
|
|
|
- drupal_render($element['type_id']) . "
|
|
|
- </div>
|
|
|
- <div class=\"chado-linker--relationship-widget-item\">" .
|
|
|
- drupal_render($element['object_name']) . "
|
|
|
- </div>
|
|
|
- </div>
|
|
|
- ";
|
|
|
- return $layout;
|
|
|
-}
|
|
|
-
|
|
|
-function theme_chado_linker__relationship_instance_settings ($variables) {
|
|
|
- $element = $variables['element'];
|
|
|
- $option1 = $element['option1'];
|
|
|
- $option1_vocabs = $element['option1_vocabs'];
|
|
|
- $option2 = $element['option2'];
|
|
|
- $option2_vocab = $element['option2_vocab'];
|
|
|
- $option2_parent = $element['option2_parent'];
|
|
|
- $option3 = $element['option3'];
|
|
|
- $rtype = $element['relationship_types'];
|
|
|
- $layout = drupal_render($option1);
|
|
|
- $layout .= drupal_render($option1_vocabs);
|
|
|
- $layout .=
|
|
|
- drupal_render($option2) .
|
|
|
- "<div class=\"chado-linker--relationship-instance-settings-option2\">" .
|
|
|
- "<div class=\"chado-linker--relationship-instance-settings-option2-item\">" .
|
|
|
- drupal_render($option2_vocab) .
|
|
|
- "</div>" .
|
|
|
- "<div class=\"chado-linker--relationship-instance-settings-option2-item\">" .
|
|
|
- drupal_render($option2_parent) .
|
|
|
- "</div>" .
|
|
|
- "</div>";
|
|
|
- $layout .= drupal_render($option3);
|
|
|
- $layout .= drupal_render($rtype);
|
|
|
- return $layout;
|
|
|
-}
|
|
|
-
|
|
|
-/**
|
|
|
- * An Ajax callback for the relationshp widget.
|
|
|
- */
|
|
|
-function chado_linker__relationship_widget_form_ajax_callback(&$form, $form_state) {
|
|
|
-
|
|
|
- // Get the triggering element
|
|
|
- $form_element_name = $form_state['triggering_element']['#name'];
|
|
|
- preg_match('/(.+?)\[(.+?)\]\[(.+?)\]/', $form_element_name, $matches);
|
|
|
- $field = $matches[1];
|
|
|
- $lang = $matches[2];
|
|
|
- $delta = $matches[3];
|
|
|
- // Return the widget that triggered the AJAX call
|
|
|
- if (isset($form[$field][$lang][$delta])) {
|
|
|
- return $form[$field][$lang][$delta];
|
|
|
- }
|
|
|
- // Alternatively, return the default value widget for the widget setting form
|
|
|
- else {
|
|
|
- return $form['instance']['default_value_widget'][$field];
|
|
|
- }
|
|
|
-}
|
|
|
-
|
|
|
-/**
|
|
|
- * An Ajax callback for the relationshp instance setting form.
|
|
|
- */
|
|
|
-function chado_linker__relationship_instance_settings_form_ajax_callback(&$form, &$form_state) {
|
|
|
- $acpath = $form['instance']['settings']['relationships']['option2_parent']['#autocomplete_path'];
|
|
|
- $acpath .= $form_state['values']['instance']['settings']['relationships']['option2_vocab'] . '/';
|
|
|
- $urlval = $form['instance']['settings']['relationships']['option2_parent']['#autocomplete_input']['#url_value'];
|
|
|
- $urlval .= $form_state['values']['instance']['settings']['relationships']['option2_vocab'];
|
|
|
- // Reset value if a different vocabulary is selected
|
|
|
- $form['instance']['settings']['relationships']['option2_parent']['#value'] = NULL;
|
|
|
- $form_state['values']['instance']['settings']['relationships']['option2_parent'] = NULL;
|
|
|
- $form['instance']['settings']['relationships']['option2_parent']['#autocomplete_path'] = $acpath;
|
|
|
- $form['instance']['settings']['relationships']['option2_parent']['#autocomplete_input']['#url_value'] = $urlval;
|
|
|
- return $form['instance']['settings']['relationships']['option2_parent'];
|
|
|
-}
|
|
|
-
|