Club Drupal

<?php

/**

 * @file

 * Unit tests for the Drupal Form API.

 */

class FormsTestCase extends DrupalWebTestCase {

  public static function getInfo() {

    return array(

      'name' => 'Form element validation',

      'description' => 'Tests various form element validation mechanisms.',

      'group' => 'Form API',

    );

  }

  function setUp() {

    parent::setUp('form_test');

  }

  /**

   * Check several empty values for required forms elements.

   *

   * Carriage returns, tabs, spaces, and unchecked checkbox elements are not

   * valid content for a required field.

   *

   * If the form field is found in form_get_errors() then the test pass.

   */

  function testRequiredFields() {

    // Originates from http://drupal.org/node/117748

    // Sets of empty strings and arrays.

    $empty_strings = array('""' => "", '"\n"' => "\n", '" "' => " ", '"\t"' => "\t", '" \n\t "' => " \n\t ", '"\n\n\n\n\n"' => "\n\n\n\n\n");

    $empty_arrays = array('array()' => array());

    $empty_checkbox = array(NULL);

    $elements['textfield']['element'] = array('#title' => $this->randomName(), '#type' => 'textfield');

    $elements['textfield']['empty_values'] = $empty_strings;

    $elements['password']['element'] = array('#title' => $this->randomName(), '#type' => 'password');

    $elements['password']['empty_values'] = $empty_strings;

    $elements['password_confirm']['element'] = array('#title' => $this->randomName(), '#type' => 'password_confirm');

    // Provide empty values for both password fields.

    foreach ($empty_strings as $key => $value) {

      $elements['password_confirm']['empty_values'][$key] = array('pass1' => $value, 'pass2' => $value);

    }

    $elements['textarea']['element'] = array('#title' => $this->randomName(), '#type' => 'textarea');

    $elements['textarea']['empty_values'] = $empty_strings;

    $elements['radios']['element'] = array('#title' => $this->randomName(), '#type' => 'radios', '#options' => array('' => t('None'), $this->randomName(), $this->randomName(), $this->randomName()));

    $elements['radios']['empty_values'] = $empty_arrays;

    $elements['checkbox']['element'] = array('#title' => $this->randomName(), '#type' => 'checkbox', '#required' => TRUE);

    $elements['checkbox']['empty_values'] = $empty_checkbox;

    $elements['checkboxes']['element'] = array('#title' => $this->randomName(), '#type' => 'checkboxes', '#options' => array($this->randomName(), $this->randomName(), $this->randomName()));

    $elements['checkboxes']['empty_values'] = $empty_arrays;

    $elements['select']['element'] = array('#title' => $this->randomName(), '#type' => 'select', '#options' => array('' => t('None'), $this->randomName(), $this->randomName(), $this->randomName()));

    $elements['select']['empty_values'] = $empty_strings;

    $elements['file']['element'] = array('#title' => $this->randomName(), '#type' => 'file');

    $elements['file']['empty_values'] = $empty_strings;

    // Regular expression to find the expected marker on required elements.

    $required_marker_preg = '@<label.*<span class="form-required" title="This field is required\.">\*</span></label>@';

    // Go through all the elements and all the empty values for them.

    foreach ($elements as $type => $data) {

      foreach ($data['empty_values'] as $key => $empty) {

        foreach (array(TRUE, FALSE) as $required) {

          $form_id = $this->randomName();

          $form = array();

          $form_state = form_state_defaults();

          form_clear_error();

          $form['op'] = array('#type' => 'submit', '#value' => t('Submit'));

          $element = $data['element']['#title'];

          $form[$element] = $data['element'];

          $form[$element]['#required'] = $required;

          $form_state['input'][$element] = $empty;

          $form_state['input']['form_id'] = $form_id;

          $form_state['method'] = 'post';

          // The form token CSRF protection should not interfere with this test,

          // so we bypass it by marking this test form as programmed.

          $form_state['programmed'] = TRUE;

          drupal_prepare_form($form_id, $form, $form_state);

          drupal_process_form($form_id, $form, $form_state);

          $errors = form_get_errors();

          // Form elements of type 'radios' throw all sorts of PHP notices

          // when you try to render them like this, so we ignore those for

          // testing the required marker.

          // @todo Fix this work-around (http://drupal.org/node/588438).

          $form_output = ($type == 'radios') ? '' : drupal_render($form);

          if ($required) {

            // Make sure we have a form error for this element.

            $this->assertTrue(isset($errors[$element]), "Check empty($key) '$type' field '$element'");

            if (!empty($form_output)) {

              // Make sure the form element is marked as required.

              $this->assertTrue(preg_match($required_marker_preg, $form_output), "Required '$type' field is marked as required");

            }

          }

          else {

            if (!empty($form_output)) {

              // Make sure the form element is *not* marked as required.

              $this->assertFalse(preg_match($required_marker_preg, $form_output), "Optional '$type' field is not marked as required");

            }

            if ($type == 'select') {

              // Select elements are going to have validation errors with empty

              // input, since those are illegal choices. Just make sure the

              // error is not "field is required".

              $this->assertTrue((empty($errors[$element]) || strpos('field is required', $errors[$element]) === FALSE), "Optional '$type' field '$element' is not treated as a required element");

            }

            else {

              // Make sure there is *no* form error for this element.

              $this->assertTrue(empty($errors[$element]), "Optional '$type' field '$element' has no errors with empty input");

            }

          }

        }

      }

    }

    // Clear the expected form error messages so they don't appear as exceptions.

    drupal_get_messages();

  }

  /**

   * Tests validation for required checkbox, select, and radio elements.

   *

   * Submits a test form containing several types of form elements. The form

   * is submitted twice, first without values for required fields and then

   * with values. Each submission is checked for relevant error messages.

   *

   * @see form_test_validate_required_form()

   */

  function testRequiredCheckboxesRadio() {

    $form = $form_state = array();

    $form = form_test_validate_required_form($form, $form_state);

    // Attempt to submit the form with no required fields set.

    $edit = array();

    $this->drupalPost('form-test/validate-required', $edit, 'Submit');

    // The only error messages that should appear are the relevant 'required'

    // messages for each field.

    $expected = array();

    foreach (array('textfield', 'checkboxes', 'select', 'radios') as $key) {

      $expected[] = t('!name field is required.', array('!name' => $form[$key]['#title']));

    }

    // Check the page for error messages.

    $errors = $this->xpath('//div[contains(@class, "error")]//li');

    foreach ($errors as $error) {

      $expected_key = array_search($error[0], $expected);

      // If the error message is not one of the expected messages, fail.

      if ($expected_key === FALSE) {

        $this->fail(format_string("Unexpected error message: @error", array('@error' => $error[0])));

      }

      // Remove the expected message from the list once it is found.

      else {

        unset($expected[$expected_key]);

      }

    }

    // Fail if any expected messages were not found.

    foreach ($expected as $not_found) {

      $this->fail(format_string("Found error message: @error", array('@error' => $not_found)));

    }

    // Verify that input elements are still empty.

    $this->assertFieldByName('textfield', '');

    $this->assertNoFieldChecked('edit-checkboxes-foo');

    $this->assertNoFieldChecked('edit-checkboxes-bar');

    $this->assertOptionSelected('edit-select', '');

    $this->assertNoFieldChecked('edit-radios-foo');

    $this->assertNoFieldChecked('edit-radios-bar');

    $this->assertNoFieldChecked('edit-radios-optional-foo');

    $this->assertNoFieldChecked('edit-radios-optional-bar');

    $this->assertNoFieldChecked('edit-radios-optional-default-value-false-foo');

    $this->assertNoFieldChecked('edit-radios-optional-default-value-false-bar');

    // Submit again with required fields set and verify that there are no

    // error messages.

    $edit = array(

      'textfield' => $this->randomString(),

      'checkboxes[foo]' => TRUE,

      'select' => 'foo',

      'radios' => 'bar',

    );

    $this->drupalPost(NULL, $edit, 'Submit');

    $this->assertNoFieldByXpath('//div[contains(@class, "error")]', FALSE, 'No error message is displayed when all required fields are filled.');

    $this->assertRaw("The form_test_validate_required_form form was submitted successfully.", 'Validation form submitted successfully.');

  }

  /**

   * Tests validation for required textfield element without title.

   *

   * Submits a test form containing a textfield form elements without title.

   * The form is submitted twice, first without value for the required field

   * and then with value. Each submission is checked for relevant error

   * messages.

   *

   * @see form_test_validate_required_form_no_title()

   */

  function testRequiredTextfieldNoTitle() {

    $form = $form_state = array();

    $form = form_test_validate_required_form_no_title($form, $form_state);

    // Attempt to submit the form with no required field set.

    $edit = array();

    $this->drupalPost('form-test/validate-required-no-title', $edit, 'Submit');

    $this->assertNoRaw("The form_test_validate_required_form_no_title form was submitted successfully.", 'Validation form submitted successfully.');

    // Check the page for the error class on the textfield.

    $this->assertFieldByXPath('//input[contains(@class, "error")]', FALSE, 'Error input form element class found.');

    // Submit again with required fields set and verify that there are no

    // error messages.

    $edit = array(

      'textfield' => $this->randomString(),

    );

    $this->drupalPost(NULL, $edit, 'Submit');

    $this->assertNoFieldByXpath('//input[contains(@class, "error")]', FALSE, 'No error input form element class found.');

    $this->assertRaw("The form_test_validate_required_form_no_title form was submitted successfully.", 'Validation form submitted successfully.');

  }

  /**

   * Test default value handling for checkboxes.

   *

   * @see _form_test_checkbox()

   */

  function testCheckboxProcessing() {

    // First, try to submit without the required checkbox.

    $edit = array();

    $this->drupalPost('form-test/checkbox', $edit, t('Submit'));

    $this->assertRaw(t('!name field is required.', array('!name' => 'required_checkbox')), 'A required checkbox is actually mandatory');

    // Now try to submit the form correctly.

    $values = drupal_json_decode($this->drupalPost(NULL, array('required_checkbox' => 1), t('Submit')));

    $expected_values = array(

      'disabled_checkbox_on' => 'disabled_checkbox_on',

      'disabled_checkbox_off' => '',

      'checkbox_on' => 'checkbox_on',

      'checkbox_off' => '',

      'zero_checkbox_on' => '0',

      'zero_checkbox_off' => '',

    );

    foreach ($expected_values as $widget => $expected_value) {

      $this->assertEqual($values[$widget], $expected_value, format_string('Checkbox %widget returns expected value (expected: %expected, got: %value)', array(

        '%widget' => var_export($widget, TRUE),

        '%expected' => var_export($expected_value, TRUE),

        '%value' => var_export($values[$widget], TRUE),

      )));

    }

  }

  /**

   * Tests validation of #type 'select' elements.

   */

  function testSelect() {

    $form = $form_state = array();

    $form = form_test_select($form, $form_state);

    $error = '!name field is required.';

    $this->drupalGet('form-test/select');

    // Posting without any values should throw validation errors.

    $this->drupalPost(NULL, array(), 'Submit');

    $this->assertNoText(t($error, array('!name' => $form['select']['#title'])));

    $this->assertNoText(t($error, array('!name' => $form['select_required']['#title'])));

    $this->assertNoText(t($error, array('!name' => $form['select_optional']['#title'])));

    $this->assertNoText(t($error, array('!name' => $form['empty_value']['#title'])));

    $this->assertNoText(t($error, array('!name' => $form['empty_value_one']['#title'])));

    $this->assertText(t($error, array('!name' => $form['no_default']['#title'])));

    $this->assertNoText(t($error, array('!name' => $form['no_default_optional']['#title'])));

    $this->assertText(t($error, array('!name' => $form['no_default_empty_option']['#title'])));

    $this->assertNoText(t($error, array('!name' => $form['no_default_empty_option_optional']['#title'])));

    $this->assertText(t($error, array('!name' => $form['no_default_empty_value']['#title'])));

    $this->assertText(t($error, array('!name' => $form['no_default_empty_value_one']['#title'])));

    $this->assertNoText(t($error, array('!name' => $form['no_default_empty_value_optional']['#title'])));

    $this->assertNoText(t($error, array('!name' => $form['multiple']['#title'])));

    $this->assertNoText(t($error, array('!name' => $form['multiple_no_default']['#title'])));

    $this->assertText(t($error, array('!name' => $form['multiple_no_default_required']['#title'])));

    // Post values for required fields.

    $edit = array(

      'no_default' => 'three',

      'no_default_empty_option' => 'three',

      'no_default_empty_value' => 'three',

      'no_default_empty_value_one' => 'three',

      'multiple_no_default_required[]' => 'three',

    );

    $this->drupalPost(NULL, $edit, 'Submit');

    $values = drupal_json_decode($this->drupalGetContent());

    // Verify expected values.

    $expected = array(

      'select' => 'one',

      'empty_value' => 'one',

      'empty_value_one' => 'one',

      'no_default' => 'three',

      'no_default_optional' => 'one',

      'no_default_optional_empty_value' => '',

      'no_default_empty_option' => 'three',

      'no_default_empty_option_optional' => '',

      'no_default_empty_value' => 'three',

      'no_default_empty_value_one' => 'three',

      'no_default_empty_value_optional' => 0,

      'multiple' => array('two' => 'two'),

      'multiple_no_default' => array(),

      'multiple_no_default_required' => array('three' => 'three'),

    );

    foreach ($expected as $key => $value) {

      $this->assertIdentical($values[$key], $value, format_string('@name: @actual is equal to @expected.', array(

        '@name' => $key,

        '@actual' => var_export($values[$key], TRUE),

        '@expected' => var_export($value, TRUE),

      )));

    }

  }

  /**

   * Test handling of disabled elements.

   *

   * @see _form_test_disabled_elements()

   */

  function testDisabledElements() {

    // Get the raw form in its original state.

    $form_state = array();

    $form = _form_test_disabled_elements(array(), $form_state);

    // Build a submission that tries to hijack the form by submitting input for

    // elements that are disabled.

    $edit = array();

    foreach (element_children($form) as $key) {

      if (isset($form[$key]['#test_hijack_value'])) {

        if (is_array($form[$key]['#test_hijack_value'])) {

          foreach ($form[$key]['#test_hijack_value'] as $subkey => $value) {

            $edit[$key . '[' . $subkey . ']'] = $value;

          }

        }

        else {

          $edit[$key] = $form[$key]['#test_hijack_value'];

        }

      }

    }

    // Submit the form with no input, as the browser does for disabled elements,

    // and fetch the $form_state['values'] that is passed to the submit handler.

    $this->drupalPost('form-test/disabled-elements', array(), t('Submit'));

    $returned_values['normal'] = drupal_json_decode($this->content);

    // Do the same with input, as could happen if JavaScript un-disables an

    // element. drupalPost() emulates a browser by not submitting input for

    // disabled elements, so we need to un-disable those elements first.

    $this->drupalGet('form-test/disabled-elements');

    $disabled_elements = array();

    foreach ($this->xpath('//*[@disabled]') as $element) {

      $disabled_elements[] = (string) $element['name'];

      unset($element['disabled']);

    }

    // All the elements should be marked as disabled, including the ones below

    // the disabled container.

    $this->assertEqual(count($disabled_elements), 32, 'The correct elements have the disabled property in the HTML code.');

    $this->drupalPost(NULL, $edit, t('Submit'));

    $returned_values['hijacked'] = drupal_json_decode($this->content);

    // Ensure that the returned values match the form's default values in both

    // cases.

    foreach ($returned_values as $type => $values) {

      $this->assertFormValuesDefault($values, $form);

    }

  }

  /**

   * Assert that the values submitted to a form matches the default values of the elements.

   */

  function assertFormValuesDefault($values, $form) {

    foreach (element_children($form) as $key) {

      if (isset($form[$key]['#default_value'])) {

        if (isset($form[$key]['#expected_value'])) {

          $expected_value = $form[$key]['#expected_value'];

        }

        else {

          $expected_value = $form[$key]['#default_value'];

        }

        if ($key == 'checkboxes_multiple') {

          // Checkboxes values are not filtered out.

          $values[$key] = array_filter($values[$key]);

        }

        $this->assertIdentical($expected_value, $values[$key], format_string('Default value for %type: expected %expected, returned %returned.', array('%type' => $key, '%expected' => var_export($expected_value, TRUE), '%returned' => var_export($values[$key], TRUE))));

      }

      // Recurse children.

      $this->assertFormValuesDefault($values, $form[$key]);

    }

  }

  /**

   * Verify markup for disabled form elements.

   *

   * @see _form_test_disabled_elements()

   */

  function testDisabledMarkup() {

    $this->drupalGet('form-test/disabled-elements');

    $form_state = array();

    $form = _form_test_disabled_elements(array(), $form_state);

    $type_map = array(

      'textarea' => 'textarea',

      'select' => 'select',

      'weight' => 'select',

      'date' => 'select',

    );

    foreach ($form as $name => $item) {

      // Skip special #types.

      if (!isset($item['#type']) || in_array($item['#type'], array('hidden', 'text_format'))) {

        continue;

      }

      // Setup XPath and CSS class depending on #type.

      if (in_array($item['#type'], array('image_button', 'button', 'submit'))) {

        $path = "//!type[contains(@class, :div-class) and @value=:value]";

        $class = 'form-button-disabled';

      }

      else {

        // starts-with() required for checkboxes.

        $path = "//div[contains(@class, :div-class)]/descendant::!type[starts-with(@name, :name)]";

        $class = 'form-disabled';

      }

      // Replace DOM element name in $path according to #type.

      $type = 'input';

      if (isset($type_map[$item['#type']])) {

        $type = $type_map[$item['#type']];

      }

      $path = strtr($path, array('!type' => $type));

      // Verify that the element exists.

      $element = $this->xpath($path, array(

        ':name' => check_plain($name),

        ':div-class' => $class,

        ':value' => isset($item['#value']) ? $item['#value'] : '',

      ));

      $this->assertTrue(isset($element[0]), format_string('Disabled form element class found for #type %type.', array('%type' => $item['#type'])));

    }

    // Verify special element #type text-format.

    $element = $this->xpath('//div[contains(@class, :div-class)]/descendant::textarea[@name=:name]', array(

      ':name' => 'text_format[value]',

      ':div-class' => 'form-disabled',

    ));

    $this->assertTrue(isset($element[0]), format_string('Disabled form element class found for #type %type.', array('%type' => 'text_format[value]')));

    $element = $this->xpath('//div[contains(@class, :div-class)]/descendant::select[@name=:name]', array(

      ':name' => 'text_format[format]',

      ':div-class' => 'form-disabled',

    ));

    $this->assertTrue(isset($element[0]), format_string('Disabled form element class found for #type %type.', array('%type' => 'text_format[format]')));

  }

  /**

   * Test Form API protections against input forgery.

   *

   * @see _form_test_input_forgery()

   */

  function testInputForgery() {

    $this->drupalGet('form-test/input-forgery');

    $checkbox = $this->xpath('//input[@name="checkboxes[two]"]');

    $checkbox[0]['value'] = 'FORGERY';

    $this->drupalPost(NULL, array('checkboxes[one]' => TRUE, 'checkboxes[two]' => TRUE), t('Submit'));

    $this->assertText('An illegal choice has been detected.', 'Input forgery was detected.');

  }

}

/**

 * Tests building and processing of core form elements.

 */

class FormElementTestCase extends DrupalWebTestCase {

  protected $profile = 'testing';

  public static function getInfo() {

    return array(

      'name' => 'Element processing',

      'description' => 'Tests building and processing of core form elements.',

      'group' => 'Form API',

    );

  }

  function setUp() {

    parent::setUp(array('form_test'));

  }

  /**

   * Tests expansion of #options for #type checkboxes and radios.

   */

  function testOptions() {

    $this->drupalGet('form-test/checkboxes-radios');

    // Verify that all options appear in their defined order.

    foreach (array('checkbox', 'radio') as $type) {

      $elements = $this->xpath('//input[@type=:type]', array(':type' => $type));

      $expected_values = array('0', 'foo', '1', 'bar', '>');

      foreach ($elements as $element) {

        $expected = array_shift($expected_values);

        $this->assertIdentical((string) $element['value'], $expected);

      }

    }

    // Enable customized option sub-elements.

    $this->drupalGet('form-test/checkboxes-radios/customize');

    // Verify that all options appear in their defined order, taking a custom

    // #weight into account.

    foreach (array('checkbox', 'radio') as $type) {

      $elements = $this->xpath('//input[@type=:type]', array(':type' => $type));

      $expected_values = array('0', 'foo', 'bar', '>', '1');

      foreach ($elements as $element) {

        $expected = array_shift($expected_values);

        $this->assertIdentical((string) $element['value'], $expected);

      }

    }

    // Verify that custom #description properties are output.

    foreach (array('checkboxes', 'radios') as $type) {

      $elements = $this->xpath('//input[@id=:id]/following-sibling::div[@class=:class]', array(

        ':id' => 'edit-' . $type . '-foo',

        ':class' => 'description',

      ));

      $this->assertTrue(count($elements), format_string('Custom %type option description found.', array(

        '%type' => $type,

      )));

    }

  }

}

/**

 * Test form alter hooks.

 */

class FormAlterTestCase extends DrupalWebTestCase {

  public static function getInfo() {

    return array(

      'name' => 'Form alter hooks',

      'description' => 'Tests hook_form_alter() and hook_form_FORM_ID_alter().',

      'group' => 'Form API',

    );

  }

  function setUp() {

    parent::setUp('form_test');

  }

  /**

   * Tests execution order of hook_form_alter() and hook_form_FORM_ID_alter().

   */

  function testExecutionOrder() {

    $this->drupalGet('form-test/alter');

    // Ensure that the order is first by module, then for a given module, the

    // id-specific one after the generic one.

    $expected = array(

      'block_form_form_test_alter_form_alter() executed.',

      'form_test_form_alter() executed.',

      'form_test_form_form_test_alter_form_alter() executed.',

      'system_form_form_test_alter_form_alter() executed.',

    );

    $content = preg_replace('/\s+/', ' ', filter_xss($this->content, array()));

    $this->assert(strpos($content, implode(' ', $expected)) !== FALSE, 'Form alter hooks executed in the expected order.');

  }

}

/**

 * Test form validation handlers.

 */

class FormValidationTestCase extends DrupalWebTestCase {

  public static function getInfo() {

    return array(

      'name' => 'Form validation handlers',

      'description' => 'Tests form processing and alteration via form validation handlers.',

      'group' => 'Form API',

    );

  }

  function setUp() {

    parent::setUp('form_test');

  }

  /**

   * Tests form alterations by #element_validate, #validate, and form_set_value().

   */

  function testValidate() {

    $this->drupalGet('form-test/validate');

    // Verify that #element_validate handlers can alter the form and submitted

    // form values.

    $edit = array(

      'name' => 'element_validate',

    );

    $this->drupalPost(NULL, $edit, 'Save');

    $this->assertFieldByName('name', '#value changed by #element_validate', 'Form element #value was altered.');

    $this->assertText('Name value: value changed by form_set_value() in #element_validate', 'Form element value in $form_state was altered.');

    // Verify that #validate handlers can alter the form and submitted

    // form values.

    $edit = array(

      'name' => 'validate',

    );

    $this->drupalPost(NULL, $edit, 'Save');

    $this->assertFieldByName('name', '#value changed by #validate', 'Form element #value was altered.');

    $this->assertText('Name value: value changed by form_set_value() in #validate', 'Form element value in $form_state was altered.');

    // Verify that #element_validate handlers can make form elements

    // inaccessible, but values persist.

    $edit = array(

      'name' => 'element_validate_access',

    );

    $this->drupalPost(NULL, $edit, 'Save');

    $this->assertNoFieldByName('name', 'Form element was hidden.');

    $this->assertText('Name value: element_validate_access', 'Value for inaccessible form element exists.');

    // Verify that value for inaccessible form element persists.

    $this->drupalPost(NULL, array(), 'Save');

    $this->assertNoFieldByName('name', 'Form element was hidden.');

    $this->assertText('Name value: element_validate_access', 'Value for inaccessible form element exists.');

    // Verify that #validate handlers don't run if the CSRF token is invalid.

    $this->drupalLogin($this->drupalCreateUser());

    $this->drupalGet('form-test/validate');

    $edit = array(

      'name' => 'validate',

      'form_token' => 'invalid token'

    );

    $this->drupalPost(NULL, $edit, 'Save');

    $this->assertNoFieldByName('name', '#value changed by #validate', 'Form element #value was not altered.');

    $this->assertNoText('Name value: value changed by form_set_value() in #validate', 'Form element value in $form_state was not altered.');

    $this->assertText('The form has become outdated. Copy any unsaved work in the form below');

  }

  /**

   * Tests partial form validation through #limit_validation_errors.

   */

  function testValidateLimitErrors() {

    $edit = array(

      'test' => 'invalid',

      'test_numeric_index[0]' => 'invalid',

      'test_substring[foo]' => 'invalid',

    );

    $path = 'form-test/limit-validation-errors';

    // Submit the form by pressing the 'Partial validate' button (uses

    // #limit_validation_errors) and ensure that the title field is not

    // validated, but the #element_validate handler for the 'test' field

    // is triggered.

    $this->drupalPost($path, $edit, t('Partial validate'));

    $this->assertNoText(t('!name field is required.', array('!name' => 'Title')));

    $this->assertText('Test element is invalid');

    // Edge case of #limit_validation_errors containing numeric indexes: same

    // thing with the 'Partial validate (numeric index)' button and the

    // 'test_numeric_index' field.

    $this->drupalPost($path, $edit, t('Partial validate (numeric index)'));

    $this->assertNoText(t('!name field is required.', array('!name' => 'Title')));

    $this->assertText('Test (numeric index) element is invalid');

    // Ensure something like 'foobar' isn't considered "inside" 'foo'.

    $this->drupalPost($path, $edit, t('Partial validate (substring)'));

    $this->assertNoText(t('!name field is required.', array('!name' => 'Title')));

    $this->assertText('Test (substring) foo element is invalid');

    // Ensure not validated values are not available to submit handlers.

    $this->drupalPost($path, array('title' => '', 'test' => 'valid'), t('Partial validate'));

    $this->assertText('Only validated values appear in the form values.');

    // Now test full form validation and ensure that the #element_validate

    // handler is still triggered.

    $this->drupalPost($path, $edit, t('Full validate'));

    $this->assertText(t('!name field is required.', array('!name' => 'Title')));

    $this->assertText('Test element is invalid');

  }

  /**

   *  Tests error border of multiple fields with same name in a page.

   */

  function testMultiFormSameNameErrorClass() {

    $this->drupalGet('form-test/double-form');

    $edit = array();

    $this->drupalPost(NULL, $edit, t('Save'));

    $this->assertFieldByXpath('//input[@id="edit-name" and contains(@class, "error")]', NULL, 'Error input form element class found for first element.');

    $this->assertNoFieldByXpath('//input[@id="edit-name--2" and contains(@class, "error")]', NULL, 'No error input form element class found for second element.');

  }

}

/**

 * Test form element labels, required markers and associated output.

 */

class FormsElementsLabelsTestCase extends DrupalWebTestCase {

  public static function getInfo() {

    return array(

      'name' => 'Form element and label output test',

      'description' => 'Test form element labels, required markers and associated output.',

      'group' => 'Form API',

    );

  }

  function setUp() {

    parent::setUp('form_test');

  }

  /**

   * Test form elements, labels, title attibutes and required marks output

   * correctly and have the correct label option class if needed.

   */

  function testFormLabels() {

    $this->drupalGet('form_test/form-labels');

    // Check that the checkbox/radio processing is not interfering with

    // basic placement.

    $elements = $this->xpath('//input[@id="edit-form-checkboxes-test-third-checkbox"]/following-sibling::label[@for="edit-form-checkboxes-test-third-checkbox" and @class="option"]');

    $this->assertTrue(isset($elements[0]), "Label follows field and label option class correct for regular checkboxes.");

    // Make sure the label is rendered for checkboxes.

    $elements = $this->xpath('//input[@id="edit-form-checkboxes-test-0"]/following-sibling::label[@for="edit-form-checkboxes-test-0" and @class="option"]');

    $this->assertTrue(isset($elements[0]), "Label 0 found checkbox.");

    $elements = $this->xpath('//input[@id="edit-form-radios-test-second-radio"]/following-sibling::label[@for="edit-form-radios-test-second-radio" and @class="option"]');

    $this->assertTrue(isset($elements[0]), "Label follows field and label option class correct for regular radios.");

    // Make sure the label is rendered for radios.

    $elements = $this->xpath('//input[@id="edit-form-radios-test-0"]/following-sibling::label[@for="edit-form-radios-test-0" and @class="option"]');

    $this->assertTrue(isset($elements[0]), "Label 0 found radios.");

    // Exercise various defaults for checkboxes and modifications to ensure

    // appropriate override and correct behavior.

    $elements = $this->xpath('//input[@id="edit-form-checkbox-test"]/following-sibling::label[@for="edit-form-checkbox-test" and @class="option"]');

    $this->assertTrue(isset($elements[0]), "Label follows field and label option class correct for a checkbox by default.");

    // Exercise various defaults for textboxes and modifications to ensure

    // appropriate override and correct behavior.

    $elements = $this->xpath('//label[@for="edit-form-textfield-test-title-and-required"]/child::span[@class="form-required"]/parent::*/following-sibling::input[@id="edit-form-textfield-test-title-and-required"]');

    $this->assertTrue(isset($elements[0]), "Label precedes textfield, with required marker inside label.");

    $elements = $this->xpath('//input[@id="edit-form-textfield-test-no-title-required"]/preceding-sibling::label[@for="edit-form-textfield-test-no-title-required"]/span[@class="form-required"]');

    $this->assertTrue(isset($elements[0]), "Label tag with required marker precedes required textfield with no title.");

    $elements = $this->xpath('//input[@id="edit-form-textfield-test-title-invisible"]/preceding-sibling::label[@for="edit-form-textfield-test-title-invisible" and @class="element-invisible"]');

    $this->assertTrue(isset($elements[0]), "Label preceding field and label class is element-invisible.");

    $elements = $this->xpath('//input[@id="edit-form-textfield-test-title"]/preceding-sibling::span[@class="form-required"]');

    $this->assertFalse(isset($elements[0]), "No required marker on non-required field.");

    $elements = $this->xpath('//input[@id="edit-form-textfield-test-title-after"]/following-sibling::label[@for="edit-form-textfield-test-title-after" and @class="option"]');

    $this->assertTrue(isset($elements[0]), "Label after field and label option class correct for text field.");

    $elements = $this->xpath('//label[@for="edit-form-textfield-test-title-no-show"]');

    $this->assertFalse(isset($elements[0]), "No label tag when title set not to display.");

    // Check #field_prefix and #field_suffix placement.

    $elements = $this->xpath('//span[@class="field-prefix"]/following-sibling::div[@id="edit-form-radios-test"]');

    $this->assertTrue(isset($elements[0]), "Properly placed the #field_prefix element after the label and before the field.");

    $elements = $this->xpath('//span[@class="field-suffix"]/preceding-sibling::div[@id="edit-form-radios-test"]');

    $this->assertTrue(isset($elements[0]), "Properly places the #field_suffix element immediately after the form field.");

    // Check #prefix and #suffix placement.

    $elements = $this->xpath('//div[@id="form-test-textfield-title-prefix"]/following-sibling::div[contains(@class, \'form-item-form-textfield-test-title\')]');

    $this->assertTrue(isset($elements[0]), "Properly places the #prefix element before the form item.");

    $elements = $this->xpath('//div[@id="form-test-textfield-title-suffix"]/preceding-sibling::div[contains(@class, \'form-item-form-textfield-test-title\')]');

    $this->assertTrue(isset($elements[0]), "Properly places the #suffix element before the form item.");

    // Check title attribute for radios and checkboxes.

    $elements = $this->xpath('//div[@id="edit-form-checkboxes-title-attribute"]');

    $this->assertEqual($elements[0]['title'], 'Checkboxes test' . ' (' . t('Required') . ')', 'Title attribute found.');

    $elements = $this->xpath('//div[@id="edit-form-radios-title-attribute"]');

    $this->assertEqual($elements[0]['title'], 'Radios test' . ' (' . t('Required') . ')', 'Title attribute found.');

  }

}

/**

 * Test the tableselect form element for expected behavior.

 */

class FormsElementsTableSelectFunctionalTest extends DrupalWebTestCase {

  public static function getInfo() {

    return array(

      'name' => 'Tableselect form element type test',

      'description' => 'Test the tableselect element for expected behavior',

      'group' => 'Form API',

    );

  }

  function setUp() {

    parent::setUp('form_test');

  }

  /**

   * Test the display of checkboxes when #multiple is TRUE.

   */

  function testMultipleTrue() {

    $this->drupalGet('form_test/tableselect/multiple-true');

    $this->assertNoText(t('Empty text.'), 'Empty text should not be displayed.');

    // Test for the presence of the Select all rows tableheader.

    $this->assertFieldByXPath('//th[@class="select-all"]', NULL, 'Presence of the "Select all" checkbox.');

    $rows = array('row1', 'row2', 'row3');

    foreach ($rows as $row) {

      $this->assertFieldByXPath('//input[@type="checkbox"]', $row, format_string('Checkbox for value @row.', array('@row' => $row)));

    }

  }

  /**

   * Test the display of radios when #multiple is FALSE.

   */

  function testMultipleFalse() {

    $this->drupalGet('form_test/tableselect/multiple-false');

    $this->assertNoText(t('Empty text.'), 'Empty text should not be displayed.');

    // Test for the absence of the Select all rows tableheader.

    $this->assertNoFieldByXPath('//th[@class="select-all"]', '', 'Absence of the "Select all" checkbox.');

    $rows = array('row1', 'row2', 'row3');

    foreach ($rows as $row) {

      $this->assertFieldByXPath('//input[@type="radio"]', $row, format_string('Radio button for value @row.', array('@row' => $row)));

    }

  }

  /**

   * Test the display of the #empty text when #options is an empty array.

   */

  function testEmptyText() {

    $this->drupalGet('form_test/tableselect/empty-text');

    $this->assertText(t('Empty text.'), 'Empty text should be displayed.');

  }

  /**

   * Test the submission of single and multiple values when #multiple is TRUE.

   */

  function testMultipleTrueSubmit() {

    // Test a submission with one checkbox checked.

    $edit = array();

    $edit['tableselect[row1]'] = TRUE;

    $this->drupalPost('form_test/tableselect/multiple-true', $edit, 'Submit');

    $this->assertText(t('Submitted: row1 = row1'), 'Checked checkbox row1');

    $this->assertText(t('Submitted: row2 = 0'), 'Unchecked checkbox row2.');

    $this->assertText(t('Submitted: row3 = 0'), 'Unchecked checkbox row3.');

    // Test a submission with multiple checkboxes checked.

    $edit['tableselect[row1]'] = TRUE;

    $edit['tableselect[row3]'] = TRUE;

    $this->drupalPost('form_test/tableselect/multiple-true', $edit, 'Submit');

    $this->assertText(t('Submitted: row1 = row1'), 'Checked checkbox row1.');

    $this->assertText(t('Submitted: row2 = 0'), 'Unchecked checkbox row2.');

    $this->assertText(t('Submitted: row3 = row3'), 'Checked checkbox row3.');

  }

  /**

   * Test submission of values when #multiple is FALSE.

   */

  function testMultipleFalseSubmit() {

    $edit['tableselect'] = 'row1';

    $this->drupalPost('form_test/tableselect/multiple-false', $edit, 'Submit');

    $this->assertText(t('Submitted: row1'), 'Selected radio button');

  }

  /**

   * Test the #js_select property.

   */

  function testAdvancedSelect() {

    // When #multiple = TRUE a Select all checkbox should be displayed by default.

    $this->drupalGet('form_test/tableselect/advanced-select/multiple-true-default');

    $this->assertFieldByXPath('//th[@class="select-all"]', NULL, 'Display a "Select all" checkbox by default when #multiple is TRUE.');

    // When #js_select is set to FALSE, a "Select all" checkbox should not be displayed.

    $this->drupalGet('form_test/tableselect/advanced-select/multiple-true-no-advanced-select');

    $this->assertNoFieldByXPath('//th[@class="select-all"]', NULL, 'Do not display a "Select all" checkbox when #js_select is FALSE.');

    // A "Select all" checkbox never makes sense when #multiple = FALSE, regardless of the value of #js_select.

    $this->drupalGet('form_test/tableselect/advanced-select/multiple-false-default');

    $this->assertNoFieldByXPath('//th[@class="select-all"]', NULL, 'Do not display a "Select all" checkbox when #multiple is FALSE.');

    $this->drupalGet('form_test/tableselect/advanced-select/multiple-false-advanced-select');

    $this->assertNoFieldByXPath('//th[@class="select-all"]', NULL, 'Do not display a "Select all" checkbox when #multiple is FALSE, even when #js_select is TRUE.');

  }

  /**

   * Test the whether the option checker gives an error on invalid tableselect values for checkboxes.

   */

  function testMultipleTrueOptionchecker() {

    list($header, $options) = _form_test_tableselect_get_data();

    $form['tableselect'] = array(

      '#type' => 'tableselect',

      '#header' => $header,

      '#options' => $options,

    );

    // Test with a valid value.

    list($processed_form, $form_state, $errors) = $this->formSubmitHelper($form, array('tableselect' => array('row1' => 'row1')));

    $this->assertFalse(isset($errors['tableselect']), 'Option checker allows valid values for checkboxes.');

    // Test with an invalid value.

    list($processed_form, $form_state, $errors) = $this->formSubmitHelper($form, array('tableselect' => array('non_existing_value' => 'non_existing_value')));

    $this->assertTrue(isset($errors['tableselect']), 'Option checker disallows invalid values for checkboxes.');

  }

  /**

   * Test the whether the option checker gives an error on invalid tableselect values for radios.

   */

  function testMultipleFalseOptionchecker() {

    list($header, $options) = _form_test_tableselect_get_data();

    $form['tableselect'] = array(

      '#type' => 'tableselect',

      '#header' => $header,

      '#options' => $options,

      '#multiple' => FALSE,

    );

    // Test with a valid value.

    list($processed_form, $form_state, $errors) = $this->formSubmitHelper($form, array('tableselect' => 'row1'));

    $this->assertFalse(isset($errors['tableselect']), 'Option checker allows valid values for radio buttons.');

    // Test with an invalid value.

    list($processed_form, $form_state, $errors) = $this->formSubmitHelper($form, array('tableselect' => 'non_existing_value'));

    $this->assertTrue(isset($errors['tableselect']), 'Option checker disallows invalid values for radio buttons.');

  }

  /**

   * Helper function for the option check test to submit a form while collecting errors.

   *

   * @param $form_element

   *   A form element to test.

   * @param $edit

   *   An array containing post data.

   *

   * @return

   *   An array containing the processed form, the form_state and any errors.

   */

  private function formSubmitHelper($form, $edit) {

    $form_id = $this->randomName();

    $form_state = form_state_defaults();

    $form['op'] = array('#type' => 'submit', '#value' => t('Submit'));

    $form_state['input'] = $edit;

    $form_state['input']['form_id'] = $form_id;

    // The form token CSRF protection should not interfere with this test,

    // so we bypass it by marking this test form as programmed.

    $form_state['programmed'] = TRUE;

    drupal_prepare_form($form_id, $form, $form_state);

    drupal_process_form($form_id, $form, $form_state);

    $errors = form_get_errors();

    // Clear errors and messages.

    drupal_get_messages();

    form_clear_error();

    // Return the processed form together with form_state and errors

    // to allow the caller lowlevel access to the form.

    return array($form, $form_state, $errors);

  }

}

/**

 * Test the vertical_tabs form element for expected behavior.

 */

class FormsElementsVerticalTabsFunctionalTest extends DrupalWebTestCase {

  public static function getInfo() {

    return array(

      'name' => 'Vertical tabs form element type test',

      'description' => 'Test the vertical_tabs element for expected behavior',

      'group' => 'Form API',

    );

  }

  function setUp() {

    parent::setUp('form_test');

  }

  /**

   * Ensures that vertical-tabs.js is included before collapse.js.

   *

   * Otherwise, collapse.js adds "SHOW" or "HIDE" labels to the tabs.

   */

  function testJavaScriptOrdering() {

    $this->drupalGet('form_test/vertical-tabs');

    $position1 = strpos($this->content, 'misc/vertical-tabs.js');

    $position2 = strpos($this->content, 'misc/collapse.js');

    $this->assertTrue($position1 !== FALSE && $position2 !== FALSE && $position1 < $position2, 'vertical-tabs.js is included before collapse.js');

  }

}

/**

 * Test the form storage on a multistep form.

 *

 * The tested form puts data into the storage during the initial form

 * construction. These tests verify that there are no duplicate form

 * constructions, with and without manual form caching activiated. Furthermore

 * when a validation error occurs, it makes sure that changed form element

 * values aren't lost due to a wrong form rebuild.

 */

class FormsFormStorageTestCase extends DrupalWebTestCase {

  public static function getInfo() {

    return array(

      'name'  => 'Multistep form using form storage',

      'description'  => 'Tests a multistep form using form storage and makes sure validation and caching works right.',

      'group' => 'Form API',

    );

  }

  function setUp() {

    parent::setUp('form_test');

    $this->web_user = $this->drupalCreateUser(array('access content'));

    $this->drupalLogin($this->web_user);

  }

  /**

   * Tests using the form in a usual way.

   */

  function testForm() {

    $this->drupalGet('form_test/form-storage');

    $this->assertText('Form constructions: 1');

    $edit = array('title' => 'new', 'value' => 'value_is_set');

    // Use form rebuilding triggered by a submit button.

    $this->drupalPost(NULL, $edit, 'Continue submit');

    $this->assertText('Form constructions: 2');

    $this->assertText('Form constructions: 3');

    // Reset the form to the values of the storage, using a form rebuild

    // triggered by button of type button.

    $this->drupalPost(NULL, array('title' => 'changed'), 'Reset');

    $this->assertFieldByName('title', 'new', 'Values have been resetted.');

    // After rebuilding, the form has been cached.

    $this->assertText('Form constructions: 4');

    $this->drupalPost(NULL, $edit, 'Save');

    $this->assertText('Form constructions: 4');

    $this->assertText('Title: new', 'The form storage has stored the values.');

  }

  /**

   * Tests using the form with an activated $form_state['cache'] property.

   */

  function testFormCached() {

    $this->drupalGet('form_test/form-storage', array('query' => array('cache' => 1)));

    $this->assertText('Form constructions: 1');

    $edit = array('title' => 'new', 'value' => 'value_is_set');

    // Use form rebuilding triggered by a submit button.

    $this->drupalPost(NULL, $edit, 'Continue submit');

    $this->assertText('Form constructions: 2');

    // Reset the form to the values of the storage, using a form rebuild

    // triggered by button of type button.

    $this->drupalPost(NULL, array('title' => 'changed'), 'Reset');

    $this->assertFieldByName('title', 'new', 'Values have been resetted.');

    $this->assertText('Form constructions: 3');

    $this->drupalPost(NULL, $edit, 'Save');

    $this->assertText('Form constructions: 3');

    $this->assertText('Title: new', 'The form storage has stored the values.');

  }

  /**

   * Tests validation when form storage is used.

   */

  function testValidation() {

    $this->drupalPost('form_test/form-storage', array('title' => '', 'value' => 'value_is_set'), 'Continue submit');

    $this->assertPattern('/value_is_set/', 'The input values have been kept.');

  }

  /**

   * Tests updating cached form storage during form validation.

   *

   * If form caching is enabled and a form stores data in the form storage, then

   * the form storage also has to be updated in case of a validation error in

   * the form. This test re-uses the existing form for multi-step tests, but

   * triggers a special #element_validate handler to update the form storage

   * during form validation, while another, required element in the form

   * triggers a form validation error.

   */

  function testCachedFormStorageValidation() {

    // Request the form with 'cache' query parameter to enable form caching.

    $this->drupalGet('form_test/form-storage', array('query' => array('cache' => 1)));

    // Skip step 1 of the multi-step form, since the first step copies over

    // 'title' into form storage, but we want to verify that changes in the form

    // storage are updated in the cache during form validation.

    $edit = array('title' => 'foo');

    $this->drupalPost(NULL, $edit, 'Continue submit');

    // In step 2, trigger a validation error for the required 'title' field, and

    // post the special 'change_title' value for the 'value' field, which

    // conditionally invokes the #element_validate handler to update the form

    // storage.

    $edit = array('title' => '', 'value' => 'change_title');

    $this->drupalPost(NULL, $edit, 'Save');

    // At this point, the form storage should contain updated values, but we do

    // not see them, because the form has not been rebuilt yet due to the

    // validation error. Post again and verify that the rebuilt form contains

    // the values of the updated form storage.

    $this->drupalPost(NULL, array('title' => 'foo', 'value' => 'bar'), 'Save');

    $this->assertText("The thing has been changed.", 'The altered form storage value was updated in cache and taken over.');

  }

  /**

   * Tests a form using form state without using 'storage' to pass data from the

   * constructor to a submit handler. The data has to persist even when caching

   * gets activated, what may happen when a modules alter the form and adds

   * #ajax properties.

   */

  function testFormStatePersist() {

    // Test the form one time with caching activated and one time without.

    $run_options = array(

      array(),

      array('query' => array('cache' => 1)),

    );

    foreach ($run_options as $options) {

      $this->drupalPost('form-test/state-persist', array(), t('Submit'), $options);

      // The submit handler outputs the value in $form_state, assert it's there.

      $this->assertText('State persisted.');

      // Test it again, but first trigger a validation error, then test.

      $this->drupalPost('form-test/state-persist', array('title' => ''), t('Submit'), $options);

      $this->assertText(t('!name field is required.', array('!name' => 'title')));

      // Submit the form again triggering no validation error.

      $this->drupalPost(NULL, array('title' => 'foo'), t('Submit'), $options);

      $this->assertText('State persisted.');

      // Now post to the rebuilt form and verify it's still there afterwards.

      $this->drupalPost(NULL, array('title' => 'bar'), t('Submit'), $options);

      $this->assertText('State persisted.');

    }

  }

}

/**

 * Test wrapper form callbacks.

 */

class FormsFormWrapperTestCase extends DrupalWebTestCase {

  public static function getInfo() {

    return array(

      'name' => 'Form wrapper callback',

      'description' => 'Tests form wrapper callbacks to pass a prebuilt form to form builder functions.',

      'group' => 'Form API',

    );

  }

  function setUp() {

    parent::setUp('form_test');

  }

  /**

   * Tests using the form in a usual way.

   */

  function testWrapperCallback() {

    $this->drupalGet('form_test/wrapper-callback');

    $this->assertText('Form wrapper callback element output.', 'The form contains form wrapper elements.');

    $this->assertText('Form builder element output.', 'The form contains form builder elements.');

  }

}

/**

 * Test $form_state clearance.

 */

class FormStateValuesCleanTestCase extends DrupalWebTestCase {

  public static function getInfo() {

    return array(

      'name' => 'Form state values clearance',

      'description' => 'Test proper removal of submitted form values using form_state_values_clean().',

      'group' => 'Form API',

    );

  }

  function setUp() {

    parent::setUp('form_test');

  }

  /**

   * Tests form_state_values_clean().

   */

  function testFormStateValuesClean() {

    $values = drupal_json_decode($this->drupalPost('form_test/form-state-values-clean', array(), t('Submit')));

    // Setup the expected result.

    $result = array(

      'beer' => 1000,

      'baz' => array('beer' => 2000),

    );

    // Verify that all internal Form API elements were removed.

    $this->assertFalse(isset($values['form_id']), format_string('%element was removed.', array('%element' => 'form_id')));

    $this->assertFalse(isset($values['form_token']), format_string('%element was removed.', array('%element' => 'form_token')));

    $this->assertFalse(isset($values['form_build_id']), format_string('%element was removed.', array('%element' => 'form_build_id')));

    $this->assertFalse(isset($values['op']), format_string('%element was removed.', array('%element' => 'op')));

    // Verify that all buttons were removed.

    $this->assertFalse(isset($values['foo']), format_string('%element was removed.', array('%element' => 'foo')));

    $this->assertFalse(isset($values['bar']), format_string('%element was removed.', array('%element' => 'bar')));

    $this->assertFalse(isset($values['baz']['foo']), format_string('%element was removed.', array('%element' => 'foo')));

    $this->assertFalse(isset($values['baz']['baz']), format_string('%element was removed.', array('%element' => 'baz')));

    // Verify that nested form value still exists.

    $this->assertTrue(isset($values['baz']['beer']), 'Nested form value still exists.');

    // Verify that actual form values equal resulting form values.

    $this->assertEqual($values, $result, 'Expected form values equal actual form values.');

  }

}

/**

 * Tests $form_state clearance with form elements having buttons.

 */

class FormStateValuesCleanAdvancedTestCase extends DrupalWebTestCase {

  /**

   * An image file path for uploading.

   */

  protected $image;

  public static function getInfo() {

    return array(

      'name' => 'Form state values clearance (advanced)',

      'description' => 'Test proper removal of submitted form values using form_state_values_clean() when having forms with elements containing buttons like "managed_file".',

      'group' => 'Form API',

    );

  }

  function setUp() {

    parent::setUp('form_test');

  }

  /**

   * Tests form_state_values_clean().

   */

  function testFormStateValuesCleanAdvanced() {

    // Get an image for uploading.

    $image_files = $this->drupalGetTestFiles('image');

    $this->image = current($image_files);

    // Check if the physical file is there.

    $this->assertTrue(is_file($this->image->uri), "The image file we're going to upload exists.");

    // "Browse" for the desired file.

    $edit = array('files[image]' => drupal_realpath($this->image->uri));

    // Post the form.

    $this->drupalPost('form_test/form-state-values-clean-advanced', $edit, t('Submit'));

    // Expecting a 200 HTTP code.

    $this->assertResponse(200, 'Received a 200 response for posted test file.');

    $this->assertRaw(t('You WIN!'), 'Found the success message.');

  }

}

/**

 * Tests form rebuilding.

 *

 * @todo Add tests for other aspects of form rebuilding.

 */

class FormsRebuildTestCase extends DrupalWebTestCase {

  public static function getInfo() {

    return array(

      'name' => 'Form rebuilding',

      'description' => 'Tests functionality of drupal_rebuild_form().',

      'group' => 'Form API',

    );

  }

  function setUp() {

    parent::setUp('form_test');

    $this->web_user = $this->drupalCreateUser(array('access content'));

    $this->drupalLogin($this->web_user);

  }

  /**

   * Tests preservation of values.

   */

  function testRebuildPreservesValues() {

    $edit = array(

      'checkbox_1_default_off' => TRUE,

      'checkbox_1_default_on' => FALSE,

      'text_1' => 'foo',

    );

    $this->drupalPost('form-test/form-rebuild-preserve-values', $edit, 'Add more');

    // Verify that initial elements retained their submitted values.

    $this->assertFieldChecked('edit-checkbox-1-default-off', 'A submitted checked checkbox retained its checked state during a rebuild.');

    $this->assertNoFieldChecked('edit-checkbox-1-default-on', 'A submitted unchecked checkbox retained its unchecked state during a rebuild.');

    $this->assertFieldById('edit-text-1', 'foo', 'A textfield retained its submitted value during a rebuild.');

    // Verify that newly added elements were initialized with their default values.

    $this->assertFieldChecked('edit-checkbox-2-default-on', 'A newly added checkbox was initialized with a default checked state.');

    $this->assertNoFieldChecked('edit-checkbox-2-default-off', 'A newly added checkbox was initialized with a default unchecked state.');

    $this->assertFieldById('edit-text-2', 'DEFAULT 2', 'A newly added textfield was initialized with its default value.');

  }

  /**

   * Tests that a form's action is retained after an Ajax submission.

   *

   * The 'action' attribute of a form should not change after an Ajax submission

   * followed by a non-Ajax submission, which triggers a validation error.

   */

  function testPreserveFormActionAfterAJAX() {

    // Create a multi-valued field for 'page' nodes to use for Ajax testing.

    $field_name = 'field_ajax_test';

    $field = array(

      'field_name' => $field_name,

      'type' => 'text',

      'cardinality' => FIELD_CARDINALITY_UNLIMITED,

    );

    field_create_field($field);

    $instance = array(

      'field_name' => $field_name,

      'entity_type' => 'node',

      'bundle' => 'page',

    );

    field_create_instance($instance);

    // Log in a user who can create 'page' nodes.

    $this->web_user = $this->drupalCreateUser(array('create page content'));

    $this->drupalLogin($this->web_user);

    // Get the form for adding a 'page' node. Submit an "add another item" Ajax

    // submission and verify it worked by ensuring the updated page has two text

    // field items in the field for which we just added an item.

    $this->drupalGet('node/add/page');

    $this->drupalPostAJAX(NULL, array(), array('field_ajax_test_add_more' => t('Add another item')), 'system/ajax', array(), array(), 'page-node-form');

    $this->assert(count($this->xpath('//div[contains(@class, "field-name-field-ajax-test")]//input[@type="text"]')) == 2, 'AJAX submission succeeded.');

    // Submit the form with the non-Ajax "Save" button, leaving the title field

    // blank to trigger a validation error, and ensure that a validation error

    // occurred, because this test is for testing what happens when a form is

    // re-rendered without being re-built, which is what happens when there's

    // a validation error.

    $this->drupalPost(NULL, array(), t('Save'));

    $this->assertText('Title field is required.', 'Non-AJAX submission correctly triggered a validation error.');

    // Ensure that the form contains two items in the multi-valued field, so we

    // know we're testing a form that was correctly retrieved from cache.

    $this->assert(count($this->xpath('//form[contains(@id, "page-node-form")]//div[contains(@class, "form-item-field-ajax-test")]//input[@type="text"]')) == 2, 'Form retained its state from cache.');

    // Ensure that the form's action is correct.

    $forms = $this->xpath('//form[contains(@class, "node-page-form")]');

    $this->assert(count($forms) == 1 && $forms[0]['action'] == url('node/add/page'), 'Re-rendered form contains the correct action value.');

  }

}

/**

 * Tests form redirection.

 */

class FormsRedirectTestCase extends DrupalWebTestCase {

  public static function getInfo() {

    return array(

      'name' => 'Form redirecting',

      'description' => 'Tests functionality of drupal_redirect_form().',

      'group' => 'Form API',

    );

  }

  function setUp() {

    parent::setUp(array('form_test'));

  }

  /**

   * Tests form redirection.

   */

  function testRedirect() {

    $path = 'form-test/redirect';

    $options = array('query' => array('foo' => 'bar'));

    $options['absolute'] = TRUE;

    // Test basic redirection.

    $edit = array(

      'redirection' => TRUE,

      'destination' => $this->randomName(),

    );

    $this->drupalPost($path, $edit, t('Submit'));

    $this->assertUrl($edit['destination'], array(), 'Basic redirection works.');

    // Test without redirection.

    $edit = array(

      'redirection' => FALSE,

    );

    $this->drupalPost($path, $edit, t('Submit'));

    $this->assertUrl($path, array(), 'When redirect is set to FALSE, there should be no redirection.');

    // Test redirection with query parameters.

    $edit = array(

      'redirection' => TRUE,

      'destination' => $this->randomName(),

    );

    $this->drupalPost($path, $edit, t('Submit'), $options);

    $this->assertUrl($edit['destination'], array(), 'Redirection with query parameters works.');

    // Test without redirection but with query parameters.

    $edit = array(

      'redirection' => FALSE,

    );

    $this->drupalPost($path, $edit, t('Submit'), $options);

    $this->assertUrl($path, $options, 'When redirect is set to FALSE, there should be no redirection, and the query parameters should be passed along.');

    // Test redirection back to the original path.

    $edit = array(

      'redirection' => TRUE,

      'destination' => '',

    );

    $this->drupalPost($path, $edit, t('Submit'));

    $this->assertUrl($path, array(), 'When using an empty redirection string, there should be no redirection.');

    // Test redirection back to the original path with query parameters.

    $edit = array(

      'redirection' => TRUE,

      'destination' => '',

    );

    $this->drupalPost($path, $edit, t('Submit'), $options);

    $this->assertUrl($path, $options, 'When using an empty redirection string, there should be no redirection, and the query parameters should be passed along.');

  }

}

/**

 * Test the programmatic form submission behavior.

 */

class FormsProgrammaticTestCase extends DrupalWebTestCase {

  public static function getInfo() {

    return array(

      'name' => 'Programmatic form submissions',

      'description' => 'Test the programmatic form submission behavior.',

      'group' => 'Form API',

    );

  }

  function setUp() {

    parent::setUp('form_test');

  }

  /**

   * Test the programmatic form submission workflow.

   */

  function testSubmissionWorkflow() {

    // Backup the current batch status and reset it to avoid conflicts while

    // processing the dummy form submit handler.

    $current_batch = $batch =& batch_get();

    $batch = array();

    // Test that a programmatic form submission is rejected when a required

    // textfield is omitted and correctly processed when it is provided.

    $this->submitForm(array(), FALSE);

    $this->submitForm(array('textfield' => 'test 1'), TRUE);

    $this->submitForm(array(), FALSE);

    $this->submitForm(array('textfield' => 'test 2'), TRUE);

    // Test that a programmatic form submission can turn on and off checkboxes

    // which are, by default, checked.

    $this->submitForm(array('textfield' => 'dummy value', 'checkboxes' => array(1 => 1, 2 => 2)), TRUE);

    $this->submitForm(array('textfield' => 'dummy value', 'checkboxes' => array(1 => 1, 2 => NULL)), TRUE);

    $this->submitForm(array('textfield' => 'dummy value', 'checkboxes' => array(1 => NULL, 2 => 2)), TRUE);

    $this->submitForm(array('textfield' => 'dummy value', 'checkboxes' => array(1 => NULL, 2 => NULL)), TRUE);

    // Test that a programmatic form submission can successfully submit values

    // even for fields where the #access property is FALSE.

    $this->submitForm(array('textfield' => 'dummy value', 'textfield_no_access' => 'test value'), TRUE);

    // Test that #access is respected for programmatic form submissions when

    // requested to do so.

    $submitted_values = array('textfield' => 'dummy value', 'textfield_no_access' => 'test value');

    $expected_values = array('textfield' => 'dummy value', 'textfield_no_access' => 'default value');

    $form_state = array('programmed_bypass_access_check' => FALSE);

    $this->submitForm($submitted_values, TRUE, $expected_values, $form_state);

    // Test that a programmatic form submission can correctly click a button

    // that limits validation errors based on user input. Since we do not

    // submit any values for "textfield" here and the textfield is required, we

    // only expect form validation to pass when validation is limited to a

    // different field.

    $this->submitForm(array('op' => 'Submit with limited validation', 'field_to_validate' => 'all'), FALSE);

    $this->submitForm(array('op' => 'Submit with limited validation', 'field_to_validate' => 'textfield'), FALSE);

    $this->submitForm(array('op' => 'Submit with limited validation', 'field_to_validate' => 'field_to_validate'), TRUE);

    // Restore the current batch status.

    $batch = $current_batch;

  }

  /**

   * Helper function used to programmatically submit the form defined in

   * form_test.module with the given values.

   *

   * @param $values

   *   An array of field values to be submitted.

   * @param $valid_input

   *   A boolean indicating whether or not the form submission is expected to

   *   be valid.

   * @param $expected_values

   *   (Optional) An array of field values that are expected to be stored by

   *   the form submit handler. If not set, the submitted $values are assumed

   *   to also be the expected stored values.

   * @param $form_state

   *   (Optional) A keyed array containing the state of the form, to be sent in

   *   the call to drupal_form_submit(). The $values parameter is added to

   *   $form_state['values'] by default, if it is not already set.

   */

  private function submitForm($values, $valid_input, $expected_values = NULL, $form_state = array()) {

    // Programmatically submit the given values.

    $form_state += array('values' => $values);

    drupal_form_submit('form_test_programmatic_form', $form_state);

    // Check that the form returns an error when expected, and vice versa.

    $errors = form_get_errors();

    $valid_form = empty($errors);

    $args = array(

      '%values' => print_r($values, TRUE),

      '%errors' => $valid_form ? t('None') : implode(' ', $errors),

    );

    $this->assertTrue($valid_input == $valid_form, format_string('Input values: %values<br/>Validation handler errors: %errors', $args));

    // We check submitted values only if we have a valid input.

    if ($valid_input) {

      // By fetching the values from $form_state['storage'] we ensure that the

      // submission handler was properly executed.

      $stored_values = $form_state['storage']['programmatic_form_submit'];

      if (!isset($expected_values)) {

        $expected_values = $values;

      }

      foreach ($expected_values as $key => $value) {

        $this->assertTrue(isset($stored_values[$key]) && $stored_values[$key] == $value, format_string('Submission handler correctly executed: %stored_key is %stored_value', array('%stored_key' => $key, '%stored_value' => print_r($value, TRUE))));

      }

    }

  }

}

/**

 * Test that FAPI correctly determines $form_state['triggering_element'].

 */

class FormsTriggeringElementTestCase extends DrupalWebTestCase {

  public static function getInfo() {

    return array(

      'name' => 'Form triggering element determination',

      'description' => 'Test the determination of $form_state[\'triggering_element\'].',

      'group' => 'Form API',

    );

  }

  function setUp() {

    parent::setUp('form_test');

  }