t_getpeername.c

T－kernel Tcp/ip Protocol Stack Sample

/*
 *  Copyright (C) 1999-2003 MITSUBISHI ELECTRIC CORPORATION and
 *  RENESAS SOLUTIONS CORPORATION and
 *  RENESAS TECHNOLOGY CORPORATION
 *  All rights reserved.
 *
 *  TCP/IP Test Application program [API].
 */

#include <tk/tkernel.h>

#include <renesas_tcpip.h>
#include <renesas_tcpip_common.h>

#include "config.h"


void
test_task(int stacd, void *exinf)
{
	int	i, s, s2, ret;
	struct 	sockaddr_in name, addr, addr1;
	int	namelen, addrlen, addrlen1;
	int	num;
	int testno, testno2, result[11];

	num = 1;
	testno = 0;
	memset((char *)result, 0, sizeof(result));

	/* for setup: get normal socket */
	errno = 0;
	if ((s = unix_socket(AF_INET, SOCK_STREAM, 0)) < 0) {
		printf("socket(AF_INET,SOCK_STREAM,0) fail\n");
		goto testend;
	}

	memset((char *)&name, 0, sizeof(name));
	name.sin_family = AF_INET;
	name.sin_addr.s_addr = inet_addr(TGT_ADDR);
	name.sin_port = htons(TGT_PORT);
	namelen = sizeof(name);
	
	errno = 0;
	if ((ret = unix_bind(s, (struct sockaddr *)&name, namelen)) < 0) {
		printf("bind(s,&name,namelen) fail\n");
		unix_close(s);
		goto testend;
	}

	errno = 0;
	if ((ret = unix_listen(s, 5)) < 0) {
		printf("listen(s,5) fail\n");
		unix_close(s);
		goto testend;
	}
		
	/* Test 1 */
        printf("getpeername Test %d: \n",num++);

	errno = 0;
testno = 1;
	ret = unix_getpeername(s, (struct sockaddr *)&addr, &addrlen);
	if (ret < 0) {
		printf("OK! :getpeername(s(no connection), &addr, &addrlen), ENOTCONN,errno = %d\n",errno);
		result[testno] = 0;
	}
	else {
		printf("Fail! :getpeername(s(no connection), &addr, &addrlen), ENOTCONN,errno = %d\n",errno);
		result[testno] = 1;
	}

	errno = 0;
	addrlen1 = sizeof(addr1);
	if ((s2 = unix_accept(s, (struct sockaddr *)&addr1, &addrlen1)) < 0) {
		printf("accept(s,addr,addrlen) fail\n");
		unix_close(s);
		goto testend;
	}

	/* Test 2 */
        printf("getpeername Test %d: \n",num++);

	errno = 0;
testno = 2;
	ret = unix_getpeername(-1, (struct sockaddr *)&addr, &addrlen);
	if (ret < 0) {
		printf("OK! :getpeername(-1, &addr, &addrlen), EBADF, errno = %d\n",errno);
		result[testno] = 0;
	}
	else {
		printf("Fail! :getpeername(-1, &addr, &addrlen), EBADF, errno = %d\n",errno);
		result[testno] = 1;
	}

	/* Test 3 */
        printf("getpeername Test %d: \n",num++);

	errno = 0;
testno = 3;
	ret = unix_getpeername(10, (struct sockaddr *)&addr, &addrlen);
	if (ret < 0) {
		printf("OK! :getpeername(10, &addr, &addrlen), EBADF, errno = %d\n",errno);
		result[testno] = 0;
	}
	else {
		printf("Fail! :getpeername(10, &addr, &addrlen), EBADF, errno = %d\n",errno);
		result[testno] = 1;
	}

	/* Test 4 */
        printf("getpeername Test %d: \n",num++);

	errno = 0;
testno = 4;
	ret = unix_getpeername(s2, (struct sockaddr *)NULL, &addrlen);
	if (ret < 0) {
		printf("OK! :getpeername(s, NULL, &addrlen), EFAULT, errno = %d\n",errno);
		result[testno] = 0;
	}
	else {
		printf("Fail! :getpeername(s, NULL, &addrlen), EFAULT, errno = %d\n",errno);
		result[testno] = 1;
	}

	/* Test 5 */
        printf("getpeername Test %d: \n",num++);

	errno = 0;
testno = 5;
	ret = unix_getpeername(s2, (struct sockaddr *)-1, &addrlen);
	if (ret < 0) {
		printf("OK! :getpeername(s, -1, &addrlen), EFAULT, errno = %d\n",errno);
		result[testno] = 0;
	}
	else {
		printf("Fail! :getpeername(s, -1, &addrlen), EFAULT, errno = %d\n",errno);
		result[testno] = 1;
	}

	/* Test 6 */
        printf("getpeername Test %d: \n",num++);

	errno = 0;
testno = 6;
	ret = unix_getpeername(s2, (struct sockaddr *)&addr, NULL);
	if (ret < 0) {
		printf("OK! :getpeername(s, &addr, 0), EFAULT, errno = %d\n",errno);
		result[testno] = 0;
	}
	else {
		printf("Fail! :getpeername(s, &addr, 0), EFAULT, errno = %d\n",errno);
		result[testno] = 1;
	}

	/* Test 7 */
        printf("getpeername Test %d: \n",num++);

	errno = 0;
testno = 7;
	ret = unix_getpeername(s2, (struct sockaddr *)&addr, (int *)-1);
	if (ret < 0) {
		printf("OK! :getpeername(s, &addr, -1), EFAULT, errno = %d\n",errno);
		result[testno] = 0;
	}
	else {
		printf("Fail! :getpeername(s, &addr, -1), EFAULT, errno = %d\n",errno);
		result[testno] = 1;
	}

	/* Test 8 */
        printf("getpeername Test %d: \n",num++);

	errno = 0;
	addrlen = 0;
testno = 8;
	ret = unix_getpeername(s2, (struct sockaddr *)&addr, &addrlen);
	if (ret < 0) {
		printf("OK! :getpeername(s, &addr, &addrlen(==0)), EINVAL, errno = %d\n",errno);
		result[testno] = 0;
	}
	else {
		printf("Fail! :getpeername(s, &addr, &addrlen(==0)), EINVAL, errno = %d\n",errno);
		result[testno] = 1;
	}

	/* Test 9 */
        printf("getpeername Test %d: \n",num++);

	errno = 0;
	addrlen = -1;
testno = 9;
	ret = unix_getpeername(s2, (struct sockaddr *)&addr, &addrlen);
	if (ret < 0) {
		printf("OK! :getpeername(s, &addr, &addrlen(==-1)), EINVAL, errno = %d\n",errno);
		result[testno] = 0;
	}
	else {
		printf("Fail! :getpeername(s, &addr, &addrlen(==-1)), EINVAL, errno = %d\n",errno);
		result[testno] = 1;
	}

	/* Test 10 */
        printf("getpeername Test %d: \n",num++);

	errno = 0;
	addrlen = sizeof(addr);
testno = 10;
	ret = unix_getpeername(s2, (struct sockaddr *)&addr, &addrlen);
	if (ret == 0) {
		printf("OK! :getpeername(s, &addr, &addrlen)\n");
		printf("addr.sin_len    = %d \n",(int)addr.sin_len);
		if (addr.sin_family == AF_INET)
			result[testno] = 0;
		else
			result[testno] = 1;
		printf("addr.sin_family = %d \n",(int)addr.sin_family);
		if (addr.sin_port == htons(SUN_PORT))
			result[testno] = 0;
		else
			result[testno] = 1;
		printf("addr.sin_port   = %d \n",(int)addr.sin_port);
		if (addr.sin_addr.s_addr == inet_addr(SUN_ADDR))
			result[testno] = 0;
		else
			result[testno] = 1;
		printf("addr.sin_addr.s_addr = %d \n",(int)addr.sin_addr.s_addr);
		if (addrlen == sizeof(struct sockaddr_in))
			result[testno] = 0;
		else
			result[testno] = 1;
		printf("addrlen         = %d \n",addrlen);
	}
	else {
		printf("Fail! :getpeername(s, &addr, &addrlen), errno = %d\n",errno);
		result[testno] = 1;
	}
	unix_shutdown(s, SHUT_RDWR);
	unix_shutdown(s2, SHUT_RDWR);
	unix_close(s);
	unix_close(s2);

#if defined(T_KERNEL)
	tk_slp_tsk(2000);
#endif

testend:
	/* check the results */
	testno2 = 10;
	for (i=1; i <= testno; i++) {
		if (result[i] == 1)
			break;
	}
	if (i > testno2)
		printf("Pass.\n");
	else
		printf("Error.\n");

#if defined(T_KERNEL)
	tk_slp_tsk(TMO_FEVR);
#endif
}

/* EOF */