#include <string.h>
#include "winc_socket.h"
typedef enum
{
MODULE_STATE_INIT,
MODULE_STATE_SOCKET_WAITING,
MODULE_STATE_CONNECTING,
MODULE_STATE_CONNECTED,
MODULE_STATE_DISCONNECTED,
MODULE_STATE_ERROR,
} MODULE_STATE;
typedef struct
{
union sockaddr_union sockAddr;
} BSOCK_TCP_CLIENT_INIT_TYPE;
static MODULE_STATE state;
static int sockh;
static BSOCK_TCP_CLIENT_INIT_TYPE initData = {0};
void bsock_tcp_client_init(void *pInitData)
{
if (NULL != pInitData)
{
memcpy(&initData, pInitData, sizeof(BSOCK_TCP_CLIENT_INIT_TYPE));
}
state = MODULE_STATE_INIT;
}
void bsock_tcp_client_run(void)
{
switch (state)
{
case MODULE_STATE_INIT:
{
state = MODULE_STATE_ERROR;
sockh = socket(initData.sockAddr.sin_family, SOCK_STREAM, IPPROTO_TCP);
if (sockh < 0)
{
break;
}
printf("opening socket %d\n", sockh);
}
case MODULE_STATE_SOCKET_WAITING:
{
errno = 0;
if (-1 == connect(sockh, (struct sockaddr*)&initData.sockAddr, sizeof(initData.sockAddr)))
{
if (EINPROGRESS == errno)
{
printf("connection in progress\n");
state = MODULE_STATE_CONNECTING;
}
else if (EAGAIN == errno)
{
printf("socket not ready try again\n");
state = MODULE_STATE_SOCKET_WAITING;
}
else
{
printf("connect failed, errno is %d\n", errno);
state = MODULE_STATE_ERROR;
}
}
else
{
printf("socket connected\n");
state = MODULE_STATE_CONNECTED;
}
break;
}
case MODULE_STATE_CONNECTING:
{
struct pollfd fd;
fd.fd = sockh;
fd.events = POLLOUT;
if (-1 == poll(&fd, 1, 0))
{
state = MODULE_STATE_ERROR;
break;
}
if (0 != (fd.revents & POLLERR))
{
printf("connect failed\n");
state = MODULE_STATE_ERROR;
}
if (0 != (fd.revents & POLLOUT))
{
printf("socket connected\n");
state = MODULE_STATE_CONNECTED;
}
break;
}
case MODULE_STATE_CONNECTED:
{
struct pollfd fd;
ssize_t numBytes = 0;
uint8_t buffer[128];
fd.fd = sockh;
fd.events = POLLIN|POLLOUT;
if (-1 == poll(&fd, 1, 0))
{
state = MODULE_STATE_ERROR;
break;
}
if (0 != (fd.revents & POLLIN))
{
errno = 0;
numBytes = recv(sockh, NULL, 0, MSG_PEEK|MSG_TRUNC);
if ((numBytes <= 0) && (errno != EWOULDBLOCK))
{
state = MODULE_STATE_DISCONNECTED;
break;
}
if (numBytes >= sizeof(buffer))
{
numBytes = sizeof(buffer);
}
errno = 0;
numBytes = recv(sockh, buffer, numBytes, 0);
if (numBytes <= 0)
{
if (errno != EWOULDBLOCK)
{
printf("recv failed, errno is %d\n", errno);
state = MODULE_STATE_DISCONNECTED;
break;
}
}
printf("recv: %d\n", numBytes);
}
if (0 != (fd.revents & POLLHUP))
{
printf("socket disconnected\n");
if (0 == (fd.revents & POLLIN))
{
state = MODULE_STATE_DISCONNECTED;
}
}
if (0 != (fd.revents & POLLOUT))
{
if (numBytes > 0)
{
errno = 0;
numBytes = send(sockh, buffer, numBytes, 0);
if ((numBytes < 0) && (errno != EWOULDBLOCK) && (errno != EAGAIN))
{
printf("send failed, errno is %d\n", errno);
state = MODULE_STATE_DISCONNECTED;
break;
}
}
}
break;
}
case MODULE_STATE_DISCONNECTED:
{
if (0 != sockh)
{
shutdown(sockh, SHUT_RDWR);
sockh = 0;
}
break;
}
case MODULE_STATE_ERROR:
{
break;
}
default:
{
break;
}
}
}