WebページからフィードのURLを抽出する。（XPath版）

getfeedurl.php

<?php

function getFeedUrl( $url ){
	$doc = DOMDocument::loadHTMLFile( $url );
	$xpath = new DOMXpath( $doc );
	$q = '/html/head/link[contains(@rel, "alternate")]'
		. '[@type="application/x.atom+xml" or @type="application/atom+xml" or '
		. '@type="application/xml" or @type="text/xml" or @type="application/rss+xml" or '
		. '@type="application/rdf+xml"]';
	$eles = $xpath->query( $q );
	if( !$eles->length ) return false;
	return $eles->item(0)->getAttribute("href");
}