3 * Misc WordPress Administration API.
6 * @subpackage Administration
10 * Returns whether the server is running Apache with the mod_rewrite module loaded.
16 function got_mod_rewrite() {
17 $got_rewrite = apache_mod_loaded('mod_rewrite', true);
20 * Filter whether Apache and mod_rewrite are present.
22 * This filter was previously used to force URL rewriting for other servers,
23 * like nginx. Use the got_url_rewrite filter in got_url_rewrite() instead.
25 * @see got_url_rewrite()
28 * @param bool $got_rewrite Whether Apache and mod_rewrite are present.
30 return apply_filters('got_rewrite', $got_rewrite);
34 * Returns whether the server supports URL rewriting.
36 * Detects Apache's mod_rewrite, IIS 7.0+ permalink support, and nginx.
40 * @return bool Whether the server supports URL rewriting.
42 function got_url_rewrite() {
43 $got_url_rewrite = ( got_mod_rewrite() || $GLOBALS['is_nginx'] || iis7_supports_permalinks() );
46 * Filter whether URL rewriting is available.
49 * @param bool $got_url_rewrite Whether URL rewriting is available.
51 return apply_filters( 'got_url_rewrite', $got_url_rewrite );
55 * {@internal Missing Short Description}}
59 * @param unknown_type $filename
60 * @param unknown_type $marker
61 * @return array An array of strings from a file (.htaccess ) from between BEGIN and END markers.
63 function extract_from_markers( $filename, $marker ) {
66 if (!file_exists( $filename ) ) {
70 if ( $markerdata = explode( "\n", implode( '', file( $filename ) ) ));
73 foreach ( $markerdata as $markerline ) {
74 if (strpos($markerline, '# END ' . $marker) !== false)
77 $result[] = $markerline;
78 if (strpos($markerline, '# BEGIN ' . $marker) !== false)
87 * {@internal Missing Short Description}}
89 * Inserts an array of strings into a file (.htaccess ), placing it between
90 * BEGIN and END markers. Replaces existing marked info. Retains surrounding
91 * data. Creates file if none exists.
95 * @param unknown_type $filename
96 * @param unknown_type $marker
97 * @param unknown_type $insertion
98 * @return bool True on write success, false on failure.
100 function insert_with_markers( $filename, $marker, $insertion ) {
101 if (!file_exists( $filename ) || is_writeable( $filename ) ) {
102 if (!file_exists( $filename ) ) {
105 $markerdata = explode( "\n", implode( '', file( $filename ) ) );
108 if ( !$f = @fopen( $filename, 'w' ) )
114 foreach ( $markerdata as $n => $markerline ) {
115 if (strpos($markerline, '# BEGIN ' . $marker) !== false)
118 if ( $n + 1 < count( $markerdata ) )
119 fwrite( $f, "{$markerline}\n" );
121 fwrite( $f, "{$markerline}" );
123 if (strpos($markerline, '# END ' . $marker) !== false) {
124 fwrite( $f, "# BEGIN {$marker}\n" );
125 if ( is_array( $insertion ))
126 foreach ( $insertion as $insertline )
127 fwrite( $f, "{$insertline}\n" );
128 fwrite( $f, "# END {$marker}\n" );
135 fwrite( $f, "\n# BEGIN {$marker}\n" );
136 foreach ( $insertion as $insertline )
137 fwrite( $f, "{$insertline}\n" );
138 fwrite( $f, "# END {$marker}\n" );
148 * Updates the htaccess file with the current rules if it is writable.
150 * Always writes to the file if it exists and is writable to ensure that we
151 * blank out old rules.
155 function save_mod_rewrite_rules() {
156 if ( is_multisite() )
161 $home_path = get_home_path();
162 $htaccess_file = $home_path.'.htaccess';
164 // If the file doesn't already exist check for write access to the directory and whether we have some rules.
165 // else check for write access to the file.
166 if ((!file_exists($htaccess_file) && is_writable($home_path) && $wp_rewrite->using_mod_rewrite_permalinks()) || is_writable($htaccess_file)) {
167 if ( got_mod_rewrite() ) {
168 $rules = explode( "\n", $wp_rewrite->mod_rewrite_rules() );
169 return insert_with_markers( $htaccess_file, 'WordPress', $rules );
177 * Updates the IIS web.config file with the current rules if it is writable.
178 * If the permalinks do not require rewrite rules then the rules are deleted from the web.config file.
182 * @return bool True if web.config was updated successfully
184 function iis7_save_url_rewrite_rules(){
185 if ( is_multisite() )
190 $home_path = get_home_path();
191 $web_config_file = $home_path . 'web.config';
193 // Using win_is_writable() instead of is_writable() because of a bug in Windows PHP
194 if ( iis7_supports_permalinks() && ( ( ! file_exists($web_config_file) && win_is_writable($home_path) && $wp_rewrite->using_mod_rewrite_permalinks() ) || win_is_writable($web_config_file) ) ) {
195 $rule = $wp_rewrite->iis7_url_rewrite_rules(false, '', '');
196 if ( ! empty($rule) ) {
197 return iis7_add_rewrite_rule($web_config_file, $rule);
199 return iis7_delete_rewrite_rule($web_config_file);
206 * {@internal Missing Short Description}}
210 * @param unknown_type $file
212 function update_recently_edited( $file ) {
213 $oldfiles = (array ) get_option( 'recently_edited' );
215 $oldfiles = array_reverse( $oldfiles );
217 $oldfiles = array_reverse( $oldfiles );
218 $oldfiles = array_unique( $oldfiles );
219 if ( 5 < count( $oldfiles ))
220 array_pop( $oldfiles );
224 update_option( 'recently_edited', $oldfiles );
228 * If siteurl, home or page_on_front changed, flush rewrite rules.
232 * @param string $old_value
233 * @param string $value
235 function update_home_siteurl( $old_value, $value ) {
236 if ( defined( "WP_INSTALLING" ) )
239 // If home changed, write rewrite rules to new location.
240 flush_rewrite_rules();
243 add_action( 'update_option_home', 'update_home_siteurl', 10, 2 );
244 add_action( 'update_option_siteurl', 'update_home_siteurl', 10, 2 );
245 add_action( 'update_option_page_on_front', 'update_home_siteurl', 10, 2 );
248 * Shorten an URL, to be used as link text
255 function url_shorten( $url ) {
256 $short_url = str_replace( array( 'http://', 'www.' ), '', $url );
257 $short_url = untrailingslashit( $short_url );
258 if ( strlen( $short_url ) > 35 )
259 $short_url = substr( $short_url, 0, 32 ) . '…';
264 * Resets global variables based on $_GET and $_POST
266 * This function resets global variables based on the names passed
267 * in the $vars array to the value of $_POST[$var] or $_GET[$var] or ''
268 * if neither is defined.
272 * @param array $vars An array of globals to reset.
274 function wp_reset_vars( $vars ) {
275 for ( $i=0; $i<count( $vars ); $i += 1 ) {
279 if ( empty( $_POST[$var] ) ) {
280 if ( empty( $_GET[$var] ) )
285 $$var = $_POST[$var];
291 * {@internal Missing Short Description}}
295 * @param unknown_type $message
297 function show_message($message) {
298 if ( is_wp_error($message) ){
299 if ( $message->get_error_data() && is_string( $message->get_error_data() ) )
300 $message = $message->get_error_message() . ': ' . $message->get_error_data();
302 $message = $message->get_error_message();
304 echo "<p>$message</p>\n";
305 wp_ob_end_flush_all();
309 function wp_doc_link_parse( $content ) {
310 if ( !is_string( $content ) || empty( $content ) )
313 if ( !function_exists('token_get_all') )
316 $tokens = token_get_all( $content );
317 $functions = array();
318 $ignore_functions = array();
319 for ( $t = 0, $count = count( $tokens ); $t < $count; $t++ ) {
320 if ( !is_array( $tokens[$t] ) ) continue;
321 if ( T_STRING == $tokens[$t][0] && ( '(' == $tokens[ $t + 1 ] || '(' == $tokens[ $t + 2 ] ) ) {
322 // If it's a function or class defined locally, there's not going to be any docs available
323 if ( ( isset( $tokens[ $t - 2 ][1] ) && in_array( $tokens[ $t - 2 ][1], array( 'function', 'class' ) ) ) || ( isset( $tokens[ $t - 2 ][0] ) && T_OBJECT_OPERATOR == $tokens[ $t - 1 ][0] ) ) {
324 $ignore_functions[] = $tokens[$t][1];
326 // Add this to our stack of unique references
327 $functions[] = $tokens[$t][1];
331 $functions = array_unique( $functions );
333 $ignore_functions = apply_filters( 'documentation_ignore_functions', $ignore_functions );
334 $ignore_functions = array_unique( $ignore_functions );
337 foreach ( $functions as $function ) {
338 if ( in_array( $function, $ignore_functions ) )
347 * Saves option for number of rows when listing posts, pages, comments, etc.
351 function set_screen_options() {
353 if ( isset($_POST['wp_screen_options']) && is_array($_POST['wp_screen_options']) ) {
354 check_admin_referer( 'screen-options-nonce', 'screenoptionnonce' );
356 if ( !$user = wp_get_current_user() )
358 $option = $_POST['wp_screen_options']['option'];
359 $value = $_POST['wp_screen_options']['value'];
361 if ( $option != sanitize_key( $option ) )
364 $map_option = $option;
365 $type = str_replace('edit_', '', $map_option);
366 $type = str_replace('_per_page', '', $type);
367 if ( in_array( $type, get_taxonomies() ) )
368 $map_option = 'edit_tags_per_page';
369 elseif ( in_array( $type, get_post_types() ) )
370 $map_option = 'edit_per_page';
372 $option = str_replace('-', '_', $option);
374 switch ( $map_option ) {
375 case 'edit_per_page':
376 case 'users_per_page':
377 case 'edit_comments_per_page':
378 case 'upload_per_page':
379 case 'edit_tags_per_page':
380 case 'plugins_per_page':
382 case 'sites_network_per_page':
383 case 'users_network_per_page':
384 case 'site_users_network_per_page':
385 case 'plugins_network_per_page':
386 case 'themes_network_per_page':
387 case 'site_themes_network_per_page':
388 $value = (int) $value;
389 if ( $value < 1 || $value > 999 )
393 $value = apply_filters('set-screen-option', false, $option, $value);
394 if ( false === $value )
399 update_user_meta($user->ID, $option, $value);
400 wp_safe_redirect( remove_query_arg( array('pagenum', 'apage', 'paged'), wp_get_referer() ) );
406 * Check if rewrite rule for WordPress already exists in the IIS 7+ configuration file
411 * @param string $filename The file path to the configuration file
413 function iis7_rewrite_rule_exists($filename) {
414 if ( ! file_exists($filename) )
416 if ( ! class_exists('DOMDocument') )
419 $doc = new DOMDocument();
420 if ( $doc->load($filename) === false )
422 $xpath = new DOMXPath($doc);
423 $rules = $xpath->query('/configuration/system.webServer/rewrite/rules/rule[starts-with(@name,\'wordpress\')]');
424 if ( $rules->length == 0 )
431 * Delete WordPress rewrite rule from web.config file if it exists there
435 * @param string $filename Name of the configuration file
438 function iis7_delete_rewrite_rule($filename) {
439 // If configuration file does not exist then rules also do not exist so there is nothing to delete
440 if ( ! file_exists($filename) )
443 if ( ! class_exists('DOMDocument') )
446 $doc = new DOMDocument();
447 $doc->preserveWhiteSpace = false;
449 if ( $doc -> load($filename) === false )
451 $xpath = new DOMXPath($doc);
452 $rules = $xpath->query('/configuration/system.webServer/rewrite/rules/rule[starts-with(@name,\'wordpress\')]');
453 if ( $rules->length > 0 ) {
454 $child = $rules->item(0);
455 $parent = $child->parentNode;
456 $parent->removeChild($child);
457 $doc->formatOutput = true;
458 saveDomDocument($doc, $filename);
464 * Add WordPress rewrite rule to the IIS 7+ configuration file.
468 * @param string $filename The file path to the configuration file
469 * @param string $rewrite_rule The XML fragment with URL Rewrite rule
472 function iis7_add_rewrite_rule($filename, $rewrite_rule) {
473 if ( ! class_exists('DOMDocument') )
476 // If configuration file does not exist then we create one.
477 if ( ! file_exists($filename) ) {
478 $fp = fopen( $filename, 'w');
479 fwrite($fp, '<configuration/>');
483 $doc = new DOMDocument();
484 $doc->preserveWhiteSpace = false;
486 if ( $doc->load($filename) === false )
489 $xpath = new DOMXPath($doc);
491 // First check if the rule already exists as in that case there is no need to re-add it
492 $wordpress_rules = $xpath->query('/configuration/system.webServer/rewrite/rules/rule[starts-with(@name,\'wordpress\')]');
493 if ( $wordpress_rules->length > 0 )
496 // Check the XPath to the rewrite rule and create XML nodes if they do not exist
497 $xmlnodes = $xpath->query('/configuration/system.webServer/rewrite/rules');
498 if ( $xmlnodes->length > 0 ) {
499 $rules_node = $xmlnodes->item(0);
501 $rules_node = $doc->createElement('rules');
503 $xmlnodes = $xpath->query('/configuration/system.webServer/rewrite');
504 if ( $xmlnodes->length > 0 ) {
505 $rewrite_node = $xmlnodes->item(0);
506 $rewrite_node->appendChild($rules_node);
508 $rewrite_node = $doc->createElement('rewrite');
509 $rewrite_node->appendChild($rules_node);
511 $xmlnodes = $xpath->query('/configuration/system.webServer');
512 if ( $xmlnodes->length > 0 ) {
513 $system_webServer_node = $xmlnodes->item(0);
514 $system_webServer_node->appendChild($rewrite_node);
516 $system_webServer_node = $doc->createElement('system.webServer');
517 $system_webServer_node->appendChild($rewrite_node);
519 $xmlnodes = $xpath->query('/configuration');
520 if ( $xmlnodes->length > 0 ) {
521 $config_node = $xmlnodes->item(0);
522 $config_node->appendChild($system_webServer_node);
524 $config_node = $doc->createElement('configuration');
525 $doc->appendChild($config_node);
526 $config_node->appendChild($system_webServer_node);
532 $rule_fragment = $doc->createDocumentFragment();
533 $rule_fragment->appendXML($rewrite_rule);
534 $rules_node->appendChild($rule_fragment);
536 $doc->encoding = "UTF-8";
537 $doc->formatOutput = true;
538 saveDomDocument($doc, $filename);
544 * Saves the XML document into a file
548 * @param DOMDocument $doc
549 * @param string $filename
551 function saveDomDocument($doc, $filename) {
552 $config = $doc->saveXML();
553 $config = preg_replace("/([^\r])\n/", "$1\r\n", $config);
554 $fp = fopen($filename, 'w');
555 fwrite($fp, $config);
560 * Display the default admin color scheme picker (Used in user-edit.php)
564 function admin_color_scheme_picker() {
565 global $_wp_admin_css_colors, $user_id; ?>
566 <fieldset><legend class="screen-reader-text"><span><?php _e('Admin Color Scheme')?></span></legend>
568 $current_color = get_user_option('admin_color', $user_id);
569 if ( empty($current_color) )
570 $current_color = 'fresh';
571 foreach ( $_wp_admin_css_colors as $color => $color_info ): ?>
572 <div class="color-option"><input name="admin_color" id="admin_color_<?php echo esc_attr( $color ); ?>" type="radio" value="<?php echo esc_attr( $color ); ?>" class="tog" <?php checked($color, $current_color); ?> />
573 <table class="color-palette">
575 <?php foreach ( $color_info->colors as $html_color ): ?>
576 <td style="background-color: <?php echo esc_attr( $html_color ); ?>" title="<?php echo esc_attr( $color ); ?>"> </td>
581 <label for="admin_color_<?php echo esc_attr( $color ); ?>"><?php echo esc_html( $color_info->name ); ?></label>
588 function _ipad_meta() {
589 if ( wp_is_mobile() ) {
591 <meta name="viewport" id="viewport-meta" content="width=device-width, initial-scale=1">
595 add_action('admin_head', '_ipad_meta');
598 * Check lock status for posts displayed on the Posts screen
602 function wp_check_locked_posts( $response, $data, $screen_id ) {
605 if ( array_key_exists( 'wp-check-locked-posts', $data ) && is_array( $data['wp-check-locked-posts'] ) ) {
606 foreach ( $data['wp-check-locked-posts'] as $key ) {
607 if ( ! $post_id = absint( substr( $key, 5 ) ) )
610 if ( ( $user_id = wp_check_post_lock( $post_id ) ) && ( $user = get_userdata( $user_id ) ) && current_user_can( 'edit_post', $post_id ) ) {
611 $send = array( 'text' => sprintf( __( '%s is currently editing' ), $user->display_name ) );
613 if ( ( $avatar = get_avatar( $user->ID, 18 ) ) && preg_match( "|src='([^']+)'|", $avatar, $matches ) )
614 $send['avatar_src'] = $matches[1];
616 $checked[$key] = $send;
621 if ( ! empty( $checked ) )
622 $response['wp-check-locked-posts'] = $checked;
626 add_filter( 'heartbeat_received', 'wp_check_locked_posts', 10, 3 );
629 * Check lock status on the New/Edit Post screen and refresh the lock
633 function wp_refresh_post_lock( $response, $data, $screen_id ) {
634 if ( array_key_exists( 'wp-refresh-post-lock', $data ) ) {
635 $received = $data['wp-refresh-post-lock'];
638 if ( ! $post_id = absint( $received['post_id'] ) )
641 if ( ! current_user_can('edit_post', $post_id) )
644 if ( ( $user_id = wp_check_post_lock( $post_id ) ) && ( $user = get_userdata( $user_id ) ) ) {
646 'text' => sprintf( __( '%s has taken over and is currently editing.' ), $user->display_name )
649 if ( $avatar = get_avatar( $user->ID, 64 ) ) {
650 if ( preg_match( "|src='([^']+)'|", $avatar, $matches ) )
651 $error['avatar_src'] = $matches[1];
654 $send['lock_error'] = $error;
656 if ( $new_lock = wp_set_post_lock( $post_id ) )
657 $send['new_lock'] = implode( ':', $new_lock );
660 $response['wp-refresh-post-lock'] = $send;
665 add_filter( 'heartbeat_received', 'wp_refresh_post_lock', 10, 3 );
668 * Check nonce expiration on the New/Edit Post screen and refresh if needed
672 function wp_refresh_post_nonces( $response, $data, $screen_id ) {
673 if ( array_key_exists( 'wp-refresh-post-nonces', $data ) ) {
674 $received = $data['wp-refresh-post-nonces'];
675 $response['wp-refresh-post-nonces'] = array( 'check' => 1 );
677 if ( ! $post_id = absint( $received['post_id'] ) )
680 if ( ! current_user_can( 'edit_post', $post_id ) || empty( $received['post_nonce'] ) )
683 if ( 2 === wp_verify_nonce( $received['post_nonce'], 'update-post_' . $post_id ) ) {
684 $response['wp-refresh-post-nonces'] = array(
686 'autosavenonce' => wp_create_nonce('autosave'),
687 'getpermalinknonce' => wp_create_nonce('getpermalink'),
688 'samplepermalinknonce' => wp_create_nonce('samplepermalink'),
689 'closedpostboxesnonce' => wp_create_nonce('closedpostboxes'),
690 '_ajax_linking_nonce' => wp_create_nonce( 'internal-linking' ),
691 '_wpnonce' => wp_create_nonce( 'update-post_' . $post_id ),
693 'heartbeatNonce' => wp_create_nonce( 'heartbeat-nonce' ),
700 add_filter( 'heartbeat_received', 'wp_refresh_post_nonces', 10, 3 );