--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/genericopenlibs/cstdlib/TSTLIB/TLSTREAM.C	Fri Jun 04 16:20:51 2010 +0100
@@ -0,0 +1,534 @@
+/*
+* Copyright (c) 1997-2009 Nokia Corporation and/or its subsidiary(-ies).
+* All rights reserved.
+* This component and the accompanying materials are made available
+* under the terms of "Eclipse Public License v1.0"
+* which accompanies this distribution, and is available
+* at the URL "http://www.eclipse.org/legal/epl-v10.html".
+*
+* Initial Contributors:
+* Nokia Corporation - initial contribution.
+*
+* Contributors:
+*
+* Description:
+* Test of AF_LOCAL stream sockets
+* 
+*
+*/
+
+
+
+#include <stdio.h>
+#include <errno.h>
+#include <stdlib.h>
+#include <string.h>
+#include <unistd.h>
+#include <sys/types.h>
+#include <sys/socket.h>
+#include <sys/ioctl.h>
+
+#include "ctest.h"	/* includes C interface to EPOC32 threads, and SpawnPosixServer */
+
+test_Data;
+
+/**
+@SYMTestCaseID          SYSLIB-STDLIB-CT-1115
+@SYMTestCaseDesc	    Tests for AF_LOCAL stream sockets
+@SYMTestPriority 	    High
+@SYMTestActions  	    Tests for create socket,binding and other simple socket operations
+@SYMTestExpectedResults Test must not fail
+@SYMREQ                 REQ0000
+*/					
+void testSimple()
+	{
+	int fd1, fd2;
+	size_t addrsize;
+	int err;
+	struct sockaddr addr1, addr2;
+	int optionbuf[20];
+	size_t optionsize;
+
+	test_Next("Create stream sockets");
+	fd1=socket(AF_LOCAL, SOCK_STREAM, 0);
+	test_ok(fd1>=0);
+
+	fd2=socket(AF_LOCAL, SOCK_STREAM, 0);
+	test_ok(fd2>=0);
+
+	test_Next("Some binding tests");
+
+#if 0 /* causes socket server panic with ESOCK 058 */
+	addr1.sa_family=AF_UNSPEC;
+	addr1.sa_port=65530;
+	err=bind(fd1,&addr1, sizeof(addr1));	/* wrong family, port out of range */
+	test_ok(err!=0);
+#endif
+
+	addr1.sa_family=AF_LOCAL;
+	addr1.sa_port=1;
+	err=bind(fd1, &addr1, sizeof(addr1));
+	test_ok(err==0);
+
+	addr1.sa_family=AF_LOCAL;
+	addr1.sa_port=2;
+	err=bind(fd1, &addr1, sizeof(addr1));	/* already bound */
+	test_errno(err!=0, EEXIST);
+
+	test_Next("Get associated addresses");
+
+	addrsize=sizeof(addr2);
+	err=getsockname(fd1,&addr2,&addrsize);
+	test_ok(err==0);
+	/* test(addr2.sa_family==AF_LOCAL);	problem in IPC.PRT, for ESOCK 058 */
+	test(addr2.sa_port==1);
+	test(addrsize<=sizeof(addr2));
+
+	addrsize=sizeof(addr2);
+	err=getpeername(fd1,&addr2,&addrsize);	/* not connected */
+	test_errno(err!=0,-2);	/* OMISSION - can't report proper reason for failure */
+
+	addrsize=sizeof(addr2);
+	err=getsockname(fd2,&addr2,&addrsize);	/* not bound */
+	test_errno(err!=0,-2);	/* OMISSION - can't report proper reason for failure */
+
+	test_Next("More binding");
+
+	addr1.sa_family=AF_LOCAL;
+	addr1.sa_port=1;
+	err=bind(fd2, &addr1, sizeof(addr1));	/* address in use */
+	test_errno(err!=0, EACCES);
+
+#if 0	/* this isn't supported by AF_LOCAL */
+	addr1.sa_family=AF_LOCAL;
+	addr1.sa_port=0;
+	err=bind(fd2, &addr1, sizeof(addr1));	/* unspecified port number */
+	test_ok(err==0);
+
+	addrsize=sizeof(addr2);
+	err=getsockname(fd2,&addr2,&addrsize);
+	test_ok(err==0);
+	/* test(addr2.sa_family==AF_LOCAL);	problem in IPC.PRT, for ESOCK 058 */
+	test(addr2.sa_port!=1);
+	test(addr2.sa_port!=0);
+	test(addrsize<=sizeof(addr2));
+#endif
+
+	err=listen(fd1,1);
+	test_ok(err==0);
+
+	test_Next("Socket options");
+
+	optionbuf[0]=3500000;	/* implausible size */
+	optionsize=sizeof(optionbuf[0]);
+	err=getsockopt(fd1,SOL_SOCKET,SO_SNDBUF,optionbuf,&optionsize);
+	test_ok(err==0);
+	test(optionbuf[0]!=3500000);
+
+	optionbuf[0]=7*1024;
+	optionsize=sizeof(optionbuf[0]);
+	err=setsockopt(fd1,SOL_SOCKET,SO_SNDBUF,optionbuf,optionsize);
+	test_ok(err==0);
+
+	optionbuf[0]=3500000;	/* implausible size */
+	optionsize=sizeof(optionbuf[0]);
+	err=getsockopt(fd1,SOL_SOCKET,SO_SNDBUF,optionbuf,&optionsize);
+	test_ok(err==0);
+	test(optionbuf[0]==7*1024);
+
+	optionbuf[0]=1;
+	optionsize=sizeof(optionbuf[0]);
+	err=getsockopt(fd1,SOL_SOCKET,1234,optionbuf,&optionsize);	/* invalid option */
+	test_errno(err<0,ENOSYS);
+	test(optionbuf[0]==1);
+
+	optionbuf[0]=13;
+	optionsize=sizeof(optionbuf[0]);
+	err=setsockopt(fd1,SOL_SOCKET,1234,optionbuf,optionsize);	/* invalid option */
+	test_errno(err<0,ENOSYS);
+	test(optionbuf[0]==13);
+
+	err=close(fd1);
+	test_ok(err==0);
+
+	err=close(fd2);
+	test_ok(err==0);
+	}
+
+/* Client and server take it in turns to send, starting with the client.
+ * Each matches the message they receive with the string expected
+ */
+char *message_sequence[] = {
+	"Hello from client",
+	"Hello from server",
+	"Test of send",
+	"Test of recv",
+	"Try sendto",
+	"Try recvfrom",
+	"Send to shutdown socket",
+	"Send to closed socket",
+	0
+	};
+
+/**
+@SYMTestCaseID          SYSLIB-STDLIB-CT-1116
+@SYMTestCaseDesc	    Tests for server socket
+@SYMTestPriority 	    High
+@SYMTestActions  	    Tests for server socket,create,accept,send and receive functions
+@SYMTestExpectedResults Test must not fail
+@SYMREQ                 REQ0000
+*/					
+void testServer()
+	{
+	int fd1, fd2, nbytes, i;
+	size_t addrsize;
+	int err;
+	struct sockaddr addr1, addr2;
+	char buf[80];
+	char **mp = message_sequence;
+
+	test_Next("Create server socket");
+	fd1=socket(AF_LOCAL, SOCK_STREAM, 0);
+	test_ok(fd1>=0);
+
+#if 0
+	/* causes ESOCK to panic the client */
+	addrsize=sizeof(addr2);
+	fd2=accept(fd1,&addr2,&addrsize);	/* can't accept on an unbound socket */
+	test_ok(fd2<0);
+#endif
+
+	addr1.sa_family=AF_LOCAL;
+	addr1.sa_port=1;
+	err=bind(fd1, &addr1, sizeof(addr1));
+	test_ok(err==0);
+
+#if 0
+	/* causes ESOCK to panic the client */
+	addrsize=sizeof(addr2);
+	fd2=accept(fd1,&addr2,&addrsize);	/* can't accept before listening */
+	test_ok(fd2<0);
+#endif
+
+	err=listen(fd1,1);
+	test_ok(err==0);
+
+	addrsize=sizeof(addr2);
+	fd2=accept(fd1,&addr2,&addrsize);
+	test_ok(fd2>=0);
+	/* test(addr2.sa_family==AF_LOCAL);	problem in IPC.PRT, for ESOCK 058 */
+	test(addr2.sa_port!=1);
+	test(addr2.sa_port!=0);
+	test(addrsize<=sizeof(addr2));
+
+	test_Next("Server read/write");
+
+	/* read */
+	nbytes=strlen(*mp);
+	err=read(fd2, buf, nbytes+1);
+	test_ok(err==nbytes+1);
+	test(strcmp(buf,*mp)==0);
+
+	/* write */
+	mp++;
+	nbytes=strlen(*mp);
+	for (i=0; i<nbytes+1; i++)
+		{
+		err=write(fd2,(*mp)+i,1);
+		test_ok(err==1);
+		}
+
+	test_Next("Server send/recv");
+
+	/* recv */
+	mp++;
+	nbytes=strlen(*mp);
+	err=recv(fd2, buf, nbytes+1,0);
+	test_ok(err==nbytes+1);
+	test(strcmp(buf,*mp)==0);
+
+	/* send */
+	mp++;
+	nbytes=strlen(*mp);
+	err=send(fd2, *mp, nbytes+1,0);
+	test_ok(err==nbytes+1);
+
+	/* recvfrom */
+	mp++;
+	nbytes=strlen(*mp);
+	addrsize=sizeof(addr2);
+	addr2.sa_port=0;
+	err=recvfrom(fd2, buf, nbytes+1,0,&addr2,&addrsize);
+	test_ok(err==nbytes+1);
+	test(strcmp(buf,*mp)==0);
+	/* test(addr2.sa_family==AF_LOCAL);	problem in IPC.PRT, for ESOCK 058 */
+	test(addr2.sa_port!=1);
+	test(addr2.sa_port!=0);
+	test(addrsize<=sizeof(addr2));
+
+	/* sendto */
+	mp++;
+	nbytes=strlen(*mp);
+	addrsize=sizeof(addr1);
+	err=sendto(fd2, *mp, nbytes+1,0,&addr1,addrsize);	/* not allowed on streams */
+	test_errno(err<0,ENOSYS);
+	err=send(fd2, *mp, nbytes+1,0);		/* to keep synchronisation */
+	test_ok(err==nbytes+1);
+
+	test_Next("Server shutdown reception");
+	err=shutdown(fd2,0);
+	test_ok(err==0);
+
+	sleep(2);	/* so that the client's sleep(1) finishes before we awake */
+
+	err=close(fd2);
+	test_ok(err==0);
+
+	err=close(fd1);
+	test_ok(err==0);
+	}
+
+/**
+@SYMTestCaseID          SYSLIB-STDLIB-CT-1117
+@SYMTestCaseDesc	    Tests for client socket
+@SYMTestPriority 	    High
+@SYMTestActions  	    Tests for client socket,create,accept,send and receive functions
+                        Write to a connection closed socket and test for error
+@SYMTestExpectedResults Test must not fail
+@SYMREQ                 REQ0000
+*/					
+void testClient()
+	{
+	int fd1, nbytes, nbytes2, i, status;
+	size_t addrsize;
+	int err;
+	struct sockaddr addr1, addr2;
+	char buf[80];
+	char **mp = message_sequence;
+
+	test_Next("Create client socket");
+	fd1=socket(AF_LOCAL, SOCK_STREAM, 0);
+	test_ok(fd1>=0);
+
+	addr1.sa_family=AF_LOCAL;
+	addr1.sa_port=1;
+	addrsize=sizeof(addr1);
+	err=connect(fd1,&addr1,addrsize);
+	test_ok(err==0);
+
+	addrsize=sizeof(addr2);
+	err=getpeername(fd1,&addr2,&addrsize);
+	test_ok(err==0);
+	/* test(addr2.sa_family==AF_LOCAL);	problem in IPC.PRT, for ESOCK 058 */
+	test(addr2.sa_port==1);
+	test(addrsize<=sizeof(addr2));
+
+	addrsize=sizeof(addr2);
+	err=getsockname(fd1,&addr2,&addrsize);
+	test_ok(err==0);
+	/* test(addr2.sa_family==AF_LOCAL);	problem in IPC.PRT, for ESOCK 058 */
+	test(addr2.sa_port!=1);
+	test(addr2.sa_port!=0);
+	test(addrsize<=sizeof(addr2));
+
+	test_Next("Client read/write");
+
+	/* write */
+	nbytes=strlen(*mp);
+	err=write(fd1, *mp, nbytes+1);
+	test_ok(err==nbytes+1);
+
+	/* read */
+	mp++;
+	nbytes=strlen(*mp);
+	err=read(fd1, buf, nbytes+1);
+	test_ok(err==nbytes+1);
+	test(strcmp(buf,*mp)==0);
+
+	test_Next("Client send/recv");
+
+	/* send */
+	mp++;
+	nbytes=strlen(*mp);
+	for (i=0; i<nbytes+1; i++)
+		{
+		err=send(fd1,(*mp)+i,1,0);
+		test_ok(err==1);
+		}
+
+	/* recv - get the first byte so that we know the buffer is full */
+	mp++;
+	nbytes=strlen(*mp);
+	err=recv(fd1,buf,1,0);
+	test_ok(err==1);
+
+	/* ioctl */
+	nbytes2=-1;
+	err=ioctl(fd1,E32IONREAD,&nbytes2);
+#if 0
+	test_ok(err==0);
+	test(nbytes2==nbytes);
+#else
+	test_errno(err<0,ENOSYS);	/* IPC.PRT doesn't implement KSoReadBytesPending */
+#endif
+
+	nbytes2=E32SELECT_READ|E32SELECT_WRITE|E32SELECT_EXCEPT;
+	err=ioctl(fd1,E32IOSELECT,&nbytes2);
+	test_ok(err==0);
+	test(nbytes2==(E32SELECT_READ|E32SELECT_WRITE));
+
+	nbytes2=E32SELECT_READ|E32SELECT_WRITE|E32SELECT_EXCEPT;
+	err=async_ioctl(fd1,E32IOSELECT,&nbytes2,&status);
+	test_ok(err==0);
+	err=async_ioctl_completion(fd1,E32IOSELECT,&nbytes2,&status);
+	test_ok(err==0);
+	if (nbytes2!=(E32SELECT_READ|E32SELECT_WRITE))
+		{
+		nbytes2=E32SELECT_READ|E32SELECT_WRITE|E32SELECT_EXCEPT;
+		err=ioctl(fd1,E32IOSELECT,&nbytes2);
+		test_ok(err==0);
+		test(nbytes2==(E32SELECT_READ|E32SELECT_WRITE));
+		}		
+
+	/* recv - get the rest of the data */
+	for (i=1; i<nbytes+1; i++)
+		{
+		err=recv(fd1,buf+i,1,0);
+		test_ok(err==1);
+		}
+	test(strcmp(buf,*mp)==0);
+
+	/* ioctl again - this time there is no data pending */
+	nbytes2=-1;
+	err=ioctl(fd1,E32IONREAD,&nbytes2);
+#if 0
+	test_ok(err==0);
+	test(nbytes2==0);
+#else
+	test_errno(err<0,ENOSYS);	/* IPC.PRT doesn't implement KSoReadBytesPending */
+#endif
+
+	nbytes2=E32SELECT_READ|E32SELECT_WRITE|E32SELECT_EXCEPT;
+	err=ioctl(fd1,E32IOSELECT,&nbytes2);
+	test_ok(err==0);
+	test(nbytes2==E32SELECT_WRITE);
+
+	nbytes2=E32SELECT_READ|E32SELECT_WRITE|E32SELECT_EXCEPT;
+	err=async_ioctl(fd1,E32IOSELECT,&nbytes2,&status);
+	test_ok(err==0);
+	err=async_ioctl_completion(fd1,E32IOSELECT,&nbytes2,&status);
+	test_ok(err==0);
+	test(nbytes2==E32SELECT_WRITE);
+
+	/* sendto */
+	mp++;
+	nbytes=strlen(*mp);
+	addrsize=sizeof(addr1);
+	err=sendto(fd1, *mp, nbytes+1,0,&addr1,addrsize);
+	test_errno(err<0,ENOSYS);
+	err=send(fd1, *mp, nbytes+1,0);		/* to keep synchronisation */
+	test_ok(err==nbytes+1);
+
+	/* recvfrom */
+	mp++;
+	nbytes=strlen(*mp);
+	addrsize=sizeof(addr2);
+	addr2.sa_port=0;
+	err=recvfrom(fd1, buf, nbytes+1,0,&addr2,&addrsize);
+	test_ok(err==nbytes+1);
+	test(strcmp(buf,*mp)==0);
+	/* test(addr2.sa_family==AF_LOCAL);	problem in IPC.PRT, for ESOCK 058 */
+	test(addr2.sa_port==1);
+	test(addrsize<=sizeof(addr2));
+
+	sleep(1);
+
+	test_Next("Client write to closed connection");
+
+	/* write to half-closed socket */
+	mp++;
+	nbytes=strlen(*mp);
+	err=write(fd1, *mp, nbytes+1);
+#if 0
+	/* IPC doesn't seem to care! */
+	test_errno(err<0, EPIPE);
+#else
+	test_ok(err==nbytes+1);
+#endif
+
+	sleep(2);	
+	
+	/* write to a connection closed by the other end */
+	mp++;
+	nbytes=strlen(*mp);
+	err=write(fd1, *mp, nbytes+1);
+	test_errno(err<0, EPIPE);
+
+	err=close(fd1);
+	test_ok(err==0);
+	}
+
+int close_console=0;
+
+/**
+@SYMTestCaseID          SYSLIB-STDLIB-CT-1118
+@SYMTestCaseDesc	    Tests for STREAM server
+@SYMTestPriority 	    High
+@SYMTestActions  	    Tests for server entity
+@SYMTestExpectedResults Test must not fail
+@SYMREQ                 REQ0000
+*/					
+void testConnection()
+	{
+	int err;
+	void* server;
+	
+	server=create_thread(testServer, "TLSTREAM server");
+	test(server!=0);
+	start_thread(server);
+
+	sleep(1);	/* give the server a chance to get started */
+	testClient();
+
+	err=wait_for_thread(server);
+	test(err==0);
+
+	if (close_console)
+		{
+		test_Close();
+		close(0);
+		close(1);
+		close(2);
+		}
+	}
+
+int main(int argc, char *argv[])
+	{
+	void* client;
+	int err;
+
+	test_Title("AF_LOCAL Streams");
+
+	testSimple();
+	testConnection();
+
+	test_Next("Do it again using the CPosixServer (for them, not me)");
+	close_console=1;
+
+	start_posix_server();	/* calls SpawnPosixServer from C++ code */
+
+	client=create_thread(testSimple, "TLSTREAM simple");
+	test(client!=0);
+	start_thread(client);
+	err=wait_for_thread(client);
+	test(err==0);
+
+	client=create_thread(testConnection, "TLSTREAM client");
+	test(client!=0);
+	start_thread(client);
+	err=wait_for_thread(client);
+	test(err==0);
+
+	test_Close();
+	return 0;
+	}
\ No newline at end of file