X-Git-Url: https://git.ucc.asn.au/?a=blobdiff_plain;f=Tools%2FNetTest%2Ftcpclient.c;h=3ad9f6da7956c816feebec2bd66abd28c15b59cf;hb=2103edc7b67600818930793851b57e3583f73954;hp=e69de29bb2d1d6434b8b29ae775ad8c2e48c5391;hpb=c3b821ccc009ec819f2580a53c0ed423aad43bf9;p=tpg%2Facess2.git

diff --git a/Tools/NetTest/tcpclient.c b/Tools/NetTest/tcpclient.c
index e69de29b..3ad9f6da 100644
--- a/Tools/NetTest/tcpclient.c
+++ b/Tools/NetTest/tcpclient.c
@@ -0,0 +1,33 @@
+/*
+ * Acess2 Networking Test Suite (NetTest)
+ * - By John Hodge (thePowersGang)
+ *
+ * tcpclient.c
+ * - TCP Client tester
+ */
+#include <vfs.h>
+#include <vfs_ext.h>
+#include <nettest.h>
+
+void NetTest_Suite_Netcat(const char *Address, int Port)
+{
+	Uint8	addr[16];
+	int type = Net_ParseAddress(Address, addr);
+	if( type == 0 )
+		return;
+
+	int fd = Net_OpenSocket_TCPC(type, addr, Port);
+	if( fd == -1 ) {
+		Log_Error("Netcat", "herpaderp tcpc");
+		return ;
+	}
+
+	char	buffer[1024];
+	size_t	len;
+	while( (len = VFS_Read(fd, sizeof(buffer), buffer)) )
+	{
+		NetTest_WriteStdout(buffer, len);
+	}
+
+	VFS_Close(fd);
+}