/
wp-links-opml.php
80 lines (75 loc) · 2.32 KB
/
wp-links-opml.php
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
<?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
*/
require_once( dirname( __FILE__ ) . '/wp-load.php' );
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>
<title><?php printf( __('Links for %s'), esc_attr(get_bloginfo('name', 'display')) ); ?></title>
<dateCreated><?php echo gmdate("D, d M Y H:i:s"); ?> GMT</dateCreated>
<?php
/**
* Fires in the OPML header.
*
* @since 3.0.0
*/
do_action( 'opml_head' );
?>
</head>
<body>
<?php
if ( empty($link_cat) )
$cats = get_categories(array('taxonomy' => 'link_category', 'hierarchical' => 0));
else
$cats = get_categories(array('taxonomy' => 'link_category', 'hierarchical' => 0, 'include' => $link_cat));
foreach ( (array)$cats as $cat ) :
/**
* Filter the OPML outline link category name.
*
* @since 2.2.0
*
* @param string $catname The OPML outline category name.
*/
$catname = apply_filters( 'link_category', $cat->name );
?>
<outline type="category" title="<?php echo esc_attr($catname); ?>">
<?php
$bookmarks = get_bookmarks(array("category" => $cat->term_id));
foreach ( (array)$bookmarks as $bookmark ) :
/**
* Filter the OPML outline link title text.
*
* @since 2.2.0
*
* @param string $title The OPML outline title text.
*/
$title = apply_filters( 'link_title', $bookmark->link_name );
?>
<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>
</opml>