reference: Socket examples

git-svn-id: svn://ultimatepp.org/upp/trunk@1694 f0d560ea-af0d-0410-9eb7-867de7ffcac7

reference/SocketClient/SocketClient.cpp

@@ -0,0 +1,21 @@
+#include <Web/Web.h>
+
+using namespace Upp;
+
+String Request(const String& r)
+{
+	Socket s;
+	if(!ClientSocket(s, CommandLine().GetCount() ? CommandLine()[0] : "127.0.0.1", 3214)) {
+		Cout() << "Unable to connect to server!\n";
+		SetExitCode(1);
+		return Null;
+	}
+	s.Write(r + '\n');
+	return s.ReadUntil('\n');
+}
+
+CONSOLE_APP_MAIN
+{
+	Cout() << Request("time") << '\n';
+	Cout() << Request("33") << '\n';
+}

reference/SocketClient/SocketClient.upp

@@ -0,0 +1,12 @@
+description "Example of using client Socket - its counterpart is SocketServer\377";
+
+uses
+	Core,
+	Web;
+
+file
+	SocketClient.cpp;
+
+mainconfig
+	"" = "";
+

reference/SocketClient/init

@@ -0,0 +1,5 @@
+#ifndef _SocketClient_icpp_init_stub
+#define _SocketClient_icpp_init_stub
+#include "Core/init"
+#include "Web/init"
+#endif