<?php
$addr = gethostbyname("taiga64.cs.brown.edu");
$socket = socket_create(AF_INET,SOCK_STREAM,SOL_TCP);

$result = socket_connect($socket,$addr,17238);
$host = $_REQUEST['HOST'];

$msg = "<TOMB:ANNOUNCE HOST='$host'";
$msg .= addAttr('HID');
$msg .= addAttr('TCP');
$msg .= addAttr('HTTP');
$msg .= addAttr('DOM');
$msg .= addAttr('HHASH');
$msg .= " />";

$cnt = socket_write($socket,$msg,strlen($msg));

while ($out = socket_read($socket,2048)) {
   $ln = strlen($out);
   // echo htmlspecialchars($out);
   echo $out;
}

socket_close($socket);


function addAttr($id)
{
   $s = $_REQUEST[$id];
   if (!$s || $s == "") return "";

   $s = xmlentities($s);

   return " " . $id . '="' . $s . '"';
}


function xmlentities($str)
{
   return htmlentities($str);
}


function xml_entity_decode($str)
{
   return html_entity_decode($str);
}


?>