/htdocs/wp-includes/comment-template.php
https://gitlab.com/VTTE/sitios-vtte · PHP · 1459 lines · 497 code · 136 blank · 826 comment · 111 complexity · dd06755975a74f8d12e48c2d32d1664d MD5 · raw file
- <?php
- /**
- * Comment template functions
- *
- * These functions are meant to live inside of the WordPress loop.
- *
- * @package WordPress
- * @subpackage Template
- */
- /**
- * Retrieves the author of the current comment.
- *
- * If the comment has an empty comment_author field, then 'Anonymous' person is
- * assumed.
- *
- * @since 1.5.0
- * @since 4.4.0 Added the ability for `$comment_ID` to also accept a WP_Comment object.
- *
- * @param int|WP_Comment $comment_ID Optional. WP_Comment or the ID of the comment for which to retrieve the author.
- * Default current comment.
- * @return string The comment author
- */
- function get_comment_author( $comment_ID = 0 ) {
- $comment = get_comment( $comment_ID );
- if ( empty( $comment->comment_author ) ) {
- $user = $comment->user_id ? get_userdata( $comment->user_id ) : false;
- if ( $user ) {
- $author = $user->display_name;
- } else {
- $author = __( 'Anonymous' );
- }
- } else {
- $author = $comment->comment_author;
- }
- /**
- * Filters the returned comment author name.
- *
- * @since 1.5.0
- * @since 4.1.0 The `$comment_ID` and `$comment` parameters were added.
- *
- * @param string $author The comment author's username.
- * @param int $comment_ID The comment ID.
- * @param WP_Comment $comment The comment object.
- */
- return apply_filters( 'get_comment_author', $author, $comment->comment_ID, $comment );
- }
- /**
- * Displays the author of the current comment.
- *
- * @since 0.71
- * @since 4.4.0 Added the ability for `$comment_ID` to also accept a WP_Comment object.
- *
- * @param int|WP_Comment $comment_ID Optional. WP_Comment or the ID of the comment for which to print the author.
- * Default current comment.
- */
- function comment_author( $comment_ID = 0 ) {
- $comment = get_comment( $comment_ID );
- $author = get_comment_author( $comment );
- /**
- * Filters the comment author's name for display.
- *
- * @since 1.2.0
- * @since 4.1.0 The `$comment_ID` parameter was added.
- *
- * @param string $author The comment author's username.
- * @param int $comment_ID The comment ID.
- */
- echo apply_filters( 'comment_author', $author, $comment->comment_ID );
- }
- /**
- * Retrieves the email of the author of the current comment.
- *
- * @since 1.5.0
- * @since 4.4.0 Added the ability for `$comment_ID` to also accept a WP_Comment object.
- *
- * @param int|WP_Comment $comment_ID Optional. WP_Comment or the ID of the comment for which to get the author's email.
- * Default current comment.
- * @return string The current comment author's email
- */
- function get_comment_author_email( $comment_ID = 0 ) {
- $comment = get_comment( $comment_ID );
- /**
- * Filters the comment author's returned email address.
- *
- * @since 1.5.0
- * @since 4.1.0 The `$comment_ID` and `$comment` parameters were added.
- *
- * @param string $comment_author_email The comment author's email address.
- * @param int $comment_ID The comment ID.
- * @param WP_Comment $comment The comment object.
- */
- return apply_filters( 'get_comment_author_email', $comment->comment_author_email, $comment->comment_ID, $comment );
- }
- /**
- * Displays the email of the author of the current global $comment.
- *
- * Care should be taken to protect the email address and assure that email
- * harvesters do not capture your commenter's email address. Most assume that
- * their email address will not appear in raw form on the site. Doing so will
- * enable anyone, including those that people don't want to get the email
- * address and use it for their own means good and bad.
- *
- * @since 0.71
- * @since 4.4.0 Added the ability for `$comment_ID` to also accept a WP_Comment object.
- *
- * @param int|WP_Comment $comment_ID Optional. WP_Comment or the ID of the comment for which to print the author's email.
- * Default current comment.
- */
- function comment_author_email( $comment_ID = 0 ) {
- $comment = get_comment( $comment_ID );
- $author_email = get_comment_author_email( $comment );
- /**
- * Filters the comment author's email for display.
- *
- * @since 1.2.0
- * @since 4.1.0 The `$comment_ID` parameter was added.
- *
- * @param string $author_email The comment author's email address.
- * @param int $comment_ID The comment ID.
- */
- echo apply_filters( 'author_email', $author_email, $comment->comment_ID );
- }
- /**
- * Displays the HTML email link to the author of the current comment.
- *
- * Care should be taken to protect the email address and assure that email
- * harvesters do not capture your commenter's email address. Most assume that
- * their email address will not appear in raw form on the site. Doing so will
- * enable anyone, including those that people don't want to get the email
- * address and use it for their own means good and bad.
- *
- * @since 0.71
- * @since 4.6.0 Added the `$comment` parameter.
- *
- * @param string $linktext Optional. Text to display instead of the comment author's email address.
- * Default empty.
- * @param string $before Optional. Text or HTML to display before the email link. Default empty.
- * @param string $after Optional. Text or HTML to display after the email link. Default empty.
- * @param int|WP_Comment $comment Optional. Comment ID or WP_Comment object. Default is the current comment.
- */
- function comment_author_email_link( $linktext = '', $before = '', $after = '', $comment = null ) {
- $link = get_comment_author_email_link( $linktext, $before, $after, $comment );
- if ( $link ) {
- echo $link;
- }
- }
- /**
- * Returns the HTML email link to the author of the current comment.
- *
- * Care should be taken to protect the email address and assure that email
- * harvesters do not capture your commenter's email address. Most assume that
- * their email address will not appear in raw form on the site. Doing so will
- * enable anyone, including those that people don't want to get the email
- * address and use it for their own means good and bad.
- *
- * @since 2.7.0
- * @since 4.6.0 Added the `$comment` parameter.
- *
- * @param string $linktext Optional. Text to display instead of the comment author's email address.
- * Default empty.
- * @param string $before Optional. Text or HTML to display before the email link. Default empty.
- * @param string $after Optional. Text or HTML to display after the email link. Default empty.
- * @param int|WP_Comment $comment Optional. Comment ID or WP_Comment object. Default is the current comment.
- * @return string HTML markup for the comment author email link. By default, the email address is obfuscated
- * via the {@see 'comment_email'} filter with antispambot().
- */
- function get_comment_author_email_link( $linktext = '', $before = '', $after = '', $comment = null ) {
- $comment = get_comment( $comment );
- /**
- * Filters the comment author's email for display.
- *
- * Care should be taken to protect the email address and assure that email
- * harvesters do not capture your commenter's email address.
- *
- * @since 1.2.0
- * @since 4.1.0 The `$comment` parameter was added.
- *
- * @param string $comment_author_email The comment author's email address.
- * @param WP_Comment $comment The comment object.
- */
- $email = apply_filters( 'comment_email', $comment->comment_author_email, $comment );
- if ( ( ! empty( $email ) ) && ( '@' !== $email ) ) {
- $display = ( '' != $linktext ) ? $linktext : $email;
- $return = $before;
- $return .= sprintf( '<a href="%1$s">%2$s</a>', esc_url( 'mailto:' . $email ), esc_html( $display ) );
- $return .= $after;
- return $return;
- } else {
- return '';
- }
- }
- /**
- * Retrieves the HTML link to the URL of the author of the current comment.
- *
- * Both get_comment_author_url() and get_comment_author() rely on get_comment(),
- * which falls back to the global comment variable if the $comment_ID argument is empty.
- *
- * @since 1.5.0
- * @since 4.4.0 Added the ability for `$comment_ID` to also accept a WP_Comment object.
- *
- * @param int|WP_Comment $comment_ID Optional. WP_Comment or the ID of the comment for which to get the author's link.
- * Default current comment.
- * @return string The comment author name or HTML link for author's URL.
- */
- function get_comment_author_link( $comment_ID = 0 ) {
- $comment = get_comment( $comment_ID );
- $url = get_comment_author_url( $comment );
- $author = get_comment_author( $comment );
- if ( empty( $url ) || 'http://' == $url ) {
- $return = $author;
- } else {
- $return = "<a href='$url' rel='external nofollow ugc' class='url'>$author</a>";
- }
- /**
- * Filters the comment author's link for display.
- *
- * @since 1.5.0
- * @since 4.1.0 The `$author` and `$comment_ID` parameters were added.
- *
- * @param string $return The HTML-formatted comment author link.
- * Empty for an invalid URL.
- * @param string $author The comment author's username.
- * @param int $comment_ID The comment ID.
- */
- return apply_filters( 'get_comment_author_link', $return, $author, $comment->comment_ID );
- }
- /**
- * Displays the HTML link to the URL of the author of the current comment.
- *
- * @since 0.71
- * @since 4.4.0 Added the ability for `$comment_ID` to also accept a WP_Comment object.
- *
- * @param int|WP_Comment $comment_ID Optional. WP_Comment or the ID of the comment for which to print the author's link.
- * Default current comment.
- */
- function comment_author_link( $comment_ID = 0 ) {
- echo get_comment_author_link( $comment_ID );
- }
- /**
- * Retrieve the IP address of the author of the current comment.
- *
- * @since 1.5.0
- * @since 4.4.0 Added the ability for `$comment_ID` to also accept a WP_Comment object.
- *
- * @param int|WP_Comment $comment_ID Optional. WP_Comment or the ID of the comment for which to get the author's IP address.
- * Default current comment.
- * @return string Comment author's IP address.
- */
- function get_comment_author_IP( $comment_ID = 0 ) { // phpcs:ignore WordPress.NamingConventions.ValidFunctionName.FunctionNameInvalid
- $comment = get_comment( $comment_ID );
- /**
- * Filters the comment author's returned IP address.
- *
- * @since 1.5.0
- * @since 4.1.0 The `$comment_ID` and `$comment` parameters were added.
- *
- * @param string $comment_author_IP The comment author's IP address.
- * @param int $comment_ID The comment ID.
- * @param WP_Comment $comment The comment object.
- */
- return apply_filters( 'get_comment_author_IP', $comment->comment_author_IP, $comment->comment_ID, $comment ); // phpcs:ignore WordPress.NamingConventions.ValidHookName.NotLowercase
- }
- /**
- * Displays the IP address of the author of the current comment.
- *
- * @since 0.71
- * @since 4.4.0 Added the ability for `$comment_ID` to also accept a WP_Comment object.
- *
- * @param int|WP_Comment $comment_ID Optional. WP_Comment or the ID of the comment for which to print the author's IP address.
- * Default current comment.
- */
- function comment_author_IP( $comment_ID = 0 ) { // phpcs:ignore WordPress.NamingConventions.ValidFunctionName.FunctionNameInvalid
- echo esc_html( get_comment_author_IP( $comment_ID ) );
- }
- /**
- * Retrieves the URL of the author of the current comment, not linked.
- *
- * @since 1.5.0
- * @since 4.4.0 Added the ability for `$comment_ID` to also accept a WP_Comment object.
- *
- * @param int|WP_Comment $comment_ID Optional. WP_Comment or the ID of the comment for which to get the author's URL.
- * Default current comment.
- * @return string Comment author URL, if provided, an empty string otherwise.
- */
- function get_comment_author_url( $comment_ID = 0 ) {
- $comment = get_comment( $comment_ID );
- $url = '';
- $id = 0;
- if ( ! empty( $comment ) ) {
- $author_url = ( 'http://' == $comment->comment_author_url ) ? '' : $comment->comment_author_url;
- $url = esc_url( $author_url, array( 'http', 'https' ) );
- $id = $comment->comment_ID;
- }
- /**
- * Filters the comment author's URL.
- *
- * @since 1.5.0
- * @since 4.1.0 The `$comment_ID` and `$comment` parameters were added.
- *
- * @param string $url The comment author's URL.
- * @param int $comment_ID The comment ID.
- * @param WP_Comment $comment The comment object.
- */
- return apply_filters( 'get_comment_author_url', $url, $id, $comment );
- }
- /**
- * Displays the URL of the author of the current comment, not linked.
- *
- * @since 0.71
- * @since 4.4.0 Added the ability for `$comment_ID` to also accept a WP_Comment object.
- *
- * @param int|WP_Comment $comment_ID Optional. WP_Comment or the ID of the comment for which to print the author's URL.
- * Default current comment.
- */
- function comment_author_url( $comment_ID = 0 ) {
- $comment = get_comment( $comment_ID );
- $author_url = get_comment_author_url( $comment );
- /**
- * Filters the comment author's URL for display.
- *
- * @since 1.2.0
- * @since 4.1.0 The `$comment_ID` parameter was added.
- *
- * @param string $author_url The comment author's URL.
- * @param int $comment_ID The comment ID.
- */
- echo apply_filters( 'comment_url', $author_url, $comment->comment_ID );
- }
- /**
- * Retrieves the HTML link of the URL of the author of the current comment.
- *
- * $linktext parameter is only used if the URL does not exist for the comment
- * author. If the URL does exist then the URL will be used and the $linktext
- * will be ignored.
- *
- * Encapsulate the HTML link between the $before and $after. So it will appear
- * in the order of $before, link, and finally $after.
- *
- * @since 1.5.0
- * @since 4.6.0 Added the `$comment` parameter.
- *
- * @param string $linktext Optional. The text to display instead of the comment
- * author's email address. Default empty.
- * @param string $before Optional. The text or HTML to display before the email link.
- * Default empty.
- * @param string $after Optional. The text or HTML to display after the email link.
- * Default empty.
- * @param int|WP_Comment $comment Optional. Comment ID or WP_Comment object.
- * Default is the current comment.
- * @return string The HTML link between the $before and $after parameters.
- */
- function get_comment_author_url_link( $linktext = '', $before = '', $after = '', $comment = 0 ) {
- $url = get_comment_author_url( $comment );
- $display = ( '' != $linktext ) ? $linktext : $url;
- $display = str_replace( 'http://www.', '', $display );
- $display = str_replace( 'http://', '', $display );
- if ( '/' == substr( $display, -1 ) ) {
- $display = substr( $display, 0, -1 );
- }
- $return = "$before<a href='$url' rel='external'>$display</a>$after";
- /**
- * Filters the comment author's returned URL link.
- *
- * @since 1.5.0
- *
- * @param string $return The HTML-formatted comment author URL link.
- */
- return apply_filters( 'get_comment_author_url_link', $return );
- }
- /**
- * Displays the HTML link of the URL of the author of the current comment.
- *
- * @since 0.71
- * @since 4.6.0 Added the `$comment` parameter.
- *
- * @param string $linktext Optional. Text to display instead of the comment author's
- * email address. Default empty.
- * @param string $before Optional. Text or HTML to display before the email link.
- * Default empty.
- * @param string $after Optional. Text or HTML to display after the email link.
- * Default empty.
- * @param int|WP_Comment $comment Optional. Comment ID or WP_Comment object.
- * Default is the current comment.
- */
- function comment_author_url_link( $linktext = '', $before = '', $after = '', $comment = 0 ) {
- echo get_comment_author_url_link( $linktext, $before, $after, $comment );
- }
- /**
- * Generates semantic classes for each comment element.
- *
- * @since 2.7.0
- * @since 4.4.0 Added the ability for `$comment` to also accept a WP_Comment object.
- *
- * @param string|array $class Optional. One or more classes to add to the class list.
- * Default empty.
- * @param int|WP_Comment $comment Comment ID or WP_Comment object. Default current comment.
- * @param int|WP_Post $post_id Post ID or WP_Post object. Default current post.
- * @param bool $echo Optional. Whether to echo or return the output.
- * Default true.
- * @return void|string Void if `$echo` argument is true, comment classes if `$echo` is false.
- */
- function comment_class( $class = '', $comment = null, $post_id = null, $echo = true ) {
- // Separates classes with a single space, collates classes for comment DIV.
- $class = 'class="' . join( ' ', get_comment_class( $class, $comment, $post_id ) ) . '"';
- if ( $echo ) {
- echo $class;
- } else {
- return $class;
- }
- }
- /**
- * Returns the classes for the comment div as an array.
- *
- * @since 2.7.0
- * @since 4.4.0 Added the ability for `$comment_id` to also accept a WP_Comment object.
- *
- * @global int $comment_alt
- * @global int $comment_depth
- * @global int $comment_thread_alt
- *
- * @param string|array $class Optional. One or more classes to add to the class list. Default empty.
- * @param int|WP_Comment $comment_id Comment ID or WP_Comment object. Default current comment.
- * @param int|WP_Post $post_id Post ID or WP_Post object. Default current post.
- * @return string[] An array of classes.
- */
- function get_comment_class( $class = '', $comment_id = null, $post_id = null ) {
- global $comment_alt, $comment_depth, $comment_thread_alt;
- $classes = array();
- $comment = get_comment( $comment_id );
- if ( ! $comment ) {
- return $classes;
- }
- // Get the comment type (comment, trackback).
- $classes[] = ( empty( $comment->comment_type ) ) ? 'comment' : $comment->comment_type;
- // Add classes for comment authors that are registered users.
- $user = $comment->user_id ? get_userdata( $comment->user_id ) : false;
- if ( $user ) {
- $classes[] = 'byuser';
- $classes[] = 'comment-author-' . sanitize_html_class( $user->user_nicename, $comment->user_id );
- // For comment authors who are the author of the post.
- $post = get_post( $post_id );
- if ( $post ) {
- if ( $comment->user_id === $post->post_author ) {
- $classes[] = 'bypostauthor';
- }
- }
- }
- if ( empty( $comment_alt ) ) {
- $comment_alt = 0;
- }
- if ( empty( $comment_depth ) ) {
- $comment_depth = 1;
- }
- if ( empty( $comment_thread_alt ) ) {
- $comment_thread_alt = 0;
- }
- if ( $comment_alt % 2 ) {
- $classes[] = 'odd';
- $classes[] = 'alt';
- } else {
- $classes[] = 'even';
- }
- $comment_alt++;
- // Alt for top-level comments.
- if ( 1 == $comment_depth ) {
- if ( $comment_thread_alt % 2 ) {
- $classes[] = 'thread-odd';
- $classes[] = 'thread-alt';
- } else {
- $classes[] = 'thread-even';
- }
- $comment_thread_alt++;
- }
- $classes[] = "depth-$comment_depth";
- if ( ! empty( $class ) ) {
- if ( ! is_array( $class ) ) {
- $class = preg_split( '#\s+#', $class );
- }
- $classes = array_merge( $classes, $class );
- }
- $classes = array_map( 'esc_attr', $classes );
- /**
- * Filters the returned CSS classes for the current comment.
- *
- * @since 2.7.0
- *
- * @param string[] $classes An array of comment classes.
- * @param string $class A comma-separated list of additional classes added to the list.
- * @param int $comment_id The comment id.
- * @param WP_Comment $comment The comment object.
- * @param int|WP_Post $post_id The post ID or WP_Post object.
- */
- return apply_filters( 'comment_class', $classes, $class, $comment->comment_ID, $comment, $post_id );
- }
- /**
- * Retrieves the comment date of the current comment.
- *
- * @since 1.5.0
- * @since 4.4.0 Added the ability for `$comment_ID` to also accept a WP_Comment object.
- *
- * @param string $format Optional. The format of the date. Default user's setting.
- * @param int|WP_Comment $comment_ID WP_Comment or ID of the comment for which to get the date.
- * Default current comment.
- * @return string The comment's date.
- */
- function get_comment_date( $format = '', $comment_ID = 0 ) {
- $comment = get_comment( $comment_ID );
- if ( '' == $format ) {
- $date = mysql2date( get_option( 'date_format' ), $comment->comment_date );
- } else {
- $date = mysql2date( $format, $comment->comment_date );
- }
- /**
- * Filters the returned comment date.
- *
- * @since 1.5.0
- *
- * @param string|int $date Formatted date string or Unix timestamp.
- * @param string $format The format of the date.
- * @param WP_Comment $comment The comment object.
- */
- return apply_filters( 'get_comment_date', $date, $format, $comment );
- }
- /**
- * Displays the comment date of the current comment.
- *
- * @since 0.71
- * @since 4.4.0 Added the ability for `$comment_ID` to also accept a WP_Comment object.
- *
- * @param string $format Optional. The format of the date. Default user's settings.
- * @param int|WP_Comment $comment_ID WP_Comment or ID of the comment for which to print the date.
- * Default current comment.
- */
- function comment_date( $format = '', $comment_ID = 0 ) {
- echo get_comment_date( $format, $comment_ID );
- }
- /**
- * Retrieves the excerpt of the given comment.
- *
- * Returns a maximum of 20 words with an ellipsis appended if necessary.
- *
- * @since 1.5.0
- * @since 4.4.0 Added the ability for `$comment_ID` to also accept a WP_Comment object.
- *
- * @param int|WP_Comment $comment_ID WP_Comment or ID of the comment for which to get the excerpt.
- * Default current comment.
- * @return string The possibly truncated comment excerpt.
- */
- function get_comment_excerpt( $comment_ID = 0 ) {
- $comment = get_comment( $comment_ID );
- if ( ! post_password_required( $comment->comment_post_ID ) ) {
- $comment_text = strip_tags( str_replace( array( "\n", "\r" ), ' ', $comment->comment_content ) );
- } else {
- $comment_text = __( 'Password protected' );
- }
- /* translators: Maximum number of words used in a comment excerpt. */
- $comment_excerpt_length = intval( _x( '20', 'comment_excerpt_length' ) );
- /**
- * Filters the maximum number of words used in the comment excerpt.
- *
- * @since 4.4.0
- *
- * @param int $comment_excerpt_length The amount of words you want to display in the comment excerpt.
- */
- $comment_excerpt_length = apply_filters( 'comment_excerpt_length', $comment_excerpt_length );
- $excerpt = wp_trim_words( $comment_text, $comment_excerpt_length, '…' );
- /**
- * Filters the retrieved comment excerpt.
- *
- * @since 1.5.0
- * @since 4.1.0 The `$comment_ID` and `$comment` parameters were added.
- *
- * @param string $excerpt The comment excerpt text.
- * @param int $comment_ID The comment ID.
- * @param WP_Comment $comment The comment object.
- */
- return apply_filters( 'get_comment_excerpt', $excerpt, $comment->comment_ID, $comment );
- }
- /**
- * Displays the excerpt of the current comment.
- *
- * @since 1.2.0
- * @since 4.4.0 Added the ability for `$comment_ID` to also accept a WP_Comment object.
- *
- * @param int|WP_Comment $comment_ID WP_Comment or ID of the comment for which to print the excerpt.
- * Default current comment.
- */
- function comment_excerpt( $comment_ID = 0 ) {
- $comment = get_comment( $comment_ID );
- $comment_excerpt = get_comment_excerpt( $comment );
- /**
- * Filters the comment excerpt for display.
- *
- * @since 1.2.0
- * @since 4.1.0 The `$comment_ID` parameter was added.
- *
- * @param string $comment_excerpt The comment excerpt text.
- * @param int $comment_ID The comment ID.
- */
- echo apply_filters( 'comment_excerpt', $comment_excerpt, $comment->comment_ID );
- }
- /**
- * Retrieves the comment id of the current comment.
- *
- * @since 1.5.0
- *
- * @return int The comment ID.
- */
- function get_comment_ID() { // phpcs:ignore WordPress.NamingConventions.ValidFunctionName.FunctionNameInvalid
- $comment = get_comment();
- /**
- * Filters the returned comment ID.
- *
- * @since 1.5.0
- * @since 4.1.0 The `$comment_ID` parameter was added.
- *
- * @param int $comment_ID The current comment ID.
- * @param WP_Comment $comment The comment object.
- */
- return apply_filters( 'get_comment_ID', $comment->comment_ID, $comment ); // phpcs:ignore WordPress.NamingConventions.ValidHookName.NotLowercase
- }
- /**
- * Displays the comment id of the current comment.
- *
- * @since 0.71
- */
- function comment_ID() { // phpcs:ignore WordPress.NamingConventions.ValidFunctionName.FunctionNameInvalid
- echo get_comment_ID();
- }
- /**
- * Retrieves the link to a given comment.
- *
- * @since 1.5.0
- * @since 4.4.0 Added the ability for `$comment` to also accept a WP_Comment object. Added `$cpage` argument.
- *
- * @see get_page_of_comment()
- *
- * @global WP_Rewrite $wp_rewrite WordPress rewrite component.
- * @global bool $in_comment_loop
- *
- * @param WP_Comment|int|null $comment Comment to retrieve. Default current comment.
- * @param array $args {
- * An array of optional arguments to override the defaults.
- *
- * @type string $type Passed to get_page_of_comment().
- * @type int $page Current page of comments, for calculating comment pagination.
- * @type int $per_page Per-page value for comment pagination.
- * @type int $max_depth Passed to get_page_of_comment().
- * @type int|string $cpage Value to use for the comment's "comment-page" or "cpage" value.
- * If provided, this value overrides any value calculated from `$page`
- * and `$per_page`.
- * }
- * @return string The permalink to the given comment.
- */
- function get_comment_link( $comment = null, $args = array() ) {
- global $wp_rewrite, $in_comment_loop;
- $comment = get_comment( $comment );
- // Back-compat.
- if ( ! is_array( $args ) ) {
- $args = array( 'page' => $args );
- }
- $defaults = array(
- 'type' => 'all',
- 'page' => '',
- 'per_page' => '',
- 'max_depth' => '',
- 'cpage' => null,
- );
- $args = wp_parse_args( $args, $defaults );
- $link = get_permalink( $comment->comment_post_ID );
- // The 'cpage' param takes precedence.
- if ( ! is_null( $args['cpage'] ) ) {
- $cpage = $args['cpage'];
- // No 'cpage' is provided, so we calculate one.
- } else {
- if ( '' === $args['per_page'] && get_option( 'page_comments' ) ) {
- $args['per_page'] = get_option( 'comments_per_page' );
- }
- if ( empty( $args['per_page'] ) ) {
- $args['per_page'] = 0;
- $args['page'] = 0;
- }
- $cpage = $args['page'];
- if ( '' == $cpage ) {
- if ( ! empty( $in_comment_loop ) ) {
- $cpage = get_query_var( 'cpage' );
- } else {
- // Requires a database hit, so we only do it when we can't figure out from context.
- $cpage = get_page_of_comment( $comment->comment_ID, $args );
- }
- }
- /*
- * If the default page displays the oldest comments, the permalinks for comments on the default page
- * do not need a 'cpage' query var.
- */
- if ( 'oldest' === get_option( 'default_comments_page' ) && 1 === $cpage ) {
- $cpage = '';
- }
- }
- if ( $cpage && get_option( 'page_comments' ) ) {
- if ( $wp_rewrite->using_permalinks() ) {
- if ( $cpage ) {
- $link = trailingslashit( $link ) . $wp_rewrite->comments_pagination_base . '-' . $cpage;
- }
- $link = user_trailingslashit( $link, 'comment' );
- } elseif ( $cpage ) {
- $link = add_query_arg( 'cpage', $cpage, $link );
- }
- }
- if ( $wp_rewrite->using_permalinks() ) {
- $link = user_trailingslashit( $link, 'comment' );
- }
- $link = $link . '#comment-' . $comment->comment_ID;
- /**
- * Filters the returned single comment permalink.
- *
- * @since 2.8.0
- * @since 4.4.0 Added the `$cpage` parameter.
- *
- * @see get_page_of_comment()
- *
- * @param string $link The comment permalink with '#comment-$id' appended.
- * @param WP_Comment $comment The current comment object.
- * @param array $args An array of arguments to override the defaults.
- * @param int $cpage The calculated 'cpage' value.
- */
- return apply_filters( 'get_comment_link', $link, $comment, $args, $cpage );
- }
- /**
- * Retrieves the link to the current post comments.
- *
- * @since 1.5.0
- *
- * @param int|WP_Post $post_id Optional. Post ID or WP_Post object. Default is global $post.
- * @return string The link to the comments.
- */
- function get_comments_link( $post_id = 0 ) {
- $hash = get_comments_number( $post_id ) ? '#comments' : '#respond';
- $comments_link = get_permalink( $post_id ) . $hash;
- /**
- * Filters the returned post comments permalink.
- *
- * @since 3.6.0
- *
- * @param string $comments_link Post comments permalink with '#comments' appended.
- * @param int|WP_Post $post_id Post ID or WP_Post object.
- */
- return apply_filters( 'get_comments_link', $comments_link, $post_id );
- }
- /**
- * Displays the link to the current post comments.
- *
- * @since 0.71
- *
- * @param string $deprecated Not Used.
- * @param string $deprecated_2 Not Used.
- */
- function comments_link( $deprecated = '', $deprecated_2 = '' ) {
- if ( ! empty( $deprecated ) ) {
- _deprecated_argument( __FUNCTION__, '0.72' );
- }
- if ( ! empty( $deprecated_2 ) ) {
- _deprecated_argument( __FUNCTION__, '1.3.0' );
- }
- echo esc_url( get_comments_link() );
- }
- /**
- * Retrieves the amount of comments a post has.
- *
- * @since 1.5.0
- *
- * @param int|WP_Post $post_id Optional. Post ID or WP_Post object. Default is the global `$post`.
- * @return string|int If the post exists, a numeric string representing the number of comments
- * the post has, otherwise 0.
- */
- function get_comments_number( $post_id = 0 ) {
- $post = get_post( $post_id );
- if ( ! $post ) {
- $count = 0;
- } else {
- $count = $post->comment_count;
- $post_id = $post->ID;
- }
- /**
- * Filters the returned comment count for a post.
- *
- * @since 1.5.0
- *
- * @param string|int $count A string representing the number of comments a post has, otherwise 0.
- * @param int $post_id Post ID.
- */
- return apply_filters( 'get_comments_number', $count, $post_id );
- }
- /**
- * Displays the language string for the number of comments the current post has.
- *
- * @since 0.71
- * @since 5.4.0 The `$deprecated` parameter was changed to `$post_id`.
- *
- * @param string $zero Optional. Text for no comments. Default false.
- * @param string $one Optional. Text for one comment. Default false.
- * @param string $more Optional. Text for more than one comment. Default false.
- * @param int|WP_Post $post_id Optional. Post ID or WP_Post object. Default is the global `$post`.
- */
- function comments_number( $zero = false, $one = false, $more = false, $post_id = 0 ) {
- echo get_comments_number_text( $zero, $one, $more, $post_id );
- }
- /**
- * Displays the language string for the number of comments the current post has.
- *
- * @since 4.0.0
- * @since 5.4.0 Added the `$post_id` parameter to allow using the function outside of the loop.
- *
- * @param string $zero Optional. Text for no comments. Default false.
- * @param string $one Optional. Text for one comment. Default false.
- * @param string $more Optional. Text for more than one comment. Default false.
- * @param int|WP_Post $post_id Optional. Post ID or WP_Post object. Default is the global `$post`.
- * @return string Language string for the number of comments a post has.
- */
- function get_comments_number_text( $zero = false, $one = false, $more = false, $post_id = 0 ) {
- $number = get_comments_number( $post_id );
- if ( $number > 1 ) {
- if ( false === $more ) {
- /* translators: %s: Number of comments. */
- $output = sprintf( _n( '%s Comment', '%s Comments', $number ), number_format_i18n( $number ) );
- } else {
- // % Comments
- /*
- * translators: If comment number in your language requires declension,
- * translate this to 'on'. Do not translate into your own language.
- */
- if ( 'on' === _x( 'off', 'Comment number declension: on or off' ) ) {
- $text = preg_replace( '#<span class="screen-reader-text">.+?</span>#', '', $more );
- $text = preg_replace( '/&.+?;/', '', $text ); // Kill entities.
- $text = trim( strip_tags( $text ), '% ' );
- // Replace '% Comments' with a proper plural form.
- if ( $text && ! preg_match( '/[0-9]+/', $text ) && false !== strpos( $more, '%' ) ) {
- /* translators: %s: Number of comments. */
- $new_text = _n( '%s Comment', '%s Comments', $number );
- $new_text = trim( sprintf( $new_text, '' ) );
- $more = str_replace( $text, $new_text, $more );
- if ( false === strpos( $more, '%' ) ) {
- $more = '% ' . $more;
- }
- }
- }
- $output = str_replace( '%', number_format_i18n( $number ), $more );
- }
- } elseif ( 0 == $number ) {
- $output = ( false === $zero ) ? __( 'No Comments' ) : $zero;
- } else { // Must be one.
- $output = ( false === $one ) ? __( '1 Comment' ) : $one;
- }
- /**
- * Filters the comments count for display.
- *
- * @since 1.5.0
- *
- * @see _n()
- *
- * @param string $output A translatable string formatted based on whether the count
- * is equal to 0, 1, or 1+.
- * @param int $number The number of post comments.
- */
- return apply_filters( 'comments_number', $output, $number );
- }
- /**
- * Retrieves the text of the current comment.
- *
- * @since 1.5.0
- * @since 4.4.0 Added the ability for `$comment_ID` to also accept a WP_Comment object.
- * @since 5.4.0 Added 'In reply to %s.' prefix to child comments in comments feed.
- *
- * @see Walker_Comment::comment()
- *
- * @param int|WP_Comment $comment_ID WP_Comment or ID of the comment for which to get the text.
- * Default current comment.
- * @param array $args Optional. An array of arguments. Default empty array.
- * @return string The comment content.
- */
- function get_comment_text( $comment_ID = 0, $args = array() ) {
- $comment = get_comment( $comment_ID );
- $comment_content = $comment->comment_content;
- if ( is_comment_feed() && $comment->comment_parent ) {
- $parent = get_comment( $comment->comment_parent );
- if ( $parent ) {
- $parent_link = esc_url( get_comment_link( $parent ) );
- $name = get_comment_author( $parent );
- $comment_content = sprintf(
- /* translators: %s: Comment link. */
- ent2ncr( __( 'In reply to %s.' ) ),
- '<a href="' . $parent_link . '">' . $name . '</a>'
- ) . "\n\n" . $comment_content;
- }
- }
- /**
- * Filters the text of a comment.
- *
- * @since 1.5.0
- *
- * @see Walker_Comment::comment()
- *
- * @param string $comment_content Text of the comment.
- * @param WP_Comment $comment The comment object.
- * @param array $args An array of arguments.
- */
- return apply_filters( 'get_comment_text', $comment_content, $comment, $args );
- }
- /**
- * Displays the text of the current comment.
- *
- * @since 0.71
- * @since 4.4.0 Added the ability for `$comment_ID` to also accept a WP_Comment object.
- *
- * @see Walker_Comment::comment()
- *
- * @param int|WP_Comment $comment_ID WP_Comment or ID of the comment for which to print the text.
- * Default current comment.
- * @param array $args Optional. An array of arguments. Default empty array.
- */
- function comment_text( $comment_ID = 0, $args = array() ) {
- $comment = get_comment( $comment_ID );
- $comment_text = get_comment_text( $comment, $args );
- /**
- * Filters the text of a comment to be displayed.
- *
- * @since 1.2.0
- *
- * @see Walker_Comment::comment()
- *
- * @param string $comment_text Text of the current comment.
- * @param WP_Comment|null $comment The comment object. Null if not found.
- * @param array $args An array of arguments.
- */
- echo apply_filters( 'comment_text', $comment_text, $comment, $args );
- }
- /**
- * Retrieves the comment time of the current comment.
- *
- * @since 1.5.0
- *
- * @param string $format Optional. The format of the time. Default user's settings.
- * @param bool $gmt Optional. Whether to use the GMT date. Default false.
- * @param bool $translate Optional. Whether to translate the time (for use in feeds).
- * Default true.
- * @return string The formatted time.
- */
- function get_comment_time( $format = '', $gmt = false, $translate = true ) {
- $comment = get_comment();
- $comment_date = $gmt ? $comment->comment_date_gmt : $comment->comment_date;
- if ( '' == $format ) {
- $date = mysql2date( get_option( 'time_format' ), $comment_date, $translate );
- } else {
- $date = mysql2date( $format, $comment_date, $translate );
- }
- /**
- * Filters the returned comment time.
- *
- * @since 1.5.0
- *
- * @param string|int $date The comment time, formatted as a date string or Unix timestamp.
- * @param string $format Date format.
- * @param bool $gmt Whether the GMT date is in use.
- * @param bool $translate Whether the time is translated.
- * @param WP_Comment $comment The comment object.
- */
- return apply_filters( 'get_comment_time', $date, $format, $gmt, $translate, $comment );
- }
- /**
- * Displays the comment time of the current comment.
- *
- * @since 0.71
- *
- * @param string $format Optional. The format of the time. Default user's settings.
- */
- function comment_time( $format = '' ) {
- echo get_comment_time( $format );
- }
- /**
- * Retrieves the comment type of the current comment.
- *
- * @since 1.5.0
- * @since 4.4.0 Added the ability for `$comment_ID` to also accept a WP_Comment object.
- *
- * @param int|WP_Comment $comment_ID Optional. WP_Comment or ID of the comment for which to get the type.
- * Default current comment.
- * @return string The comment type.
- */
- function get_comment_type( $comment_ID = 0 ) {
- $comment = get_comment( $comment_ID );
- if ( '' == $comment->comment_type ) {
- $comment->comment_type = 'comment';
- }
- /**
- * Filters the returned comment type.
- *
- * @since 1.5.0
- * @since 4.1.0 The `$comment_ID` and `$comment` parameters were added.
- *
- * @param string $comment_type The type of comment, such as 'comment', 'pingback', or 'trackback'.
- * @param int $comment_ID The comment ID.
- * @param WP_Comment $comment The comment object.
- */
- return apply_filters( 'get_comment_type', $comment->comment_type, $comment->comment_ID, $comment );
- }
- /**
- * Displays the comment type of the current comment.
- *
- * @since 0.71
- *
- * @param string $commenttxt Optional. String to display for comment type. Default false.
- * @param string $trackbacktxt Optional. String to display for trackback type. Default false.
- * @param string $pingbacktxt Optional. String to display for pingback type. Default false.
- */
- function comment_type( $commenttxt = false, $trackbacktxt = false, $pingbacktxt = false ) {
- if ( false === $commenttxt ) {
- $commenttxt = _x( 'Comment', 'noun' );
- }
- if ( false === $trackbacktxt ) {
- $trackbacktxt = __( 'Trackback' );
- }
- if ( false === $pingbacktxt ) {
- $pingbacktxt = __( 'Pingback' );
- }
- $type = get_comment_type();
- switch ( $type ) {
- case 'trackback':
- echo $trackbacktxt;
- break;
- case 'pingback':
- echo $pingbacktxt;
- break;
- default:
- echo $commenttxt;
- }
- }
- /**
- * Retrieves the current post's trackback URL.
- *
- * There is a check to see if permalink's have been enabled and if so, will
- * retrieve the pretty path. If permalinks weren't enabled, the ID of the
- * current post is used and appended to the correct page to go to.
- *
- * @since 1.5.0
- *
- * @return string The trackback URL after being filtered.
- */
- function get_trackback_url() {
- if ( '' != get_option( 'permalink_structure' ) ) {
- $tb_url = trailingslashit( get_permalink() ) . user_trailingslashit( 'trackback', 'single_trackback' );
- } else {
- $tb_url = get_option( 'siteurl' ) . '/wp-trackback.php?p=' . get_the_ID();
- }
- /**
- * Filters the returned trackback URL.
- *
- * @since 2.2.0
- *
- * @param string $tb_url The trackback URL.
- */
- return apply_filters( 'trackback_url', $tb_url );
- }
- /**
- * Displays the current post's trackback URL.
- *
- * @since 0.71
- *
- * @param bool $deprecated_echo Not used.
- * @return void|string Should only be used to echo the trackback URL, use get_trackback_url()
- * for the result instead.
- */
- function trackback_url( $deprecated_echo = true ) {
- if ( true !== $deprecated_echo ) {
- _deprecated_argument(
- __FUNCTION__,
- '2.5.0',
- sprintf(
- /* translators: %s: get_trackback_url() */
- __( 'Use %s instead if you do not want the value echoed.' ),
- '<code>get_trackback_url()</code>'
- )
- );
- }
- if ( $deprecated_echo ) {
- echo get_trackback_url();
- } else {
- return get_trackback_url();
- }
- }
- /**
- * Generates and displays the RDF for the trackback information of current post.
- *
- * Deprecated in 3.0.0, and restored in 3.0.1.
- *
- * @since 0.71
- *
- * @param int $deprecated Not used (Was $timezone = 0).
- */
- function trackback_rdf( $deprecated = '' ) {
- if ( ! empty( $deprecated ) ) {
- _deprecated_argument( __FUNCTION__, '2.5.0' );
- }
- if ( isset( $_SERVER['HTTP_USER_AGENT'] ) && false !== stripos( $_SERVER['HTTP_USER_AGENT'], 'W3C_Validator' ) ) {
- return;
- }
- echo '<rdf:RDF xmlns:rdf="http://www.w3.org/1999/02/22-rdf-syntax-ns#"
- xmlns:dc="http://purl.org/dc/elements/1.1/"
- xmlns:trackback="http://madskills.com/public/xml/rss/module/trackback/">
- <rdf:Description rdf:about="';
- the_permalink();
- echo '"' . "\n";
- echo ' dc:identifier="';
- the_permalink();
- echo '"' . "\n";
- echo ' dc:title="' . str_replace( '--', '--', wptexturize( strip_tags( get_the_title() ) ) ) . '"' . "\n";
- echo ' trackback:ping="' . get_trackback_url() . '"' . " />\n";
- echo '</rdf:RDF>';
- }
- /**
- * Determines whether the current post is open for comments.
- *
- * For more information on this and similar theme functions, check out
- * the {@link https://developer.wordpress.org/themes/basics/conditional-tags/
- * Conditional Tags} article in the Theme Developer Handbook.
- *
- * @since 1.5.0
- *
- * @param int|WP_Post $post_id Post ID or WP_Post object. Default current post.
- * @return bool True if the comments are open.
- */
- function comments_open( $post_id = null ) {
- $_post = get_post( $post_id );
- $post_id = $_post ? $_post->ID : 0;
- $open = ( 'open' == $_post->comment_status );
- /**
- * Filters whether the current post is open for comments.
- *
- * @since 2.5.0
- *
- * @param bool $open Whether the current post is open for comments.
- * @param int $post_id The post ID.
- */
- return apply_filters( 'comments_open', $open, $post_id );
- }
- /**
- * Determines whether the current post is open for pings.
- *
- * For more information on this and similar theme functions, check out
- * the {@link https://developer.wordpress.org/themes/basics/conditional-tags/
- * Conditional Tags} article in the Theme Developer Handbook.
- *
- * @since 1.5.0
- *
- * @param int|WP_Post $post_id Post ID or WP_Post object. Default current post.
- * @return bool True if pings are accepted
- */
- function pings_open( $post_id = null ) {
- $_post = get_post( $post_id );
- $post_id = $_post ? $_post->ID : 0;
- $open = ( 'open' == $_post->ping_status );
- /**
- * Filters whether the current post is open for pings.
- *
- * @since 2.5.0
- *
- * @param bool $open Whether the current post is open for pings.
- * @param int $post_id The post ID.
- */
- return apply_filters( 'pings_open', $open, $post_id );
- }
- /**
- * Displays form token for unfiltered comments.
- *
- * Will only display nonce token if the current user has permissions for
- * unfiltered html. Won't display the token for other users.
- *
- * The function was backported to 2.0.10 and was added to versions 2.1.3 and
- * above. Does not exist in versions prior to 2.0.10 in the 2.0 branch and in
- * the 2.1 branch, prior to 2.1.3. Technically added in 2.2.0.
- *
- * Backported to 2.0.10.
- *
- * @since 2.1.3
- */
- function wp_comment_form_unfiltered_html_nonce() {
- $post = get_post();
- $post_id = $post ? $post->ID : 0;
- if ( current_user_can( 'unfiltered_html' ) ) {
- wp_nonce_field( 'unfiltered-html-comment_' . $post_id, '_wp_unfiltered_html_comment_disabled', false );
- echo "<script>(function(){if(window===window.parent){document.getElementById('_wp_unfiltered_html_comment_disabled').name='_wp_unfiltered_html_comment';}})();</script>\n";
- }
- }
- /**
- * Loads the comment template specified in $file.
- *
- * Will not display the comments template if not on single post or page, or if
- * the post does not have comments.
- *
- * Uses the WordPress database object to query for the comments. The comments
- * are passed through the {@see 'comments_array'} filter hook with the list of comments
- * and the post ID respectively.
- *
- * The `$file` path is passed through a filter hook called {@see 'comments_template'},
- * which includes the TEMPLATEPATH and $file combined. Tries the $filtered path
- * first and if it fails it will require the default comment template from the
- * default theme. If either does not exist, then the WordPress process will be
- * halted. It is advised for that reason, that the default theme is not deleted.
- *
- * Will not try to get the comments if the post has none.
- *
- * @since 1.5.0
- *
- * @global WP_Query $wp_query WordPress Query object.
- * @global WP_Post $post Global post object.
- * @global wpdb $wpdb WordPress database abstraction object.
- * @global int $id
- * @global WP_Comment $comment Global comment object.
- * @global string $user_login
- * @global int $user_ID
- * @global string $user_identity
- * @global bool $overridden_cpage
- * @global bool $withcomments
- *
- * @param string $file Optional. The file to load. Default '/comments.php'.
- * @param bool $separate_comments Optional. Whether to separate the comments by comment type.
- * Default false.
- */
- function comments_template( $file = '/comments.php', $separate_comments = false ) {
- global $wp_query, $withcomments, $post, $wpdb, $id, $comment, $user_login, $user_ID, $user_identity, $overridden_cpage;
- if ( ! ( is_single() || is_page() || $withcomments ) || empty( $post ) ) {
- return;
- }
- if ( empty( $file ) ) {
- $file = '/comments.php';
- }
- $req = get_option( 'require_name_email' );
- /*
- * Comment author information fetched from the comment cookies.
- */
- $commenter = wp_get_current_commenter();
- /*
- * The name of the current comment author escaped for use in attributes.
- * Escaped by sanitize_comment_cookies().
- */
- $comment_author = $commenter['comment_author'];
- /*
- * The email address of the current comment author escaped for use in attributes.
- * Escaped by sanitize_comment_cookies().
- */
- $comment_author_email = $commenter['comment_author_email'];
- /*
- * The URL of the current comment author escaped for use in attributes.
- */
- $comment_author_url = esc_url( $commenter['comment_author_url'] );
- $comment_args = array(
- 'orderby' => 'comment_date_gmt',
- 'order' => 'ASC',
- 'status' => 'approve',
- 'post_id' => $post->ID,
- 'no_found_rows' => false,
- 'update_comment_meta_cache' => false, // We lazy-load comment meta for performance.
- );
- if ( get_option( 'thread_comments' ) ) {
- $comment_args['hierarchical'] = 'threaded';
- } else {
- $comment_args['hierarchical'] = false;
- }
- if ( $user_ID ) {
- $comment_args['include_unapproved'] = array( $user_ID );
- } else {
- $unapproved_email = wp_get_unapproved_comment_author_email();
- if ( $unapproved_email ) {
- $comment_args['include_unapproved'] = array( $unapproved_email );
- }
- }
- $per_page = 0;
- if ( get_option( 'page_comments' ) ) {
- $per_page = (int) get_query_var( 'comments_per_page' );
- if ( 0 === $per_page ) {
- $per_page = (int) get_option( 'comments_per_page' );
- }
- $comment_args['number'] = $per_page;
- $page = (int) get_query_var( 'cpage' );
- if ( $page ) {
- $comment_args['offset'] = ( $page - 1 ) * $per_page;
- } elseif ( 'oldest' === get_option( 'default_comments_page' ) ) {
- $comment_args['offset'] = 0;
- } else {
- // If fetching the first page of 'newest', we need a top-level comment count.
- $top_level_query = new WP_Comment_Query();
- $top_level_args = array(
- 'count' => true,
- 'orderby' => false,
- 'post_id' => $post->ID,
- 'status' => 'approve',
- );
- if ( $comment_args['hierarchical'] ) {
- $top_level_args['parent'] = 0;
- }
- if ( isset( $comment_args['include_unapproved'] ) ) {
- $top_level_args['include_unapproved'] = $comment_args['include_unapproved'];
- }
- $top_level_count = $top_level_query->query( $top_level_args );
- $comment_args['offset'] = ( ceil( $top_level_count / $per_page ) - 1 ) * $per_page;
- }
- }
- /**
- * Filters the arguments used to query comments in comments_template().
- *
- * @since 4.5.0
- *
- * @see WP_Comment_Query::__construct()
- *
- * @param array $comment_args {
- * Array of WP_Comment_Query arguments.
- *
- * @type string|array $orderby Field(s) to order by.
- * @type string $order Order of results. Accepts 'ASC' or 'DESC'.
- * @type string $status Comment status.
- * @type array $include_unapproved Array of IDs or email addresses whose unapproved comments
- * will be included in results.
- * @type int $post_id ID of the post.
- * @type bool $no_found_