diff --git a/core/includes/token.inc b/core/includes/token.inc index 5c74519..b4e409e 100644 --- a/core/includes/token.inc +++ b/core/includes/token.inc @@ -113,13 +113,13 @@ function token_replace($text, array $data = array(), array $options = array()) { */ function token_scan($text) { // Matches tokens with the following pattern: [$type:$name] - // $type and $name may not contain [ ] or whitespace characters. - // $type may not contain : characters, but $name may. + // $type and $name may not contain [ ] characters. + // $type may not contain : or whitespace characters, but $name may. preg_match_all('/ \[ # [ - pattern start ([^\s\[\]:]*) # match $type not containing whitespace : [ or ] : # : - separator - ([^\s\[\]]*) # match $name not containing whitespace [ or ] + ([^\[\]]*) # match $name not containing [ or ] \] # ] - pattern end /x', $text, $matches); diff --git a/core/modules/system/system.test b/core/modules/system/system.test index 40f590e..515b80c 100644 --- a/core/modules/system/system.test +++ b/core/modules/system/system.test @@ -1935,6 +1935,36 @@ class SystemThemeFunctionalTest extends WebTestBase { } /** + * Tests token scanning in strings. + */ +class TokenScanTestCase extends DrupalWebTestCase { + public static function getInfo() { + return array( + 'name' => 'Token scanning', + 'description' => 'Scan token-like patterns in a dummy text to check token scanning.', + 'group' => 'System', + ); + } + + /** + * Scans dummy text, then tests the output. + */ + function testTokenScan() { + // Define text with valid and not valid, fake and existing token like + // strings. + $text = 'First a [valid:simple], but dummy token, and a dummy [valid:token with: spaces].'; + $text .= 'Then a [not valid:token].'; + $text .= 'Last an existing token: [node:author:name].'; + $token_wannabes = token_scan($text); + + $this->assertTrue(isset($token_wannabes['valid']['simple']), t('Simple valid token matched.')); + $this->assertTrue(isset($token_wannabes['valid']['token with: spaces']), t('Valid token with space characters in the token name matched.')); + $this->assertFalse(isset($token_wannabes['not valid']), t('Not valid token with spaces in the token type not matched.')); + $this->assertTrue(isset($token_wannabes['node']), t('Existing valid token matched.')); + } +} + +/** * Test token replacement in strings. */ class TokenReplaceTestCase extends WebTestBase {