class GenericFieldTest

class GenericFieldTest extends DrupalWebTestCase {
    // Our tests will generate some random field instance
    // names. We store them here so many functions can act on them.
    protected $instanceNames;
    
    /**
     * {@inheritdoc}
     */
    public static function getInfo() {
        return array(
            'name' => 'Generic Field Test',
            'description' => 'Someone neglected to override GenericFieldTest::getInfo().',
            'group' => 'Examples',
        );
    }
    
    /**
     * Supply the field types we wish to test.
     *
     * Return an array of field types to instantiate and test.
     *
     * @return array
     *   The field types we wish to use.
     */
    protected function getFieldTypes() {
        return array(
            'these_are_not',
            'valid_field_types',
            'please_override',
        );
    }
    
    /**
     * The module to enable.
     *
     * @return string
     *   Module machine name.
     */
    protected function getModule() {
        return 'this-is-not-a-module-name-please-override';
    }
    
    /**
     * Simpletest's setUp().
     *
     * We want to be able to subclass this class, so we jump
     * through a few hoops in order to get the modules from args
     * and add our own.
     */
    public function setUp() {
        $this->instanceNames = array();
        $modules = func_get_args();
        if (isset($modules[0]) && is_array($modules[0])) {
            $modules = $modules[0];
        }
        $modules[] = 'node';
        $modules[] = 'field_ui';
        parent::setUp($modules);
    }
    
    /**
     * Verify that all required fields are specified in hook_field_info().
     *
     * The full list is label, description, settings, instance_settings,
     * default_widget, default_formatter, no_ui.
     *
     * Some are optional, and we won't check for those.
     *
     * In a sane world, this would be a unit test, rather than a
     * web test, but module_implements is unavailable to us
     * in unit tests.
     *
     * @see hook_field_info()
     */
    public function runTestGenericFieldInfo() {
        $field_types = $this->getFieldTypes();
        $module = $this->getModule();
        $info_keys = array(
            'label',
            'description',
            'default_widget',
            'default_formatter',
        );
        // We don't want to use field_info_field_types()
        // because there is a hook_field_info_alter().
        // We're testing the module here, not the rest of
        // the system. So invoke hook_field_info() ourselves.
        $modules = module_implements('field_info');
        $this->assertTrue(in_array($module, $modules), 'Module ' . $module . ' implements hook_field_info()');
        foreach ($field_types as $field_type) {
            $field_info = module_invoke($module, 'field_info');
            $this->assertTrue(isset($field_info[$field_type]), 'Module ' . $module . ' defines field type ' . $field_type);
            $field_info = $field_info[$field_type];
            foreach ($info_keys as $key) {
                $this->assertTrue(isset($field_info[$key]), $field_type . "'s " . $key . ' is set.');
            }
        }
    }
    
    /**
     * Add all testable fields as instances to a content type.
     *
     * As a side-effect: Store the names of the instances created
     * in $this->$instance_names.
     *
     * @param object $node_type
     *   A content type object. If none is provided, one will be generated.
     *
     * @return object
     *   The content type object that has the fields attached.
     */
    public function codeTestGenericAddAllFields($node_type = NULL) {
        $this->instanceNames = array();
        if (!$node_type) {
            $node_type = $this->drupalCreateContentType();
        }
        foreach ($this->getFieldTypes() as $field_type) {
            $instance_name = drupal_strtolower($this->randomName(32));
            $field = array(
                'field_name' => $instance_name,
                'type' => $field_type,
            );
            $field = field_create_field($field);
            $instance = array(
                'field_name' => $instance_name,
                'entity_type' => 'node',
                'bundle' => $node_type->name,
                'label' => drupal_strtolower($this->randomName(20)),
            );
            // Finally create the instance.
            $instance = field_create_instance($instance);
            // Reset the caches...
            _field_info_collate_fields(TRUE);
            // Grab this instance.
            $verify_instance = field_info_instance('node', $instance_name, $node_type->name);
            $this->assertTrue($verify_instance, 'Instance object exists.');
            $this->assertTrue($verify_instance != NULL, 'field_info_instance() says ' . $instance_name . ' (' . $node_type->name . ') was created.');
            $this->instanceNames[] = $instance_name;
        }
        return $node_type;
    }
    
    /**
     * Remove all fields in $this->field_names.
     *
     * @param mixed $node_type
     *   A content type object. If none is specified,
     *   the test fails.
     */
    public function codeTestGenericRemoveAllFields($node_type = NULL) {
        if (!$node_type) {
            $this->fail('No node type.');
        }
        if (count($this->instanceNames) < 1) {
            $this->fail('There are no instances to remove.');
            return;
        }
        foreach ($this->instanceNames as $instance_name) {
            $instance = field_info_instance('node', $instance_name, $node_type->name);
            $this->assertTrue($instance, "Instance exists, now we'll delete it.");
            field_delete_field($instance_name);
            $instance = field_info_instance('node', $instance_name, $node_type->name);
            $this->assertFalse($instance, 'Instance was deleted.');
        }
        $this->instanceNames = array();
    }
    
    /**
     * Add and delete all field types through Form API.
     *
     * @access public
     */
    public function formTestGenericFieldNodeAddDeleteForm() {
        // Create and login user.
        $account = $this->drupalCreateUser(array(
            'administer content types',
            'administer fields',
        ));
        $this->drupalLogin($account);
        // Add a content type.
        $node_type = $this->drupalCreateContentType();
        // Add all our testable fields.
        $field_names = $this->formAddAllFields($node_type);
        // Now let's delete all the fields.
        foreach ($field_names as $field_name) {
            // This is the path for the 'delete' link on field admin page.
            $this->drupalGet('admin/structure/types/manage/' . $node_type->name . '/fields/field_' . $field_name . '/delete');
            // Click the 'delete' button.
            $this->drupalPost(NULL, array(), t('Delete'));
            $this->assertText(t('The field @field has been deleted from the @type content type.', array(
                '@field' => $field_name,
                '@type' => $node_type->name,
            )));
        }
    }
    
    /**
     * Add all fields using Form API.
     *
     * @param mixed $node_type
     *   A content type object. If none is specified,
     *   the test fails.
     */
    protected function formAddAllFields($node_type = NULL) {
        if (!$node_type) {
            $this->fail('No content type specified.');
        }
        // Get all our field types.
        $field_types = $this->getFieldTypes();
        // Keep a list of no_ui fields so we can tell the user.
        $unsafe_field_types = array();
        $field_names = array();
        $manage_path = 'admin/structure/types/manage/' . $node_type->name . '/fields';
        foreach ($field_types as $field_type) {
            // Get the field info.
            $field_info = field_info_field_types($field_type);
            // Exclude no_ui field types.
            if (isset($field_info['no_ui']) && $field_info['no_ui']) {
                $unsafe_field_types[] = $field_type;
            }
            else {
                // Generate a name for our field.
                // 26 is max length for field name.
                $field_name = drupal_strtolower($this->randomName(26));
                $field_names[$field_type] = $field_name;
                // Create the field through Form API.
                $this->formCreateField($manage_path, $field_type, $field_name, $field_info['default_widget'], 1);
            }
        }
        // Tell the user which fields we couldn't test.
        if (!empty($unsafe_field_types)) {
            debug('Unable to attach these no_ui fields: ' . implode(', ', $unsafe_field_types));
        }
        // Somehow clicking "save" isn't enough, and we have to
        // rebuild a few caches.
        node_types_rebuild();
        menu_rebuild();
        return $field_names;
    }
    
    /**
     * Create a field using the content type management form.
     *
     * @param mixed $manage_path
     *   Path to our content type management form.
     * @param mixed $field_type
     *   The type of field we're adding.
     * @param mixed $field_name
     *   The name of the field instance we want.
     * @param mixed $widget_type
     *   Which widget would we like?
     * @param mixed $cardinality
     *   Cardinality for this field instance.
     */
    protected function formCreateField($manage_path, $field_type, $field_name, $widget_type, $cardinality) {
        // $manage_path is the field edit form for our content type.
        $this->drupalGet($manage_path);
        $edit = array(
            'fields[_add_new_field][label]' => $field_name,
            'fields[_add_new_field][field_name]' => $field_name,
            'fields[_add_new_field][type]' => $field_type,
            'fields[_add_new_field][widget_type]' => $widget_type,
        );
        $this->drupalPost(NULL, $edit, t('Save'));
        // Assume there are no settings for this,
        // so just press the button.
        $this->drupalPost(NULL, array(), t('Save field settings'));
        $edit = array(
            'field[cardinality]' => (string) $cardinality,
        );
        $this->drupalPost(NULL, $edit, t('Save settings'));
        debug(t('Saved settings for field !field_name with widget !widget_type and cardinality !cardinality', array(
            '!field_name' => $field_name,
            '!widget_type' => $widget_type,
            '!cardinality' => $cardinality,
        )));
        $this->assertText(t('Saved @name configuration.', array(
            '@name' => $field_name,
        )));
    }
    
    /**
     * Create a node with some field content.
     *
     * @return object
     *   Node object for the created node.
     */
    public function createFieldContentForUser($account = NULL, $content = 'testable_content', $node_type = NULL, $instance_name = '', $column = NULL) {
        if (!$column) {
            $this->fail('No column name given.');
            return NULL;
        }
        if (!$account) {
            $account = $this->drupalCreateUser(array(
                'bypass node access',
                'administer content types',
            ));
        }
        $this->drupalLogin($account);
        if (!$node_type) {
            $node_type = $this->codeTestGenericAddAllFields();
        }
        if (!$instance_name) {
            $instance_name = reset($this->instanceNames);
        }
        $field = array();
        $field[LANGUAGE_NONE][0][$column] = $content;
        $settings = array(
            'type' => $node_type->name,
            $instance_name => $field,
        );
        $node = $this->drupalCreateNode($settings);
        $this->assertTrue($node, 'Node of type ' . $node->type . ' allegedly created.');
        $node = node_load($node->nid);
        debug('Loaded node id: ' . $node->nid);
        $this->assertTrue($node->{$instance_name}, 'Field actually created.');
        $field = $node->{$instance_name};
        $this->assertTrue($field[LANGUAGE_NONE][0][$column] == $content, 'Content was stored properly on the field.');
        return $node;
    }

}