- <?php
- * @file
- * Builds placeholder replacement tokens for comment-related data.
- */
-
- * Implements hook_token_info().
- */
- function comment_token_info() {
- $type = array(
- 'name' => t('Comments'),
- 'description' => t('Tokens for comments posted on the site.'),
- 'needs-data' => 'comment',
- );
-
-
- $node['comment-count'] = array(
- 'name' => t('Comment count'),
- 'description' => t('The number of comments posted on a node.'),
- );
- $node['comment-count-new'] = array(
- 'name' => t('New comment count'),
- 'description' => t('The number of comments posted on a node since the reader last viewed it.'),
- );
-
-
- $comment['cid'] = array(
- 'name' => t('Comment ID'),
- 'description' => t('The unique ID of the comment.'),
- );
- $comment['hostname'] = array(
- 'name' => t('IP Address'),
- 'description' => t('The IP address of the computer the comment was posted from.'),
- );
- $comment['name'] = array(
- 'name' => t('Name'),
- 'description' => t('The name left by the comment author.'),
- 'deprecated' => TRUE,
- );
- $comment['mail'] = array(
- 'name' => t('Email address'),
- 'description' => t('The email address left by the comment author.'),
- );
- $comment['homepage'] = array(
- 'name' => t('Home page'),
- 'description' => t('The home page URL left by the comment author.'),
- );
- $comment['title'] = array(
- 'name' => t('Title'),
- 'description' => t('The title of the comment.'),
- );
- $comment['body'] = array(
- 'name' => t('Content'),
- 'description' => t('The formatted content of the comment itself.'),
- );
- $comment['url'] = array(
- 'name' => t('URL'),
- 'description' => t('The URL of the comment.'),
- 'type' => 'url',
- );
- $comment['edit-url'] = array(
- 'name' => t("Edit URL"),
- 'description' => t("The URL of the comment's edit page."),
- 'type' => 'url',
- );
-
-
- $comment['created'] = array(
- 'name' => t('Date created'),
- 'description' => t('The date the comment was posted.'),
- 'type' => 'date',
- );
- $comment['changed'] = array(
- 'name' => t('Date changed'),
- 'description' => t('The date the comment was most recently updated.'),
- 'type' => 'date',
- );
- $comment['parent'] = array(
- 'name' => t('Parent'),
- 'description' => t("The comment's parent, if comment threading is active."),
- 'type' => 'comment',
- );
- $comment['node'] = array(
- 'name' => t('Node'),
- 'description' => t('The node the comment was posted to.'),
- 'type' => 'node',
- );
- $comment['author'] = array(
- 'name' => t('Author'),
- 'description' => t('The author of the comment, if they were logged in.'),
- 'type' => 'user',
- );
-
- return array(
- 'types' => array('comment' => $type),
- 'tokens' => array(
- 'node' => $node,
- 'comment' => $comment,
- ),
- );
- }
-
- * Implements hook_tokens().
- */
- function comment_tokens($type, $tokens, array $data = array(), array $options = array()) {
- $url_options = array('absolute' => TRUE);
- if (isset($options['language'])) {
- $url_options['language'] = $options['language'];
- $langcode = $options['language']->langcode;
- }
- else {
- $langcode = NULL;
- }
- $sanitize = !empty($options['sanitize']);
-
- $replacements = array();
-
- if ($type == 'comment' && !empty($data['comment'])) {
- $comment = $data['comment'];
-
- foreach ($tokens as $name => $original) {
- switch ($name) {
-
- case 'cid':
- $replacements[$original] = $comment->cid;
- break;
-
-
- case 'hostname':
- $replacements[$original] = $sanitize ? check_plain($comment->hostname) : $comment->hostname;
- break;
-
- case 'name':
- $name = ($comment->uid == 0) ? config_get_translated('system.core', 'anonymous', array(), array('langcode' => $langcode)) : $comment->name;
- $replacements[$original] = $sanitize ? filter_xss($name) : $name;
- break;
-
- case 'mail':
- if ($comment->uid != 0) {
- $account = user_load($comment->uid);
- $mail = $account->mail;
- }
- else {
- $mail = $comment->mail;
- }
- $replacements[$original] = $sanitize ? check_plain($mail) : $mail;
- break;
-
- case 'homepage':
- $replacements[$original] = $sanitize ? check_url($comment->homepage) : $comment->homepage;
- break;
-
- case 'title':
- $replacements[$original] = $sanitize ? filter_xss($comment->subject) : $comment->subject;
- break;
-
- case 'body':
- if ($items = field_get_items('comment', $comment, 'comment_body', $langcode)) {
- $instance = field_info_instance('comment', 'body', 'comment_body');
- $field_langcode = field_language('comment', $comment, 'comment_body', $langcode);
- $replacements[$original] = $sanitize ? _text_sanitize($instance, $field_langcode, $items[0], 'value') : $items[0]['value'];
- }
- break;
-
-
- case 'url':
- $url_options['fragment'] = 'comment-' . $comment->cid;
- $replacements[$original] = url('comment/' . $comment->cid, $url_options);
- break;
-
- case 'edit-url':
- $url_options['fragment'] = NULL;
- $replacements[$original] = url('comment/' . $comment->cid . '/edit', $url_options);
- break;
-
-
- case 'author':
- $replacements[$original] = $sanitize ? filter_xss($comment->name) : $comment->name;
- break;
-
- case 'parent':
- if (!empty($comment->pid)) {
- $parent = comment_load($comment->pid);
- $replacements[$original] = $sanitize ? filter_xss($parent->subject) : $parent->subject;
- }
- break;
-
- case 'created':
- $replacements[$original] = format_date($comment->created, 'medium', '', NULL, $langcode);
- break;
-
- case 'changed':
- $replacements[$original] = format_date($comment->changed, 'medium', '', NULL, $langcode);
- break;
-
- case 'node':
- $node = node_load($comment->nid);
- $title = $node->title;
- $replacements[$original] = $sanitize ? filter_xss($title) : $title;
- break;
- }
- }
-
-
- if ($node_tokens = token_find_with_prefix($tokens, 'node')) {
- $node = node_load($comment->nid);
- $replacements += token_generate('node', $node_tokens, array('node' => $node), $options);
- }
-
- if ($date_tokens = token_find_with_prefix($tokens, 'created')) {
- $replacements += token_generate('date', $date_tokens, array('date' => $comment->created), $options);
- }
-
- if ($date_tokens = token_find_with_prefix($tokens, 'changed')) {
- $replacements += token_generate('date', $date_tokens, array('date' => $comment->changed), $options);
- }
-
- if (($url_tokens = token_find_with_prefix($tokens, 'url'))) {
- $replacements += token_generate('url', $url_tokens, $comment->uri(), $options);
- }
-
- if (($parent_tokens = token_find_with_prefix($tokens, 'parent')) && $parent = comment_load($comment->pid)) {
- $replacements += token_generate('comment', $parent_tokens, array('comment' => $parent), $options);
- }
-
- if (($author_tokens = token_find_with_prefix($tokens, 'author')) && $account = user_load($comment->uid)) {
- $replacements += token_generate('user', $author_tokens, array('user' => $account), $options);
- }
- }
- elseif ($type == 'node' & !empty($data['node'])) {
- $node = $data['node'];
-
- foreach ($tokens as $name => $original) {
- switch($name) {
- case 'comment-count':
- $replacements[$original] = $node->comment_count;
- break;
-
- case 'comment-count-new':
- $replacements[$original] = comment_num_new($node->nid);
- break;
- }
- }
- }
-
- return $replacements;
- }