%s%s
";
	$arr = array('url' => $url, 'text' => '');
	call_hooks('parse_link', $arr);
	if(strlen($arr['text'])) {
		echo $arr['text'];
		killme();
	}
	if($url && $title && $text) {
		if($textmode)
			$text = $br . $br . '[quote]' . $text . '[/quote]' . $br;
		else
			$text = '
' . $text . '
';
		$title = str_replace(array("\r","\n"),array('',''),$title);
		$result = sprintf($template,$url,($title) ? $title : $url,$text) . $str_tags;
		logger('parse_url (unparsed): returns: ' . $result); 
		echo $result;
		killme();
	}
	if($url) {
		$s = fetch_url($url);
	} else {
		echo '';
		killme();
	}
//	logger('parse_url: data: ' . $s, LOGGER_DATA);
	if(! $s) {
		echo sprintf($template,$url,$url,'') . $str_tags;
		killme();
	}
	$matches = '';
	$c = preg_match('/\(.*?)\<\/head\>/ism',$s,$matches);
	if($c) {
//		logger('parse_url: header: ' . $matches[2], LOGGER_DATA);
		try {
			$domhead = HTML5_Parser::parse($matches[2]);
		} catch (DOMException $e) {
			logger('scrape_dfrn: parse error: ' . $e);
		}
		if($domhead)
			logger('parsed header');
	}
	if(! $title) {
		if(strpos($s,'')) {
			$title = substr($s,strpos($s,'')+7,64);
			if(strpos($title,'<') !== false)
				$title = strip_tags(substr($title,0,strpos($title,'<')));
		}
	}
	$config = HTMLPurifier_Config::createDefault();
	$config->set('Cache.DefinitionImpl', null);
	$purifier = new HTMLPurifier($config);
	$s = $purifier->purify($s);
//	logger('purify_output: ' . $s);
	try {
		$dom = HTML5_Parser::parse($s);
	} catch (DOMException $e) {
		logger('scrape_dfrn: parse error: ' . $e);
	}
	if(! $dom) {
		echo sprintf($template,$url,$url,'') . $str_tags;
		killme();
	}
	$items = $dom->getElementsByTagName('title');
	if($items) {
		foreach($items as $item) {
			$title = trim($item->textContent);
			break;
		}
	}
	if(! $text) {
		$divs = $dom->getElementsByTagName('div');
		if($divs) {
			foreach($divs as $div) {
				$class = $div->getAttribute('class');
				if($class && (stristr($class,'article') || stristr($class,'content'))) {
					$items = $div->getElementsByTagName('p');
					if($items) {
						foreach($items as $item) {
							$text = $item->textContent;
							if(stristr($text,'