summaryrefslogtreecommitdiff
path: root/modules/simpletest
diff options
context:
space:
mode:
Diffstat (limited to 'modules/simpletest')
-rw-r--r--modules/simpletest/tests/unicode.test120
1 files changed, 119 insertions, 1 deletions
diff --git a/modules/simpletest/tests/unicode.test b/modules/simpletest/tests/unicode.test
index 07551ee69..cdae50955 100644
--- a/modules/simpletest/tests/unicode.test
+++ b/modules/simpletest/tests/unicode.test
@@ -48,6 +48,7 @@ class UnicodeUnitTest extends DrupalWebTestCase {
$this->helperTestUcFirst();
$this->helperTestStrLen();
$this->helperTestSubStr();
+ $this->helperTestTruncate();
}
/**
@@ -67,6 +68,7 @@ class UnicodeUnitTest extends DrupalWebTestCase {
$this->helperTestUcFirst();
$this->helperTestStrLen();
$this->helperTestSubStr();
+ $this->helperTestTruncate();
}
function helperTestStrToLower() {
@@ -127,10 +129,18 @@ class UnicodeUnitTest extends DrupalWebTestCase {
function helperTestSubStr() {
$testcase = array(
// 012345678901234567890123
+ array('frànçAIS is über-åwesome', 0, 0,
+ ''),
array('frànçAIS is über-åwesome', 0, 1,
'f'),
array('frànçAIS is über-åwesome', 0, 8,
'frànçAIS'),
+ array('frànçAIS is über-åwesome', 0, 23,
+ 'frànçAIS is über-åwesom'),
+ array('frànçAIS is über-åwesome', 0, 24,
+ 'frànçAIS is über-åwesome'),
+ array('frànçAIS is über-åwesome', 0, 25,
+ 'frànçAIS is über-åwesome'),
array('frànçAIS is über-åwesome', 0, 100,
'frànçAIS is über-åwesome'),
array('frànçAIS is über-åwesome', 4, 4,
@@ -141,16 +151,38 @@ class UnicodeUnitTest extends DrupalWebTestCase {
''),
array('frànçAIS is über-åwesome', -4, 2,
'so'),
+ array('frànçAIS is über-åwesome', -4, 3,
+ 'som'),
+ array('frànçAIS is über-åwesome', -4, 4,
+ 'some'),
+ array('frànçAIS is über-åwesome', -4, 5,
+ 'some'),
array('frànçAIS is über-åwesome', -7, 10,
'åwesome'),
array('frànçAIS is über-åwesome', 5, -10,
'AIS is üb'),
+ array('frànçAIS is über-åwesome', 0, -10,
+ 'frànçAIS is üb'),
+ array('frànçAIS is über-åwesome', 0, -1,
+ 'frànçAIS is über-åwesom'),
+ array('frànçAIS is über-åwesome', -7, -2,
+ 'åweso'),
+ array('frànçAIS is über-åwesome', -7, -6,
+ 'å'),
+ array('frànçAIS is über-åwesome', -7, -7,
+ ''),
+ array('frànçAIS is über-åwesome', -7, -8,
+ ''),
+ array('...', 0, 2, '..'),
+ array('以呂波耳・ほへとち。リヌルヲ。', 1, 3,
+ '呂波耳'),
);
foreach ($testcase as $test) {
list($input, $start, $length, $output) = $test;
- $this->assertEqual(drupal_substr($input, $start, $length), $output, t('%input substring-ed at offset %offset for %length characters is %output', array('%input' => $input, '%offset' => $start, '%length' => $length, '%output' => $output)));
+ $result = drupal_substr($input, $start, $length);
+ $this->assertEqual($result, $output, t('%input substring at offset %offset for %length characters is %output (got %result)', array('%input' => $input, '%offset' => $start, '%length' => $length, '%output' => $output, '%result' => $result)));
}
}
@@ -215,4 +247,90 @@ class UnicodeUnitTest extends DrupalWebTestCase {
$this->assertIdentical(decode_entities($input, $exclude), $output, t('Make sure the decoded entity of %input, excluding %excludes, is %output', array('%input' => $input, '%excludes' => implode(',', $exclude), '%output' => $output)));
}
}
+
+ /**
+ * Tests truncate_utf8().
+ */
+ function helperTestTruncate() {
+ // Each case is an array with input string, length to truncate to, and
+ // expected return value.
+
+ // Test non-wordsafe, non-ellipsis cases.
+ $non_wordsafe_non_ellipsis_cases = array(
+ array('frànçAIS is über-åwesome', 24, 'frànçAIS is über-åwesome'),
+ array('frànçAIS is über-åwesome', 23, 'frànçAIS is über-åwesom'),
+ array('frànçAIS is über-åwesome', 17, 'frànçAIS is über-'),
+ array('以呂波耳・ほへとち。リヌルヲ。', 6, '以呂波耳・ほ'),
+ );
+ $this->runTruncateTests($non_wordsafe_non_ellipsis_cases, FALSE, FALSE);
+
+ // Test non-wordsafe, ellipsis cases.
+ $non_wordsafe_ellipsis_cases = array(
+ array('frànçAIS is über-åwesome', 24, 'frànçAIS is über-åwesome'),
+ array('frànçAIS is über-åwesome', 23, 'frànçAIS is über-åwe...'),
+ array('frànçAIS is über-åwesome', 17, 'frànçAIS is üb...'),
+ );
+ $this->runTruncateTests($non_wordsafe_ellipsis_cases, FALSE, TRUE);
+
+ // Test wordsafe, ellipsis cases.
+ $wordsafe_ellipsis_cases = array(
+ array('123', 1, '.'),
+ array('123', 2, '..'),
+ array('123', 3, '123'),
+ array('1234', 3, '...'),
+ array('1234567890', 10, '1234567890'),
+ array('12345678901', 10, '1234567...'),
+ array('12345678901', 11, '12345678901'),
+ array('123456789012', 11, '12345678...'),
+ array('12345 7890', 10, '12345 7890'),
+ array('12345 7890', 9, '12345...'),
+ array('123 567 90', 10, '123 567 90'),
+ array('123 567 901', 10, '123 567...'),
+ array('Stop. Hammertime.', 17, 'Stop. Hammertime.'),
+ array('Stop. Hammertime.', 16, 'Stop....'),
+ array('frànçAIS is über-åwesome', 24, 'frànçAIS is über-åwesome'),
+ array('frànçAIS is über-åwesome', 23, 'frànçAIS is über...'),
+ array('frànçAIS is über-åwesome', 17, 'frànçAIS is...'),
+ array('¿Dónde está el niño?', 20, '¿Dónde está el niño?'),
+ array('¿Dónde está el niño?', 19, '¿Dónde está el...'),
+ array('¿Dónde está el niño?', 15, '¿Dónde está...'),
+ array('¿Dónde está el niño?', 10, '¿Dónde...'),
+ array('Help! Help! Help!', 17, 'Help! Help! Help!'),
+ array('Help! Help! Help!', 16, 'Help! Help!...'),
+ array('Help! Help! Help!', 15, 'Help! Help!...'),
+ array('Help! Help! Help!', 14, 'Help! Help!...'),
+ array('Help! Help! Help!', 13, 'Help! Help...'),
+ array('Help! Help! Help!', 12, 'Help!...'),
+ array('Help! Help! Help!', 11, 'Help!...'),
+ array('Help! Help! Help!', 10, 'Help!...'),
+ array('Help! Help! Help!', 9, 'Help!...'),
+ array('Help! Help! Help!', 8, 'Help!...'),
+ array('Help! Help! Help!', 7, 'Help...'),
+ array('Help! Help! Help!', 6, 'Hel...'),
+ array('Help! Help! Help!', 5, 'He...'),
+ );
+ $this->runTruncateTests($wordsafe_ellipsis_cases, TRUE, TRUE);
+ }
+
+ /**
+ * Runs test cases for helperTestTruncate().
+ *
+ * Runs each test case through truncate_utf8() and compares the output
+ * to the expected output.
+ *
+ * @param $cases
+ * Cases array. Each case is an array with the input string, length to
+ * truncate to, and expected output.
+ * @param $wordsafe
+ * TRUE to use word-safe truncation, FALSE to not use word-safe truncation.
+ * @param $ellipsis
+ * TRUE to append ... if the input is truncated, FALSE to not append ....
+ */
+ function runTruncateTests($cases, $wordsafe, $ellipsis) {
+ foreach ($cases as $case) {
+ list($input, $max_length, $expected) = $case;
+ $output = truncate_utf8($input, $max_length, $wordsafe, $ellipsis);
+ $this->assertEqual($output, $expected, t('%input truncate to %length characters with %wordsafe, %ellipsis is %expected (got %output)', array('%input' => $input, '%length' => $max_length, '%output' => $output, '%expected' => $expected, '%wordsafe' => ($wordsafe ? 'word-safe' : 'not word-safe'), '%ellipsis' => ($ellipsis ? 'ellipsis' : 'not ellipsis'))));
+ }
+ }
}
generated by cgit v1.2.3 (git 2.25.1) at 2025-06-24 10:24:33 +0000