t-Type header based on the file extension, covers common file types and uses application/octet-stream for unknown extensions
det
host ∷ B.ByteString -- ^ Hostname
     → Route ()
host h = getHeader "Host" >>= guard ∘ (≡) (Just h)
host h = getHeader "Host" >>= guard ∘ (≡) (Just h)