tripal/tripal_entities/includes/ChadoDataTypeUIController.inc

<?php

/**
 * @file
 */

/**
 * UI controller.
 */
class ChadoDataTypeUIController extends EntityDefaultUIController {

  /**
   * Overrides hook_menu() defaults.
   */
  public function hook_menu() {
    $items = parent::hook_menu();
    $items[$this->path]['description'] = 'Manage Chado data types, including adding
      and removing fields and the display of fields.';

    // We don't want to let the user add new Chado data types. They
    // are added automatically.
    unset($items[$this->path . '/add']);
    unset($items[$this->path . '/import']);

    return $items;
  }
}
/**
 * Access callback for the entity API.
 */
function chado_data_type_access($op, $type = NULL, $account = NULL) {
  return user_access('administer chado data types', $account);
}

/**
 * Generates the chado data type editing form.
 */
function chado_data_type_form($form, &$form_state, $chado_data_type, $op = 'edit') {

  if ($op == 'clone') {
    $chado_data_type->label .= ' (cloned)';
    $chado_data_type->type = '';
  }

  $form['label'] = array(
    '#title' => t('Label'),
    '#type' => 'textfield',
    '#default_value' => $chado_data_type->label,
    '#description' => t('The human-readable name of this chado data type.'),
    '#required' => TRUE,
    '#size' => 30,
  );
  // Machine-readable type name.
  $form['type'] = array(
    '#type' => 'machine_name',
    '#default_value' => isset($chado_data_type->type) ? $chado_data_type->type : '',
    '#maxlength' => 32,
    //    '#disabled' => $chado_data_type->isLocked() && $op != 'clone',
    '#machine_name' => array(
      'exists' => 'chado_data_get_types',
      'source' => array('label'),
    ),
    '#description' => t('A unique machine-readable name for this chado data type. It must only contain lowercase letters, numbers, and underscores.'),
  );

  $form['data']['#tree'] = TRUE;
  $form['data']['sample_data'] = array(
    '#type' => 'checkbox',
    '#title' => t('An interesting chado data switch'),
    '#default_value' => !empty($chado_data_type->data['sample_data']),
  );

  $form['actions'] = array('#type' => 'actions');
  $form['actions']['submit'] = array(
    '#type' => 'submit',
    '#value' => t('Save chado data type'),
    '#weight' => 40,
  );

  //Locking not supported yet
  /*if (!$chado_data_type->isLocked() && $op != 'add') {
  $form['actions']['delete'] = array(
  '#type' => 'submit',
  '#value' => t('Delete chado data type'),
  '#weight' => 45,
  '#limit_validation_errors' => array(),
  '#submit' => array('chado_data_type_form_submit_delete')
  );
  }*/
  return $form;
}

/**
 * Form API submit callback for the type form.
 */
function chado_data_type_form_submit(&$form, &$form_state) {
  $chado_data_type = entity_ui_form_submit_build_entity($form, $form_state);
  $chado_data_type->save();
  $form_state['redirect'] = 'admin/structure/chado_data_types';
}

/**
 * Form API submit callback for the delete button.
 */
function chado_data_type_form_submit_delete(&$form, &$form_state) {
  $form_state['redirect'] = 'admin/structure/chado_data_types/manage/' . $form_state['chado_data_type']->type . '/delete';
}

/**
 * Menu argument loader; Load a model type by string.
 *
 * @param $type
 *   The machine-readable name of a model type to load.
 * @return
 *   A model type array or FALSE if $type does not exist.
 */
function chado_data_type_load($type) {
  return chado_data_get_types($type);
}