--- /sys/src/9k/ip/tcp.c
+++ /sys/src/9k/ip/tcp.c
@@ -1410,6 +1410,16 @@ sndrst(Proto *tcp, uchar *source, uchar *dest, ushort length, Tcp *seg, uchar ve
 }
 
 /*
+ * close the conversation
+ */
+static char*
+tcpclose2(Conv *s)
+{
+	tcpclose(s);
+	return nil;
+}
+
+/*
  *  send a reset to the remote side and close the conversation
  *  called with s qlocked
  */
@@ -3289,6 +3299,8 @@ tcpporthogdefensectl(char *val)
 static char*
 tcpctl(Conv* c, char** f, int n)
 {
+	if(n == 1 && strcmp(f[0], "close") == 0)
+		return tcpclose2(c);
 	if(n == 1 && strcmp(f[0], "hangup") == 0)
 		return tcphangup(c);
 	if(n >= 1 && strcmp(f[0], "keepalive") == 0)