#include <stdio.h>
#include <unistd.h>
#include <fcntl.h>
#include <sys/types.h>
#include <sys/socket.h>
#include <arpa/inet.h>
#include <assert.h>

#include "socket.h"


static int socket_nonblock(psocket *psocket)
{
    int flags;

    flags = fcntl(psocket->fd, F_GETFL, 0);
    if (flags < 0)
        return 1;
    flags |= O_NONBLOCK;
    if (fcntl(psocket->fd, F_SETFL, flags) == -1)
        return 1;
    return 0;
}

int socket_init_in(psocket *psocket, const char *listen_addr,
                   const char *listen_port, struct addrinfo **results)
{
    struct addrinfo hints = {0};

    assert(psocket);
    assert(listen_addr || listen_port); /* getaddrinfo wants either node or service */
    hints.ai_family = AF_UNSPEC; /* IPV4 && IPV6 */
    hints.ai_socktype = SOCK_STREAM; /* TCP */
    hints.ai_flags = AI_PASSIVE; /* all interfaces */

    return getaddrinfo(listen_addr, listen_port, &hints, results);
}

int socket_bind_in(psocket *psocket, struct addrinfo *results)
{
    int fd = -1, rv;
    struct addrinfo *rp = NULL;

    assert(psocket && results);

    for (rp = results; rp != NULL; rp = rp->ai_next) {
        fd = socket(rp->ai_family, rp->ai_socktype, rp->ai_protocol);
        if (fd < 0)
            continue;
        rv = bind(fd, rp->ai_addr, rp->ai_addrlen);
	if (!rv)
            break;
        close(fd);
    }

    if (!rp)
        return -1;

    psocket->fd = fd;
    psocket->addr = *rp;
    freeaddrinfo(results);
    return socket_nonblock(psocket);
}

int socket_listen_in(psocket *psocket)
{
    assert(psocket);

    return listen(psocket->fd, POTD_BACKLOG);
}