Introduce recv timeout controlled by '-T' option in http.c This should prevent a DDoS attack where attacker and keeps the connection open but send no data.

fun main n =
  case n of
      0 => error <xml>Zero is bad!</xml>
    | _ => return <xml/>