Wordpress 4.5.3
[autoinstalls/wordpress.git] / wp-content / plugins / akismet / class.akismet.php
1 <?php
2
3 class Akismet {
4         const API_HOST = 'rest.akismet.com';
5         const API_PORT = 80;
6         const MAX_DELAY_BEFORE_MODERATION_EMAIL = 86400; // One day in seconds
7
8         private static $last_comment = '';
9         private static $initiated = false;
10         private static $prevent_moderation_email_for_these_comments = array();
11         private static $last_comment_result = null;
12         private static $comment_as_submitted_allowed_keys = array( 'blog' => '', 'blog_charset' => '', 'blog_lang' => '', 'blog_ua' => '', 'comment_agent' => '', 'comment_author' => '', 'comment_author_IP' => '', 'comment_author_email' => '', 'comment_author_url' => '', 'comment_content' => '', 'comment_date_gmt' => '', 'comment_tags' => '', 'comment_type' => '', 'guid' => '', 'is_test' => '', 'permalink' => '', 'reporter' => '', 'site_domain' => '', 'submit_referer' => '', 'submit_uri' => '', 'user_ID' => '', 'user_agent' => '', 'user_id' => '', 'user_ip' => '' );
13
14         public static function init() {
15                 if ( ! self::$initiated ) {
16                         self::init_hooks();
17                 }
18         }
19
20         /**
21          * Initializes WordPress hooks
22          */
23         private static function init_hooks() {
24                 self::$initiated = true;
25
26                 add_action( 'wp_insert_comment', array( 'Akismet', 'auto_check_update_meta' ), 10, 2 );
27                 add_filter( 'preprocess_comment', array( 'Akismet', 'auto_check_comment' ), 1 );
28                 add_action( 'akismet_scheduled_delete', array( 'Akismet', 'delete_old_comments' ) );
29                 add_action( 'akismet_scheduled_delete', array( 'Akismet', 'delete_old_comments_meta' ) );
30                 add_action( 'akismet_schedule_cron_recheck', array( 'Akismet', 'cron_recheck' ) );
31
32                 /**
33                  * To disable the Akismet comment nonce, add a filter for the 'akismet_comment_nonce' tag
34                  * and return any string value that is not 'true' or '' (empty string).
35                  *
36                  * Don't return boolean false, because that implies that the 'akismet_comment_nonce' option
37                  * has not been set and that Akismet should just choose the default behavior for that
38                  * situation.
39                  */
40                 $akismet_comment_nonce_option = apply_filters( 'akismet_comment_nonce', get_option( 'akismet_comment_nonce' ) );
41
42                 if ( $akismet_comment_nonce_option == 'true' || $akismet_comment_nonce_option == '' )
43                         add_action( 'comment_form',  array( 'Akismet',  'add_comment_nonce' ), 1 );
44
45                 add_action( 'admin_head-edit-comments.php', array( 'Akismet', 'load_form_js' ) );
46                 add_action( 'comment_form', array( 'Akismet', 'load_form_js' ) );
47                 add_action( 'comment_form', array( 'Akismet', 'inject_ak_js' ) );
48
49                 add_filter( 'comment_moderation_recipients', array( 'Akismet', 'disable_moderation_emails_if_unreachable' ), 1000, 2 );
50                 add_filter( 'pre_comment_approved', array( 'Akismet', 'last_comment_status' ), 10, 2 );
51                 
52                 add_action( 'transition_comment_status', array( 'Akismet', 'transition_comment_status' ), 10, 3 );
53
54                 // Run this early in the pingback call, before doing a remote fetch of the source uri
55                 add_action( 'xmlrpc_call', array( 'Akismet', 'pre_check_pingback' ) );
56                 
57                 // Jetpack compatibility
58                 add_filter( 'jetpack_options_whitelist', array( 'Akismet', 'add_to_jetpack_options_whitelist' ) );
59                 add_action( 'update_option_wordpress_api_key', array( 'Akismet', 'updated_option' ), 10, 2 );
60         }
61
62         public static function get_api_key() {
63                 return apply_filters( 'akismet_get_api_key', defined('WPCOM_API_KEY') ? constant('WPCOM_API_KEY') : get_option('wordpress_api_key') );
64         }
65
66         public static function check_key_status( $key, $ip = null ) {
67                 return self::http_post( Akismet::build_query( array( 'key' => $key, 'blog' => get_option('home') ) ), 'verify-key', $ip );
68         }
69
70         public static function verify_key( $key, $ip = null ) {
71                 $response = self::check_key_status( $key, $ip );
72
73                 if ( $response[1] != 'valid' && $response[1] != 'invalid' )
74                         return 'failed';
75
76                 return $response[1];
77         }
78
79         public static function deactivate_key( $key ) {
80                 $response = self::http_post( Akismet::build_query( array( 'key' => $key, 'blog' => get_option('home') ) ), 'deactivate' );
81
82                 if ( $response[1] != 'deactivated' )
83                         return 'failed';
84
85                 return $response[1];
86         }
87
88         /**
89          * Add the akismet option to the Jetpack options management whitelist.
90          *
91          * @param array $options The list of whitelisted option names.
92          * @return array The updated whitelist
93          */
94         public static function add_to_jetpack_options_whitelist( $options ) {
95                 $options[] = 'wordpress_api_key';
96                 return $options;
97         }
98
99         /**
100          * When the akismet option is updated, run the registration call.
101          *
102          * This should only be run when the option is updated from the Jetpack/WP.com
103          * API call, and only if the new key is different than the old key.
104          *
105          * @param mixed  $old_value   The old option value.
106          * @param mixed  $value       The new option value.
107          */
108         public static function updated_option( $old_value, $value ) {
109                 // Not an API call
110                 if ( ! class_exists( 'WPCOM_JSON_API_Update_Option_Endpoint' ) ) {
111                         return;
112                 }
113                 // Only run the registration if the old key is different.
114                 if ( $old_value !== $value ) {
115                         self::verify_key( $value );
116                 }
117         }
118
119         public static function auto_check_comment( $commentdata ) {
120                 self::$last_comment_result = null;
121
122                 $comment = $commentdata;
123
124                 $comment['user_ip']      = self::get_ip_address();
125                 $comment['user_agent']   = self::get_user_agent();
126                 $comment['referrer']     = self::get_referer();
127                 $comment['blog']         = get_option('home');
128                 $comment['blog_lang']    = get_locale();
129                 $comment['blog_charset'] = get_option('blog_charset');
130                 $comment['permalink']    = get_permalink( $comment['comment_post_ID'] );
131
132                 if ( !empty( $comment['user_ID'] ) )
133                         $comment['user_role'] = Akismet::get_user_roles( $comment['user_ID'] );
134
135                 /** See filter documentation in init_hooks(). */
136                 $akismet_nonce_option = apply_filters( 'akismet_comment_nonce', get_option( 'akismet_comment_nonce' ) );
137                 $comment['akismet_comment_nonce'] = 'inactive';
138                 if ( $akismet_nonce_option == 'true' || $akismet_nonce_option == '' ) {
139                         $comment['akismet_comment_nonce'] = 'failed';
140                         if ( isset( $_POST['akismet_comment_nonce'] ) && wp_verify_nonce( $_POST['akismet_comment_nonce'], 'akismet_comment_nonce_' . $comment['comment_post_ID'] ) )
141                                 $comment['akismet_comment_nonce'] = 'passed';
142
143                         // comment reply in wp-admin
144                         if ( isset( $_POST['_ajax_nonce-replyto-comment'] ) && check_ajax_referer( 'replyto-comment', '_ajax_nonce-replyto-comment' ) )
145                                 $comment['akismet_comment_nonce'] = 'passed';
146
147                 }
148
149                 if ( self::is_test_mode() )
150                         $comment['is_test'] = 'true';
151
152                 foreach( $_POST as $key => $value ) {
153                         if ( is_string( $value ) )
154                                 $comment["POST_{$key}"] = $value;
155                 }
156
157                 foreach ( $_SERVER as $key => $value ) {
158                         if ( ! is_string( $value ) ) {
159                                 continue;
160                         }
161
162                         if ( preg_match( "/^HTTP_COOKIE/", $key ) ) {
163                                 continue;
164                         }
165
166                         // Send any potentially useful $_SERVER vars, but avoid sending junk we don't need.
167                         if ( preg_match( "/^(HTTP_|REMOTE_ADDR|REQUEST_URI|DOCUMENT_URI)/", $key ) ) {
168                                 $comment[ "$key" ] = $value;
169                         }
170                 }
171
172                 $post = get_post( $comment['comment_post_ID'] );
173                 $comment[ 'comment_post_modified_gmt' ] = $post->post_modified_gmt;
174
175                 $response = self::http_post( Akismet::build_query( $comment ), 'comment-check' );
176
177                 do_action( 'akismet_comment_check_response', $response );
178
179                 $commentdata['comment_as_submitted'] = array_intersect_key( $comment, self::$comment_as_submitted_allowed_keys );
180                 $commentdata['akismet_result']       = $response[1];
181
182                 if ( isset( $response[0]['x-akismet-pro-tip'] ) )
183                 $commentdata['akismet_pro_tip'] = $response[0]['x-akismet-pro-tip'];
184
185                 if ( isset( $response[0]['x-akismet-error'] ) ) {
186                         // An error occurred that we anticipated (like a suspended key) and want the user to act on.
187                         // Send to moderation.
188                         self::$last_comment_result = '0';
189                 }
190                 else if ( 'true' == $response[1] ) {
191                         // akismet_spam_count will be incremented later by comment_is_spam()
192                         self::$last_comment_result = 'spam';
193
194                         $discard = ( isset( $commentdata['akismet_pro_tip'] ) && $commentdata['akismet_pro_tip'] === 'discard' && self::allow_discard() );
195
196                         do_action( 'akismet_spam_caught', $discard );
197
198                         if ( $discard ) {
199                                 // akismet_result_spam() won't be called so bump the counter here
200                                 if ( $incr = apply_filters('akismet_spam_count_incr', 1) )
201                                         update_option( 'akismet_spam_count', get_option('akismet_spam_count') + $incr );
202                                 $redirect_to = isset( $_SERVER['HTTP_REFERER'] ) ? $_SERVER['HTTP_REFERER'] : get_permalink( $post );
203                                 wp_safe_redirect( esc_url_raw( $redirect_to ) );
204                                 die();
205                         }
206                 }
207                 
208                 // if the response is neither true nor false, hold the comment for moderation and schedule a recheck
209                 if ( 'true' != $response[1] && 'false' != $response[1] ) {
210                         if ( !current_user_can('moderate_comments') ) {
211                                 // Comment status should be moderated
212                                 self::$last_comment_result = '0';
213                         }
214                         if ( function_exists('wp_next_scheduled') && function_exists('wp_schedule_single_event') ) {
215                                 if ( !wp_next_scheduled( 'akismet_schedule_cron_recheck' ) ) {
216                                         wp_schedule_single_event( time() + 1200, 'akismet_schedule_cron_recheck' );
217                                         do_action( 'akismet_scheduled_recheck', 'invalid-response-' . $response[1] );
218                                 }
219                         }
220
221                         self::$prevent_moderation_email_for_these_comments[] = $commentdata;
222                 }
223
224                 if ( function_exists('wp_next_scheduled') && function_exists('wp_schedule_event') ) {
225                         // WP 2.1+: delete old comments daily
226                         if ( !wp_next_scheduled( 'akismet_scheduled_delete' ) )
227                                 wp_schedule_event( time(), 'daily', 'akismet_scheduled_delete' );
228                 }
229                 elseif ( (mt_rand(1, 10) == 3) ) {
230                         // WP 2.0: run this one time in ten
231                         self::delete_old_comments();
232                 }
233                 
234                 self::set_last_comment( $commentdata );
235                 self::fix_scheduled_recheck();
236
237                 return $commentdata;
238         }
239         
240         public static function get_last_comment() {
241                 return self::$last_comment;
242         }
243         
244         public static function set_last_comment( $comment ) {
245                 if ( is_null( $comment ) ) {
246                         self::$last_comment = null;
247                 }
248                 else {
249                         // We filter it here so that it matches the filtered comment data that we'll have to compare against later.
250                         // wp_filter_comment expects comment_author_IP
251                         self::$last_comment = wp_filter_comment(
252                                 array_merge(
253                                         array( 'comment_author_IP' => self::get_ip_address() ),
254                                         $comment
255                                 )
256                         );
257                 }
258         }
259
260         // this fires on wp_insert_comment.  we can't update comment_meta when auto_check_comment() runs
261         // because we don't know the comment ID at that point.
262         public static function auto_check_update_meta( $id, $comment ) {
263
264                 // failsafe for old WP versions
265                 if ( !function_exists('add_comment_meta') )
266                         return false;
267
268                 if ( !isset( self::$last_comment['comment_author_email'] ) )
269                         self::$last_comment['comment_author_email'] = '';
270
271                 // wp_insert_comment() might be called in other contexts, so make sure this is the same comment
272                 // as was checked by auto_check_comment
273                 if ( is_object( $comment ) && !empty( self::$last_comment ) && is_array( self::$last_comment ) ) {
274                         if ( self::matches_last_comment( $comment ) ) {
275                                         
276                                         load_plugin_textdomain( 'akismet' );
277                                         
278                                         // normal result: true or false
279                                         if ( self::$last_comment['akismet_result'] == 'true' ) {
280                                                 update_comment_meta( $comment->comment_ID, 'akismet_result', 'true' );
281                                                 self::update_comment_history( $comment->comment_ID, '', 'check-spam' );
282                                                 if ( $comment->comment_approved != 'spam' )
283                                                         self::update_comment_history(
284                                                                 $comment->comment_ID,
285                                                                 '',
286                                                                 'status-changed-'.$comment->comment_approved
287                                                         );
288                                         }
289                                         elseif ( self::$last_comment['akismet_result'] == 'false' ) {
290                                                 update_comment_meta( $comment->comment_ID, 'akismet_result', 'false' );
291                                                 self::update_comment_history( $comment->comment_ID, '', 'check-ham' );
292                                                 // Status could be spam or trash, depending on the WP version and whether this change applies:
293                                                 // https://core.trac.wordpress.org/changeset/34726
294                                                 if ( $comment->comment_approved == 'spam' || $comment->comment_approved == 'trash' ) {
295                                                         if ( wp_blacklist_check($comment->comment_author, $comment->comment_author_email, $comment->comment_author_url, $comment->comment_content, $comment->comment_author_IP, $comment->comment_agent) )
296                                                                 self::update_comment_history( $comment->comment_ID, '', 'wp-blacklisted' );
297                                                         else
298                                                                 self::update_comment_history( $comment->comment_ID, '', 'status-changed-'.$comment->comment_approved );
299                                                 }
300                                         } // abnormal result: error
301                                         else {
302                                                 update_comment_meta( $comment->comment_ID, 'akismet_error', time() );
303                                                 self::update_comment_history(
304                                                         $comment->comment_ID,
305                                                         '',
306                                                         'check-error',
307                                                         array( 'response' => substr( self::$last_comment['akismet_result'], 0, 50 ) )
308                                                 );
309                                         }
310
311                                         // record the complete original data as submitted for checking
312                                         if ( isset( self::$last_comment['comment_as_submitted'] ) )
313                                                 update_comment_meta( $comment->comment_ID, 'akismet_as_submitted', self::$last_comment['comment_as_submitted'] );
314
315                                         if ( isset( self::$last_comment['akismet_pro_tip'] ) )
316                                                 update_comment_meta( $comment->comment_ID, 'akismet_pro_tip', self::$last_comment['akismet_pro_tip'] );
317                         }
318                 }
319         }
320
321         public static function delete_old_comments() {
322                 global $wpdb;
323
324                 /**
325                  * Determines how many comments will be deleted in each batch.
326                  *
327                  * @param int The default, as defined by AKISMET_DELETE_LIMIT.
328                  */
329                 $delete_limit = apply_filters( 'akismet_delete_comment_limit', defined( 'AKISMET_DELETE_LIMIT' ) ? AKISMET_DELETE_LIMIT : 10000 );
330                 $delete_limit = max( 1, intval( $delete_limit ) );
331
332                 /**
333                  * Determines how many days a comment will be left in the Spam queue before being deleted.
334                  *
335                  * @param int The default number of days.
336                  */
337                 $delete_interval = apply_filters( 'akismet_delete_comment_interval', 15 );
338                 $delete_interval = max( 1, intval( $delete_interval ) );
339
340                 while ( $comment_ids = $wpdb->get_col( $wpdb->prepare( "SELECT comment_id FROM {$wpdb->comments} WHERE DATE_SUB(NOW(), INTERVAL %d DAY) > comment_date_gmt AND comment_approved = 'spam' LIMIT %d", $delete_interval, $delete_limit ) ) ) {
341                         if ( empty( $comment_ids ) )
342                                 return;
343
344                         $wpdb->queries = array();
345
346                         foreach ( $comment_ids as $comment_id ) {
347                                 do_action( 'delete_comment', $comment_id );
348                         }
349
350                         $comma_comment_ids = implode( ', ', array_map('intval', $comment_ids) );
351
352                         $wpdb->query("DELETE FROM {$wpdb->comments} WHERE comment_id IN ( $comma_comment_ids )");
353                         $wpdb->query("DELETE FROM {$wpdb->commentmeta} WHERE comment_id IN ( $comma_comment_ids )");
354
355                         clean_comment_cache( $comment_ids );
356                 }
357
358                 if ( apply_filters( 'akismet_optimize_table', ( mt_rand(1, 5000) == 11), $wpdb->comments ) ) // lucky number
359                         $wpdb->query("OPTIMIZE TABLE {$wpdb->comments}");
360         }
361
362         public static function delete_old_comments_meta() {
363                 global $wpdb;
364
365                 $interval = apply_filters( 'akismet_delete_commentmeta_interval', 15 );
366
367                 # enfore a minimum of 1 day
368                 $interval = absint( $interval );
369                 if ( $interval < 1 )
370                         $interval = 1;
371
372                 // akismet_as_submitted meta values are large, so expire them
373                 // after $interval days regardless of the comment status
374                 while ( $comment_ids = $wpdb->get_col( $wpdb->prepare( "SELECT m.comment_id FROM {$wpdb->commentmeta} as m INNER JOIN {$wpdb->comments} as c USING(comment_id) WHERE m.meta_key = 'akismet_as_submitted' AND DATE_SUB(NOW(), INTERVAL %d DAY) > c.comment_date_gmt LIMIT 10000", $interval ) ) ) {
375                         if ( empty( $comment_ids ) )
376                                 return;
377
378                         $wpdb->queries = array();
379
380                         foreach ( $comment_ids as $comment_id ) {
381                                 delete_comment_meta( $comment_id, 'akismet_as_submitted' );
382                         }
383                 }
384
385                 if ( apply_filters( 'akismet_optimize_table', ( mt_rand(1, 5000) == 11), $wpdb->commentmeta ) ) // lucky number
386                         $wpdb->query("OPTIMIZE TABLE {$wpdb->commentmeta}");
387         }
388
389         // how many approved comments does this author have?
390         public static function get_user_comments_approved( $user_id, $comment_author_email, $comment_author, $comment_author_url ) {
391                 global $wpdb;
392
393                 if ( !empty( $user_id ) )
394                         return (int) $wpdb->get_var( $wpdb->prepare( "SELECT COUNT(*) FROM {$wpdb->comments} WHERE user_id = %d AND comment_approved = 1", $user_id ) );
395
396                 if ( !empty( $comment_author_email ) )
397                         return (int) $wpdb->get_var( $wpdb->prepare( "SELECT COUNT(*) FROM {$wpdb->comments} WHERE comment_author_email = %s AND comment_author = %s AND comment_author_url = %s AND comment_approved = 1", $comment_author_email, $comment_author, $comment_author_url ) );
398
399                 return 0;
400         }
401
402         // get the full comment history for a given comment, as an array in reverse chronological order
403         public static function get_comment_history( $comment_id ) {
404
405                 // failsafe for old WP versions
406                 if ( !function_exists('add_comment_meta') )
407                         return false;
408
409                 $history = get_comment_meta( $comment_id, 'akismet_history', false );
410                 usort( $history, array( 'Akismet', '_cmp_time' ) );
411                 return $history;
412         }
413
414         /**
415          * Log an event for a given comment, storing it in comment_meta.
416          *
417          * @param int $comment_id The ID of the relevant comment.
418          * @param string $message The string description of the event. No longer used.
419          * @param string $event The event code.
420          * @param array $meta Metadata about the history entry. e.g., the user that reported or changed the status of a given comment.
421          */
422         public static function update_comment_history( $comment_id, $message, $event=null, $meta=null ) {
423                 global $current_user;
424
425                 // failsafe for old WP versions
426                 if ( !function_exists('add_comment_meta') )
427                         return false;
428
429                 $user = '';
430
431                 $event = array(
432                         'time'    => self::_get_microtime(),
433                         'event'   => $event,
434                 );
435                 
436                 if ( is_object( $current_user ) && isset( $current_user->user_login ) ) {
437                         $event['user'] = $current_user->user_login;
438                 }
439                 
440                 if ( ! empty( $meta ) ) {
441                         $event['meta'] = $meta;
442                 }
443
444                 // $unique = false so as to allow multiple values per comment
445                 $r = add_comment_meta( $comment_id, 'akismet_history', $event, false );
446         }
447
448         public static function check_db_comment( $id, $recheck_reason = 'recheck_queue' ) {
449                 global $wpdb;
450
451                 $c = $wpdb->get_row( $wpdb->prepare( "SELECT * FROM {$wpdb->comments} WHERE comment_ID = %d", $id ), ARRAY_A );
452                 if ( !$c )
453                         return;
454
455                 $c['user_ip']        = $c['comment_author_IP'];
456                 $c['user_agent']     = $c['comment_agent'];
457                 $c['referrer']       = '';
458                 $c['blog']           = get_option('home');
459                 $c['blog_lang']      = get_locale();
460                 $c['blog_charset']   = get_option('blog_charset');
461                 $c['permalink']      = get_permalink($c['comment_post_ID']);
462                 $c['recheck_reason'] = $recheck_reason;
463
464                 if ( self::is_test_mode() )
465                         $c['is_test'] = 'true';
466
467                 $response = self::http_post( Akismet::build_query( $c ), 'comment-check' );
468
469                 return ( is_array( $response ) && ! empty( $response[1] ) ) ? $response[1] : false;
470         }
471         
472         
473
474         public static function transition_comment_status( $new_status, $old_status, $comment ) {
475                 
476                 if ( $new_status == $old_status )
477                         return;
478
479                 # we don't need to record a history item for deleted comments
480                 if ( $new_status == 'delete' )
481                         return;
482                 
483                 if ( !current_user_can( 'edit_post', $comment->comment_post_ID ) && !current_user_can( 'moderate_comments' ) )
484                         return;
485
486                 if ( defined('WP_IMPORTING') && WP_IMPORTING == true )
487                         return;
488                         
489                 // if this is present, it means the status has been changed by a re-check, not an explicit user action
490                 if ( get_comment_meta( $comment->comment_ID, 'akismet_rechecking' ) )
491                         return;
492                 
493                 global $current_user;
494                 $reporter = '';
495                 if ( is_object( $current_user ) )
496                         $reporter = $current_user->user_login;
497
498                 // Assumption alert:
499                 // We want to submit comments to Akismet only when a moderator explicitly spams or approves it - not if the status
500                 // is changed automatically by another plugin.  Unfortunately WordPress doesn't provide an unambiguous way to
501                 // determine why the transition_comment_status action was triggered.  And there are several different ways by which
502                 // to spam and unspam comments: bulk actions, ajax, links in moderation emails, the dashboard, and perhaps others.
503                 // We'll assume that this is an explicit user action if certain POST/GET variables exist.
504                 if ( ( isset( $_POST['status'] ) && in_array( $_POST['status'], array( 'spam', 'unspam' ) ) ) ||
505                          ( isset( $_POST['spam'] )   && (int) $_POST['spam'] == 1 ) ||
506                          ( isset( $_POST['unspam'] ) && (int) $_POST['unspam'] == 1 ) ||
507                          ( isset( $_POST['comment_status'] )  && in_array( $_POST['comment_status'], array( 'spam', 'unspam' ) ) ) ||
508                          ( isset( $_GET['action'] )  && in_array( $_GET['action'], array( 'spam', 'unspam', 'spamcomment', 'unspamcomment', ) ) ) ||
509                          ( isset( $_POST['action'] ) && in_array( $_POST['action'], array( 'editedcomment' ) ) ) ||
510                          ( isset( $_GET['for'] ) && ( 'jetpack' == $_GET['for'] ) ) // Moderation via WP.com notifications/WP app/etc.
511                  ) {
512                         if ( $new_status == 'spam' && ( $old_status == 'approved' || $old_status == 'unapproved' || !$old_status ) ) {
513                                 return self::submit_spam_comment( $comment->comment_ID );
514                         } elseif ( $old_status == 'spam' && ( $new_status == 'approved' || $new_status == 'unapproved' ) ) {
515                                 return self::submit_nonspam_comment( $comment->comment_ID );
516                         }
517                 }
518
519                 self::update_comment_history( $comment->comment_ID, '', 'status-' . $new_status );
520         }
521         
522         public static function submit_spam_comment( $comment_id ) {
523                 global $wpdb, $current_user, $current_site;
524
525                 $comment_id = (int) $comment_id;
526
527                 $comment = $wpdb->get_row( $wpdb->prepare( "SELECT * FROM {$wpdb->comments} WHERE comment_ID = %d", $comment_id ) );
528
529                 if ( !$comment ) // it was deleted
530                         return;
531
532                 if ( 'spam' != $comment->comment_approved )
533                         return;
534
535                 // use the original version stored in comment_meta if available
536                 $as_submitted = self::sanitize_comment_as_submitted( get_comment_meta( $comment_id, 'akismet_as_submitted', true ) );
537
538                 if ( $as_submitted && is_array( $as_submitted ) && isset( $as_submitted['comment_content'] ) )
539                         $comment = (object) array_merge( (array)$comment, $as_submitted );
540
541                 $comment->blog         = get_bloginfo('url');
542                 $comment->blog_lang    = get_locale();
543                 $comment->blog_charset = get_option('blog_charset');
544                 $comment->permalink    = get_permalink($comment->comment_post_ID);
545
546                 if ( is_object($current_user) )
547                         $comment->reporter = $current_user->user_login;
548
549                 if ( is_object($current_site) )
550                         $comment->site_domain = $current_site->domain;
551
552                 $comment->user_role = '';
553                 if ( isset( $comment->user_ID ) )
554                         $comment->user_role = Akismet::get_user_roles( $comment->user_ID );
555
556                 if ( self::is_test_mode() )
557                         $comment->is_test = 'true';
558
559                 $post = get_post( $comment->comment_post_ID );
560                 $comment->comment_post_modified_gmt = $post->post_modified_gmt;
561
562                 $response = Akismet::http_post( Akismet::build_query( $comment ), 'submit-spam' );
563                 if ( $comment->reporter ) {
564                         self::update_comment_history( $comment_id, '', 'report-spam' );
565                         update_comment_meta( $comment_id, 'akismet_user_result', 'true' );
566                         update_comment_meta( $comment_id, 'akismet_user', $comment->reporter );
567                 }
568
569                 do_action('akismet_submit_spam_comment', $comment_id, $response[1]);
570         }
571
572         public static function submit_nonspam_comment( $comment_id ) {
573                 global $wpdb, $current_user, $current_site;
574
575                 $comment_id = (int) $comment_id;
576
577                 $comment = $wpdb->get_row( $wpdb->prepare( "SELECT * FROM {$wpdb->comments} WHERE comment_ID = %d", $comment_id ) );
578                 if ( !$comment ) // it was deleted
579                         return;
580
581                 // use the original version stored in comment_meta if available
582                 $as_submitted = self::sanitize_comment_as_submitted( get_comment_meta( $comment_id, 'akismet_as_submitted', true ) );
583
584                 if ( $as_submitted && is_array($as_submitted) && isset($as_submitted['comment_content']) )
585                         $comment = (object) array_merge( (array)$comment, $as_submitted );
586
587                 $comment->blog         = get_bloginfo('url');
588                 $comment->blog_lang    = get_locale();
589                 $comment->blog_charset = get_option('blog_charset');
590                 $comment->permalink    = get_permalink( $comment->comment_post_ID );
591                 $comment->user_role    = '';
592
593                 if ( is_object($current_user) )
594                         $comment->reporter = $current_user->user_login;
595
596                 if ( is_object($current_site) )
597                         $comment->site_domain = $current_site->domain;
598
599                 if ( isset( $comment->user_ID ) )
600                         $comment->user_role = Akismet::get_user_roles($comment->user_ID);
601
602                 if ( Akismet::is_test_mode() )
603                         $comment->is_test = 'true';
604
605                 $post = get_post( $comment->comment_post_ID );
606                 $comment->comment_post_modified_gmt = $post->post_modified_gmt;
607
608                 $response = self::http_post( Akismet::build_query( $comment ), 'submit-ham' );
609                 if ( $comment->reporter ) {
610                         self::update_comment_history( $comment_id, '', 'report-ham' );
611                         update_comment_meta( $comment_id, 'akismet_user_result', 'false' );
612                         update_comment_meta( $comment_id, 'akismet_user', $comment->reporter );
613                 }
614
615                 do_action('akismet_submit_nonspam_comment', $comment_id, $response[1]);
616         }
617
618         public static function cron_recheck() {
619                 global $wpdb;
620
621                 $api_key = self::get_api_key();
622
623                 $status = self::verify_key( $api_key );
624                 if ( get_option( 'akismet_alert_code' ) || $status == 'invalid' ) {
625                         // since there is currently a problem with the key, reschedule a check for 6 hours hence
626                         wp_schedule_single_event( time() + 21600, 'akismet_schedule_cron_recheck' );
627                         do_action( 'akismet_scheduled_recheck', 'key-problem-' . get_option( 'akismet_alert_code' ) . '-' . $status );
628                         return false;
629                 }
630
631                 delete_option('akismet_available_servers');
632
633                 $comment_errors = $wpdb->get_col( "SELECT comment_id FROM {$wpdb->commentmeta} WHERE meta_key = 'akismet_error' LIMIT 100" );
634                 
635                 load_plugin_textdomain( 'akismet' );
636
637                 foreach ( (array) $comment_errors as $comment_id ) {
638                         // if the comment no longer exists, or is too old, remove the meta entry from the queue to avoid getting stuck
639                         $comment = get_comment( $comment_id );
640                         if ( !$comment || strtotime( $comment->comment_date_gmt ) < strtotime( "-15 days" ) ) {
641                                 delete_comment_meta( $comment_id, 'akismet_error' );
642                                 delete_comment_meta( $comment_id, 'akismet_delayed_moderation_email' );
643                                 continue;
644                         }
645
646                         add_comment_meta( $comment_id, 'akismet_rechecking', true );
647                         $status = self::check_db_comment( $comment_id, 'retry' );
648
649                         $event = '';
650                         if ( $status == 'true' ) {
651                                 $event = 'cron-retry-spam';
652                         } elseif ( $status == 'false' ) {
653                                 $event = 'cron-retry-ham';
654                         }
655
656                         // If we got back a legit response then update the comment history
657                         // other wise just bail now and try again later.  No point in
658                         // re-trying all the comments once we hit one failure.
659                         if ( !empty( $event ) ) {
660                                 delete_comment_meta( $comment_id, 'akismet_error' );
661                                 self::update_comment_history( $comment_id, '', $event );
662                                 update_comment_meta( $comment_id, 'akismet_result', $status );
663                                 // make sure the comment status is still pending.  if it isn't, that means the user has already moved it elsewhere.
664                                 $comment = get_comment( $comment_id );
665                                 if ( $comment && 'unapproved' == wp_get_comment_status( $comment_id ) ) {
666                                         if ( $status == 'true' ) {
667                                                 wp_spam_comment( $comment_id );
668                                         } elseif ( $status == 'false' ) {
669                                                 // comment is good, but it's still in the pending queue.  depending on the moderation settings
670                                                 // we may need to change it to approved.
671                                                 if ( check_comment($comment->comment_author, $comment->comment_author_email, $comment->comment_author_url, $comment->comment_content, $comment->comment_author_IP, $comment->comment_agent, $comment->comment_type) )
672                                                         wp_set_comment_status( $comment_id, 1 );
673                                                 else if ( get_comment_meta( $comment_id, 'akismet_delayed_moderation_email', true ) )
674                                                         wp_notify_moderator( $comment_id );
675                                         }
676                                 }
677                                 
678                                 delete_comment_meta( $comment_id, 'akismet_delayed_moderation_email' );
679                         } else {
680                                 // If this comment has been pending moderation for longer than MAX_DELAY_BEFORE_MODERATION_EMAIL,
681                                 // send a moderation email now.
682                                 if ( ( intval( gmdate( 'U' ) ) - strtotime( $comment->comment_date_gmt ) ) < self::MAX_DELAY_BEFORE_MODERATION_EMAIL ) {
683                                         delete_comment_meta( $comment_id, 'akismet_delayed_moderation_email' );
684                                         wp_notify_moderator( $comment_id );
685                                 }
686
687                                 delete_comment_meta( $comment_id, 'akismet_rechecking' );
688                                 wp_schedule_single_event( time() + 1200, 'akismet_schedule_cron_recheck' );
689                                 do_action( 'akismet_scheduled_recheck', 'check-db-comment-' . $status );
690                                 return;
691                         }
692                         delete_comment_meta( $comment_id, 'akismet_rechecking' );
693                 }
694
695                 $remaining = $wpdb->get_var( "SELECT COUNT(*) FROM {$wpdb->commentmeta} WHERE meta_key = 'akismet_error'" );
696                 if ( $remaining && !wp_next_scheduled('akismet_schedule_cron_recheck') ) {
697                         wp_schedule_single_event( time() + 1200, 'akismet_schedule_cron_recheck' );
698                         do_action( 'akismet_scheduled_recheck', 'remaining' );
699                 }
700         }
701
702         public static function fix_scheduled_recheck() {
703                 $future_check = wp_next_scheduled( 'akismet_schedule_cron_recheck' );
704                 if ( !$future_check ) {
705                         return;
706                 }
707
708                 if ( get_option( 'akismet_alert_code' ) > 0 ) {
709                         return;
710                 }
711
712                 $check_range = time() + 1200;
713                 if ( $future_check > $check_range ) {
714                         wp_clear_scheduled_hook( 'akismet_schedule_cron_recheck' );
715                         wp_schedule_single_event( time() + 300, 'akismet_schedule_cron_recheck' );
716                         do_action( 'akismet_scheduled_recheck', 'fix-scheduled-recheck' );
717                 }
718         }
719
720         public static function add_comment_nonce( $post_id ) {
721                 echo '<p style="display: none;">';
722                 wp_nonce_field( 'akismet_comment_nonce_' . $post_id, 'akismet_comment_nonce', FALSE );
723                 echo '</p>';
724         }
725
726         public static function is_test_mode() {
727                 return defined('AKISMET_TEST_MODE') && AKISMET_TEST_MODE;
728         }
729         
730         public static function allow_discard() {
731                 if ( defined( 'DOING_AJAX' ) && DOING_AJAX )
732                         return false;
733                 if ( is_user_logged_in() )
734                         return false;
735         
736                 return ( get_option( 'akismet_strictness' ) === '1'  );
737         }
738
739         public static function get_ip_address() {
740                 return isset( $_SERVER['REMOTE_ADDR'] ) ? $_SERVER['REMOTE_ADDR'] : null;
741         }
742         
743         /**
744          * Do these two comments, without checking the comment_ID, "match"?
745          *
746          * @param mixed $comment1 A comment object or array.
747          * @param mixed $comment2 A comment object or array.
748          * @return bool Whether the two comments should be treated as the same comment.
749          */
750         private static function comments_match( $comment1, $comment2 ) {
751                 $comment1 = (array) $comment1;
752                 $comment2 = (array) $comment2;
753                 
754                 $comments_match = (
755                            isset( $comment1['comment_post_ID'], $comment2['comment_post_ID'] )
756                         && intval( $comment1['comment_post_ID'] ) == intval( $comment2['comment_post_ID'] )
757                         && (
758                                 // The comment author length max is 255 characters, limited by the TINYTEXT column type.
759                                 // If the comment author includes multibyte characters right around the 255-byte mark, they
760                                 // may be stripped when the author is saved in the DB, so a 300+ char author may turn into
761                                 // a 253-char author when it's saved, not 255 exactly.  The longest possible character is
762                                 // theoretically 6 bytes, so we'll only look at the first 248 bytes to be safe.
763                                 substr( $comment1['comment_author'], 0, 248 ) == substr( $comment2['comment_author'], 0, 248 )
764                                 || substr( stripslashes( $comment1['comment_author'] ), 0, 248 ) == substr( $comment2['comment_author'], 0, 248 )
765                                 || substr( $comment1['comment_author'], 0, 248 ) == substr( stripslashes( $comment2['comment_author'] ), 0, 248 )
766                                 // Certain long comment author names will be truncated to nothing, depending on their encoding.
767                                 || ( ! $comment1['comment_author'] && strlen( $comment2['comment_author'] ) > 248 )
768                                 || ( ! $comment2['comment_author'] && strlen( $comment1['comment_author'] ) > 248 )
769                                 )
770                         && (
771                                 // The email max length is 100 characters, limited by the VARCHAR(100) column type.
772                                 // Same argument as above for only looking at the first 93 characters.
773                                 substr( $comment1['comment_author_email'], 0, 93 ) == substr( $comment2['comment_author_email'], 0, 93 )
774                                 || substr( stripslashes( $comment1['comment_author_email'] ), 0, 93 ) == substr( $comment2['comment_author_email'], 0, 93 )
775                                 || substr( $comment1['comment_author_email'], 0, 93 ) == substr( stripslashes( $comment2['comment_author_email'] ), 0, 93 )
776                                 // Very long emails can be truncated and then stripped if the [0:100] substring isn't a valid address.
777                                 || ( ! $comment1['comment_author_email'] && strlen( $comment2['comment_author_email'] ) > 100 )
778                                 || ( ! $comment2['comment_author_email'] && strlen( $comment1['comment_author_email'] ) > 100 )
779                         )
780                 );
781
782                 return $comments_match;
783         }
784         
785         // Does the supplied comment match the details of the one most recently stored in self::$last_comment?
786         public static function matches_last_comment( $comment ) {
787                 if ( is_object( $comment ) )
788                         $comment = (array) $comment;
789
790                 return self::comments_match( self::$last_comment, $comment );
791         }
792
793         private static function get_user_agent() {
794                 return isset( $_SERVER['HTTP_USER_AGENT'] ) ? $_SERVER['HTTP_USER_AGENT'] : null;
795         }
796
797         private static function get_referer() {
798                 return isset( $_SERVER['HTTP_REFERER'] ) ? $_SERVER['HTTP_REFERER'] : null;
799         }
800
801         // return a comma-separated list of role names for the given user
802         public static function get_user_roles( $user_id ) {
803                 $roles = false;
804
805                 if ( !class_exists('WP_User') )
806                         return false;
807
808                 if ( $user_id > 0 ) {
809                         $comment_user = new WP_User( $user_id );
810                         if ( isset( $comment_user->roles ) )
811                                 $roles = join( ',', $comment_user->roles );
812                 }
813
814                 if ( is_multisite() && is_super_admin( $user_id ) ) {
815                         if ( empty( $roles ) ) {
816                                 $roles = 'super_admin';
817                         } else {
818                                 $comment_user->roles[] = 'super_admin';
819                                 $roles = join( ',', $comment_user->roles );
820                         }
821                 }
822
823                 return $roles;
824         }
825
826         // filter handler used to return a spam result to pre_comment_approved
827         public static function last_comment_status( $approved, $comment ) {
828                 if ( is_null( self::$last_comment_result ) ) {
829                         // We didn't have reason to store the result of the last check.
830                         return $approved;
831                 }
832
833                 // Only do this if it's the correct comment
834                 if ( ! self::matches_last_comment( $comment ) ) {
835                         self::log( "comment_is_spam mismatched comment, returning unaltered $approved" );
836                         return $approved;
837                 }
838
839                 // bump the counter here instead of when the filter is added to reduce the possibility of overcounting
840                 if ( $incr = apply_filters('akismet_spam_count_incr', 1) )
841                         update_option( 'akismet_spam_count', get_option('akismet_spam_count') + $incr );
842
843                 return self::$last_comment_result;
844         }
845         
846         /**
847          * If Akismet is temporarily unreachable, we don't want to "spam" the blogger with
848          * moderation emails for comments that will be automatically cleared or spammed on
849          * the next retry.
850          *
851          * For comments that will be rechecked later, empty the list of email addresses that
852          * the moderation email would be sent to.
853          *
854          * @param array $emails An array of email addresses that the moderation email will be sent to.
855          * @param int $comment_id The ID of the relevant comment.
856          * @return array An array of email addresses that the moderation email will be sent to.
857          */
858         public static function disable_moderation_emails_if_unreachable( $emails, $comment_id ) {
859                 if ( ! empty( self::$prevent_moderation_email_for_these_comments ) && ! empty( $emails ) ) {
860                         $comment = get_comment( $comment_id );
861
862                         foreach ( self::$prevent_moderation_email_for_these_comments as $possible_match ) {
863                                 if ( self::comments_match( $possible_match, $comment ) ) {
864                                         update_comment_meta( $comment_id, 'akismet_delayed_moderation_email', true );
865                                         return array();
866                                 }
867                         }
868                 }
869
870                 return $emails;
871         }
872
873         public static function _cmp_time( $a, $b ) {
874                 return $a['time'] > $b['time'] ? -1 : 1;
875         }
876
877         public static function _get_microtime() {
878                 $mtime = explode( ' ', microtime() );
879                 return $mtime[1] + $mtime[0];
880         }
881
882         /**
883          * Make a POST request to the Akismet API.
884          *
885          * @param string $request The body of the request.
886          * @param string $path The path for the request.
887          * @param string $ip The specific IP address to hit.
888          * @return array A two-member array consisting of the headers and the response body, both empty in the case of a failure.
889          */
890         public static function http_post( $request, $path, $ip=null ) {
891
892                 $akismet_ua = sprintf( 'WordPress/%s | Akismet/%s', $GLOBALS['wp_version'], constant( 'AKISMET_VERSION' ) );
893                 $akismet_ua = apply_filters( 'akismet_ua', $akismet_ua );
894
895                 $content_length = strlen( $request );
896
897                 $api_key   = self::get_api_key();
898                 $host      = self::API_HOST;
899
900                 if ( !empty( $api_key ) )
901                         $host = $api_key.'.'.$host;
902
903                 $http_host = $host;
904                 // use a specific IP if provided
905                 // needed by Akismet_Admin::check_server_connectivity()
906                 if ( $ip && long2ip( ip2long( $ip ) ) ) {
907                         $http_host = $ip;
908                 }
909
910                 $http_args = array(
911                         'body' => $request,
912                         'headers' => array(
913                                 'Content-Type' => 'application/x-www-form-urlencoded; charset=' . get_option( 'blog_charset' ),
914                                 'Host' => $host,
915                                 'User-Agent' => $akismet_ua,
916                         ),
917                         'httpversion' => '1.0',
918                         'timeout' => 15
919                 );
920
921                 $akismet_url = $http_akismet_url = "http://{$http_host}/1.1/{$path}";
922
923                 /**
924                  * Try SSL first; if that fails, try without it and don't try it again for a while.
925                  */
926
927                 $ssl = $ssl_failed = false;
928
929                 // Check if SSL requests were disabled fewer than X hours ago.
930                 $ssl_disabled = get_option( 'akismet_ssl_disabled' );
931
932                 if ( $ssl_disabled && $ssl_disabled < ( time() - 60 * 60 * 24 ) ) { // 24 hours
933                         $ssl_disabled = false;
934                         delete_option( 'akismet_ssl_disabled' );
935                 }
936                 else if ( $ssl_disabled ) {
937                         do_action( 'akismet_ssl_disabled' );
938                 }
939
940                 if ( ! $ssl_disabled && function_exists( 'wp_http_supports') && ( $ssl = wp_http_supports( array( 'ssl' ) ) ) ) {
941                         $akismet_url = set_url_scheme( $akismet_url, 'https' );
942
943                         do_action( 'akismet_https_request_pre' );
944                 }
945
946                 $response = wp_remote_post( $akismet_url, $http_args );
947
948                 Akismet::log( compact( 'akismet_url', 'http_args', 'response' ) );
949
950                 if ( $ssl && is_wp_error( $response ) ) {
951                         do_action( 'akismet_https_request_failure', $response );
952
953                         // Intermittent connection problems may cause the first HTTPS
954                         // request to fail and subsequent HTTP requests to succeed randomly.
955                         // Retry the HTTPS request once before disabling SSL for a time.
956                         $response = wp_remote_post( $akismet_url, $http_args );
957                         
958                         Akismet::log( compact( 'akismet_url', 'http_args', 'response' ) );
959
960                         if ( is_wp_error( $response ) ) {
961                                 $ssl_failed = true;
962
963                                 do_action( 'akismet_https_request_failure', $response );
964
965                                 do_action( 'akismet_http_request_pre' );
966
967                                 // Try the request again without SSL.
968                                 $response = wp_remote_post( $http_akismet_url, $http_args );
969
970                                 Akismet::log( compact( 'http_akismet_url', 'http_args', 'response' ) );
971                         }
972                 }
973
974                 if ( is_wp_error( $response ) ) {
975                         do_action( 'akismet_request_failure', $response );
976
977                         return array( '', '' );
978                 }
979
980                 if ( $ssl_failed ) {
981                         // The request failed when using SSL but succeeded without it. Disable SSL for future requests.
982                         update_option( 'akismet_ssl_disabled', time() );
983                         
984                         do_action( 'akismet_https_disabled' );
985                 }
986                 
987                 $simplified_response = array( $response['headers'], $response['body'] );
988                 
989                 self::update_alert( $simplified_response );
990
991                 return $simplified_response;
992         }
993
994         // given a response from an API call like check_key_status(), update the alert code options if an alert is present.
995         private static function update_alert( $response ) {
996                 $code = $msg = null;
997                 if ( isset( $response[0]['x-akismet-alert-code'] ) ) {
998                         $code = $response[0]['x-akismet-alert-code'];
999                         $msg  = $response[0]['x-akismet-alert-msg'];
1000                 }
1001
1002                 // only call update_option() if the value has changed
1003                 if ( $code != get_option( 'akismet_alert_code' ) ) {
1004                         if ( ! $code ) {
1005                                 delete_option( 'akismet_alert_code' );
1006                                 delete_option( 'akismet_alert_msg' );
1007                         }
1008                         else {
1009                                 update_option( 'akismet_alert_code', $code );
1010                                 update_option( 'akismet_alert_msg', $msg );
1011                         }
1012                 }
1013         }
1014
1015         public static function load_form_js() {
1016                 // WP < 3.3 can't enqueue a script this late in the game and still have it appear in the footer.
1017                 // Once we drop support for everything pre-3.3, this can change back to a single enqueue call.
1018                 wp_register_script( 'akismet-form', plugin_dir_url( __FILE__ ) . '_inc/form.js', array(), AKISMET_VERSION, true );
1019                 add_action( 'wp_footer', array( 'Akismet', 'print_form_js' ) );
1020                 add_action( 'admin_footer', array( 'Akismet', 'print_form_js' ) );
1021         }
1022         
1023         public static function print_form_js() {
1024                 wp_print_scripts( 'akismet-form' );
1025         }
1026
1027         public static function inject_ak_js( $fields ) {
1028                 echo '<p style="display: none;">';
1029                 echo '<input type="hidden" id="ak_js" name="ak_js" value="' . mt_rand( 0, 250 ) . '"/>';
1030                 echo '</p>';
1031         }
1032
1033         private static function bail_on_activation( $message, $deactivate = true ) {
1034 ?>
1035 <!doctype html>
1036 <html>
1037 <head>
1038 <meta charset="<?php bloginfo( 'charset' ); ?>">
1039 <style>
1040 * {
1041         text-align: center;
1042         margin: 0;
1043         padding: 0;
1044         font-family: "Lucida Grande",Verdana,Arial,"Bitstream Vera Sans",sans-serif;
1045 }
1046 p {
1047         margin-top: 1em;
1048         font-size: 18px;
1049 }
1050 </style>
1051 <body>
1052 <p><?php echo esc_html( $message ); ?></p>
1053 </body>
1054 </html>
1055 <?php
1056                 if ( $deactivate ) {
1057                         $plugins = get_option( 'active_plugins' );
1058                         $akismet = plugin_basename( AKISMET__PLUGIN_DIR . 'akismet.php' );
1059                         $update  = false;
1060                         foreach ( $plugins as $i => $plugin ) {
1061                                 if ( $plugin === $akismet ) {
1062                                         $plugins[$i] = false;
1063                                         $update = true;
1064                                 }
1065                         }
1066
1067                         if ( $update ) {
1068                                 update_option( 'active_plugins', array_filter( $plugins ) );
1069                         }
1070                 }
1071                 exit;
1072         }
1073
1074         public static function view( $name, array $args = array() ) {
1075                 $args = apply_filters( 'akismet_view_arguments', $args, $name );
1076                 
1077                 foreach ( $args AS $key => $val ) {
1078                         $$key = $val;
1079                 }
1080                 
1081                 load_plugin_textdomain( 'akismet' );
1082
1083                 $file = AKISMET__PLUGIN_DIR . 'views/'. $name . '.php';
1084
1085                 include( $file );
1086         }
1087
1088         /**
1089          * Attached to activate_{ plugin_basename( __FILES__ ) } by register_activation_hook()
1090          * @static
1091          */
1092         public static function plugin_activation() {
1093                 if ( version_compare( $GLOBALS['wp_version'], AKISMET__MINIMUM_WP_VERSION, '<' ) ) {
1094                         load_plugin_textdomain( 'akismet' );
1095                         
1096                         $message = '<strong>'.sprintf(esc_html__( 'Akismet %s requires WordPress %s or higher.' , 'akismet'), AKISMET_VERSION, AKISMET__MINIMUM_WP_VERSION ).'</strong> '.sprintf(__('Please <a href="%1$s">upgrade WordPress</a> to a current version, or <a href="%2$s">downgrade to version 2.4 of the Akismet plugin</a>.', 'akismet'), 'https://codex.wordpress.org/Upgrading_WordPress', 'https://wordpress.org/extend/plugins/akismet/download/');
1097
1098                         Akismet::bail_on_activation( $message );
1099                 }
1100         }
1101
1102         /**
1103          * Removes all connection options
1104          * @static
1105          */
1106         public static function plugin_deactivation( ) {
1107                 return self::deactivate_key( self::get_api_key() );
1108         }
1109         
1110         /**
1111          * Essentially a copy of WP's build_query but one that doesn't expect pre-urlencoded values.
1112          *
1113          * @param array $args An array of key => value pairs
1114          * @return string A string ready for use as a URL query string.
1115          */
1116         public static function build_query( $args ) {
1117                 return _http_build_query( $args, '', '&' );
1118         }
1119
1120         /**
1121          * Log debugging info to the error log.
1122          *
1123          * Enabled when WP_DEBUG_LOG is enabled (and WP_DEBUG, since according to
1124          * core, "WP_DEBUG_DISPLAY and WP_DEBUG_LOG perform no function unless
1125          * WP_DEBUG is true), but can be disabled via the akismet_debug_log filter.
1126          *
1127          * @param mixed $akismet_debug The data to log.
1128          */
1129         public static function log( $akismet_debug ) {
1130                 if ( apply_filters( 'akismet_debug_log', defined( 'WP_DEBUG' ) && WP_DEBUG && defined( 'WP_DEBUG_LOG' ) && WP_DEBUG_LOG ) ) {
1131                         error_log( print_r( compact( 'akismet_debug' ), true ) );
1132                 }
1133         }
1134
1135         public static function pre_check_pingback( $method ) {
1136                 if ( $method !== 'pingback.ping' )
1137                         return;
1138
1139                 global $wp_xmlrpc_server;
1140         
1141                 if ( !is_object( $wp_xmlrpc_server ) )
1142                         return false;
1143         
1144                 // Lame: tightly coupled with the IXR class.
1145                 $args = $wp_xmlrpc_server->message->params;
1146         
1147                 if ( !empty( $args[1] ) ) {
1148                         $post_id = url_to_postid( $args[1] );
1149
1150                         // If this gets through the pre-check, make sure we properly identify the outbound request as a pingback verification
1151                         Akismet::pingback_forwarded_for( null, $args[0] );
1152                         add_filter( 'http_request_args', array( 'Akismet', 'pingback_forwarded_for' ), 10, 2 );
1153
1154                         $comment = array(
1155                                 'comment_author_url' => $args[0],
1156                                 'comment_post_ID' => $post_id,
1157                                 'comment_author' => '',
1158                                 'comment_author_email' => '',
1159                                 'comment_content' => '',
1160                                 'comment_type' => 'pingback',
1161                                 'akismet_pre_check' => '1',
1162                                 'comment_pingback_target' => $args[1],
1163                         );
1164
1165                         $comment = Akismet::auto_check_comment( $comment );
1166
1167                         if ( isset( $comment['akismet_result'] ) && 'true' == $comment['akismet_result'] ) {
1168                                 // Lame: tightly coupled with the IXR classes. Unfortunately the action provides no context and no way to return anything.
1169                                 $wp_xmlrpc_server->error( new IXR_Error( 0, 'Invalid discovery target' ) );
1170                         }
1171                 }
1172         }
1173         
1174         public static function pingback_forwarded_for( $r, $url ) {
1175                 static $urls = array();
1176         
1177                 // Call this with $r == null to prime the callback to add headers on a specific URL
1178                 if ( is_null( $r ) && !in_array( $url, $urls ) ) {
1179                         $urls[] = $url;
1180                 }
1181
1182                 // Add X-Pingback-Forwarded-For header, but only for requests to a specific URL (the apparent pingback source)
1183                 if ( is_array( $r ) && is_array( $r['headers'] ) && !isset( $r['headers']['X-Pingback-Forwarded-For'] ) && in_array( $url, $urls ) ) {
1184                         $remote_ip = preg_replace( '/[^a-fx0-9:.,]/i', '', $_SERVER['REMOTE_ADDR'] );
1185                 
1186                         // Note: this assumes REMOTE_ADDR is correct, and it may not be if a reverse proxy or CDN is in use
1187                         $r['headers']['X-Pingback-Forwarded-For'] = $remote_ip;
1188
1189                         // Also identify the request as a pingback verification in the UA string so it appears in logs
1190                         $r['user-agent'] .= '; verifying pingback from ' . $remote_ip;
1191                 }
1192
1193                 return $r;
1194         }
1195         
1196         /**
1197          * Ensure that we are loading expected scalar values from akismet_as_submitted commentmeta.
1198          *
1199          * @param mixed $meta_value
1200          * @return mixed
1201          */
1202         private static function sanitize_comment_as_submitted( $meta_value ) {
1203                 if ( empty( $meta_value ) ) {
1204                         return $meta_value;
1205                 }
1206
1207                 $meta_value = (array) $meta_value;
1208
1209                 foreach ( $meta_value as $key => $value ) {
1210                         if ( ! isset( self::$comment_as_submitted_allowed_keys[$key] ) || ! is_scalar( $value ) ) {
1211                                 unset( $meta_value[$key] );
1212                         }
1213                 }
1214
1215                 return $meta_value;
1216         }
1217 }