function DateAPI::testDateAPI in Date 6

Same name and namespace in other branches

1. 5.2 tests/date_api.test \DateAPI::testDateAPI()

File

tests/date_api.test, line 10

Class

DateAPI

Test Date API functions

Code

function testDateAPI() {
  include_once drupal_get_path('module', 'date_api') . '/date_api.module';
  $this
    ->drupalVariableSet('date_first_day', 1);
  $expected = array(
    0 => t('Mon'),
    1 => t('Tue'),
    2 => t('Wed'),
    3 => t('Thu'),
    4 => t('Fri'),
    5 => t('Sat'),
    6 => t('Sun'),
  );
  $days = date_week_days_ordered(date_week_days_abbr(1));
  $this
    ->assertEqual($expected, $days, 'Test that date_week_days_ordered() array starts on Monday when the site first day is on Monday.');
  $this
    ->drupalVariableSet('date_first_day', 0);
  $expected = array(
    0 => t('Sun'),
    1 => t('Mon'),
    2 => t('Tue'),
    3 => t('Wed'),
    4 => t('Thu'),
    5 => t('Fri'),
    6 => t('Sat'),
  );
  $days = date_week_days_ordered(date_week_days_abbr(1));
  $this
    ->assertEqual($expected, $days, 'Test that date_week_days_ordered() array starts on Sunday when the site first day is on Sunday.');
  $value = '2007-12-05 23:59';
  $this
    ->assertEqual(TRUE, date_part_extract($value, 'year'), "Test date_part_extract(" . $value . ", year), results " . date_part_extract($value, 'year'));
  $this
    ->assertEqual(TRUE, date_part_extract($value, 'month'), "Test date_part_extract(" . $value . ", mon), results " . date_part_extract($value, 'month'));
  $this
    ->assertEqual(TRUE, date_part_extract($value, 'day'), "Test date_part_extract(" . $value . ", mday), results " . date_part_extract($value, 'day'));
  $this
    ->assertEqual(TRUE, date_is_valid($value), "Test date_is_valid(" . $value . ")");
  $value = '2007-00-00 00:00';
  $this
    ->assertNotEqual(TRUE, date_is_valid($value), "Test for invalid date_is_valid(" . $value . ")");
  $value = '0000-00-00 00:00';
  $this
    ->assertNotEqual(TRUE, date_is_valid($value), "Test for invalid date_is_valid(" . $value . ")");
  $value = '-100';
  $this
    ->assertNotEqual(TRUE, date_is_valid($value), "Test for invalid date_is_valid(" . $value . ")");
  $value = '2007-00-00T00:00';
  $this
    ->assertEqual(TRUE, date_is_valid($value, DATE_ISO), "Test ISO exception to date_is_valid(" . $value . ", DATE_ISO)");
  $expected = 28;
  $date = date_create('2005-02-01 00:00:00', timezone_open('UTC'));
  $value = date_days_in_month($date);
  $this
    ->assertEqual($expected, $value, 'Test date_last_day_of_month(2, 2005), results ' . $value);
  $expected = 29;
  $date = date_create('2004-02-01 00:00:00', timezone_open('UTC'));
  $value = date_days_in_month($date);
  $this
    ->assertEqual($expected, $value, 'Test date_last_day_of_month(2, 2004), results ' . $value);
  $expected = 28;
  $date = date_create('2003-02-01 00:00:00', timezone_open('UTC'));
  $value = date_days_in_month($date);
  $this
    ->assertEqual($expected, $value, 'Test date_last_day_of_month(2, 2003), results ' . $value);
  $dates = array(
    '2007-01-01 00:00:00',
    '1970-01-01 00:00:00',
    '1900-01-01 00:00:00',
    '1600-01-01 00:00:00',
    '0100-01-01 00:00:00',
  );
  foreach ($dates as $date) {
    $unix = date_convert($date, DATE_DATETIME, DATE_UNIX);
    $datetime = date_convert($unix, DATE_UNIX, DATE_DATETIME);
    $this
      ->assertEqual($date, $datetime, 'Test roundtrip using date_convert() from DATE_DATETIME to DATE_UNIX back to DATE_DATETIME, results ' . $date . ' >> ' . $unix . ' >> ' . $datetime);
  }
}