From 01613e65fbf8a37c3229bd1f00d8a893c895398e Mon Sep 17 00:00:00 2001
From: cxl <cxl@f0d560ea-af0d-0410-9eb7-867de7ffcac7>
Date: Mon, 16 Dec 2013 13:15:28 +0000
Subject: [PATCH] .upptst

git-svn-id: svn://ultimatepp.org/upp/trunk@6659 f0d560ea-af0d-0410-9eb7-867de7ffcac7
---
 upptst/Socket/Socket.cpp | 31 +++++++++++++++++++++++++++++++
 upptst/Socket/Socket.upp | 10 ++++++++++
 upptst/Socket/init       |  5 +++++
 3 files changed, 46 insertions(+)
 create mode 100644 upptst/Socket/Socket.cpp
 create mode 100644 upptst/Socket/Socket.upp
 create mode 100644 upptst/Socket/init

diff --git a/upptst/Socket/Socket.cpp b/upptst/Socket/Socket.cpp
new file mode 100644
index 000000000..b279786ed
--- /dev/null
+++ b/upptst/Socket/Socket.cpp
@@ -0,0 +1,31 @@
+#include <Core/Core.h>
+
+using namespace Upp;
+
+CONSOLE_APP_MAIN
+{
+	StdLogSetup(LOG_COUT|LOG_FILE);
+
+	TcpSocket socket;
+	
+	if(!socket.Connect("pop.gmail.com", 995)) {
+		LOG("Socket error encountered: " << socket.GetErrorDesc());
+		Exit(1);
+	}
+	if(!socket.StartSSL()) {
+		LOG("Couldn't start SSL session.");
+		Exit(1);
+	}
+
+	// 5 secs.
+	socket.Timeout(5000);
+
+	String server_hello = socket.GetLine();
+	
+	DUMP(server_hello);
+	DUMPHEX(server_hello);
+	
+	ASSERT(server_hello.StartsWith("+OK Gpop ready for requests from"));
+	
+	LOG("=========== OK");
+}
diff --git a/upptst/Socket/Socket.upp b/upptst/Socket/Socket.upp
new file mode 100644
index 000000000..046ee3e5f
--- /dev/null
+++ b/upptst/Socket/Socket.upp
@@ -0,0 +1,10 @@
+uses
+	Core,
+	Core/SSL;
+
+file
+	Socket.cpp;
+
+mainconfig
+	"" = "SSE2";
+
diff --git a/upptst/Socket/init b/upptst/Socket/init
new file mode 100644
index 000000000..21be07a92
--- /dev/null
+++ b/upptst/Socket/init
@@ -0,0 +1,5 @@
+#ifndef _Socket_icpp_init_stub
+#define _Socket_icpp_init_stub
+#include "Core/init"
+#include "Core/SSL/init"
+#endif