streams/Zotlabs/Module/Xchan.php

<?php
namespace Zotlabs\Module;



class Xchan extends \Zotlabs\Web\Controller {

	function get() {
	
		$o = '<h3>' . t('Xchan Lookup') . '</h3>';
	
		$o .= '<form action="xchan" method="get">';
		$o .= t('Lookup xchan beginning with (or webbie): ');
		$o .= '<input type="text" style="width:250px;" name="addr" value="' . $_GET['addr'] .'">';
		$o .= '<input type="submit" name="submit" value="' . t('Submit') .'"></form>';
		$o .= '<br><br>';
	
		if(x($_GET, 'addr')) {
			$addr = trim($_GET['addr']);
	
			$r = q("select * from xchan where xchan_hash like '%s%%' or xchan_addr = '%s' group by xchan_hash",
				dbesc($addr),
				dbesc($addr)
			);
	
			if($r) {
				foreach($r as $rr) {
					$o .= str_replace(array("\n", " "), array("<br>", "&nbsp;"), print_r($rr, true)) . EOL;
	
					$s = q("select * from hubloc where hubloc_hash like '%s'",
						dbesc($r[0]['xchan_hash'])
					);
	
					if($s) {
						foreach($s as $rrr)
							$o .= str_replace(array("\n", " "), array("<br>", "&nbsp;"), print_r($rrr, true)) . EOL;
					}
				}
			}
			else
				notice( t('Not found.') . EOL);
	
		}	
		return $o;
	}
	
}