wp-links-opml.php 2.37 KB
Newer Older
godog's avatar
godog committed
1 2 3 4 5 6 7 8 9 10 11 12 13 14
<?php
/**
 * Outputs the OPML XML format for getting the links defined in the link
 * administration. This can be used to export links from one blog over to
 * another. Links aren't exported by the WordPress export, so this file handles
 * that.
 *
 * This file is not added by default to WordPress theme pages when outputting
 * feed links. It will have to be added manually for browsers and users to pick
 * up that this file exists.
 *
 * @package WordPress
 */

lucha's avatar
lucha committed
15
require_once( dirname( __FILE__ ) . '/wp-load.php' );
godog's avatar
godog committed
16 17 18 19 20 21 22 23 24 25 26 27 28

header('Content-Type: text/xml; charset=' . get_option('blog_charset'), true);
$link_cat = '';
if ( !empty($_GET['link_cat']) ) {
	$link_cat = $_GET['link_cat'];
	if ( !in_array($link_cat, array('all', '0')) )
		$link_cat = absint( (string)urldecode($link_cat) );
}

echo '<?xml version="1.0"?'.">\n";
?>
<opml version="1.0">
	<head>
lucha's avatar
lucha committed
29 30 31 32
		<title><?php
			/* translators: 1: Site name */
			printf( __('Links for %s'), esc_attr(get_bloginfo('name', 'display')) );
		?></title>
godog's avatar
godog committed
33
		<dateCreated><?php echo gmdate("D, d M Y H:i:s"); ?> GMT</dateCreated>
lucha's avatar
lucha committed
34 35 36 37 38 39 40 41
		<?php
		/**
		 * Fires in the OPML header.
		 *
		 * @since 3.0.0
		 */
		do_action( 'opml_head' );
		?>
godog's avatar
godog committed
42 43 44 45
	</head>
	<body>
<?php
if ( empty($link_cat) )
root's avatar
root committed
46
	$cats = get_categories(array('taxonomy' => 'link_category', 'hierarchical' => 0));
godog's avatar
godog committed
47
else
root's avatar
root committed
48
	$cats = get_categories(array('taxonomy' => 'link_category', 'hierarchical' => 0, 'include' => $link_cat));
godog's avatar
godog committed
49 50

foreach ( (array)$cats as $cat ) :
lucha's avatar
lucha committed
51
	/**
lucha's avatar
lucha committed
52
	 * Filters the OPML outline link category name.
lucha's avatar
lucha committed
53 54 55 56 57 58
	 *
	 * @since 2.2.0
	 *
	 * @param string $catname The OPML outline category name.
	 */
	$catname = apply_filters( 'link_category', $cat->name );
godog's avatar
godog committed
59 60 61 62 63 64

?>
<outline type="category" title="<?php echo esc_attr($catname); ?>">
<?php
	$bookmarks = get_bookmarks(array("category" => $cat->term_id));
	foreach ( (array)$bookmarks as $bookmark ) :
lucha's avatar
lucha committed
65
		/**
lucha's avatar
lucha committed
66
		 * Filters the OPML outline link title text.
lucha's avatar
lucha committed
67 68 69 70 71 72
		 *
		 * @since 2.2.0
		 *
		 * @param string $title The OPML outline title text.
		 */
		$title = apply_filters( 'link_title', $bookmark->link_name );
godog's avatar
godog committed
73 74 75 76 77 78 79 80 81 82
?>
	<outline text="<?php echo esc_attr($title); ?>" type="link" xmlUrl="<?php echo esc_attr($bookmark->link_rss); ?>" htmlUrl="<?php echo esc_attr($bookmark->link_url); ?>" updated="<?php if ('0000-00-00 00:00:00' != $bookmark->link_updated) echo $bookmark->link_updated; ?>" />
<?php
	endforeach; // $bookmarks
?>
</outline>
<?php
endforeach; // $cats
?>
</body>
lucha's avatar
lucha committed
83
</opml>