#include <stdlib.h>
#include <stdio.h>
#include <string.h>
#include <sys/types.h>
#include <sys/socket.h>
#include <netdb.h>


/*
 * Get the domainpart of the Jabber ID (JID)
 *
 * See https://datatracker.ietf.org/doc/html/rfc7622#section-3.2 for details.
 */
char *get_domainpart(char *jid)
{
	int start = 0;           // inclusive
	int stop = strlen(jid);  // exclusive

	for(int i=0; i<strlen(jid); i++) {
		if (jid[i] == '/') {
			stop = i;
			break;
		}
	}

	for(int i=0; i<strlen(jid); i++) {
		if (jid[i] == '@') {
			start = i + 1;
			break;
		}
	}

	char *retval = (char *)malloc((stop-start+1) * sizeof(char));
	memcpy(retval, jid+start, (stop-start) * sizeof(char));
	retval[stop] = '\0';

	return retval;
}

/*
 * Return the preferred struct addrinfo * or NULL
 *
 * This handles DNS resolution. It returns the first valid addrinfo which is
 * returned by getaddrinfo. Mind that the addrinfo could use IPv6 instead of
 * IPv4.
 */
struct addrinfo *get_addrinfo(char *domain)
{
	struct addrinfo hints;
	struct addrinfo *servinfo;
	memset(&hints, 0, sizeof hints);
	hints.ai_family = AF_UNSPEC;
	hints.ai_socktype = SOCK_STREAM;
	if (getaddrinfo(domain, "xmpp-client", &hints, &servinfo) != 0) {
		printf("Failed to resolve hostname '%s'.\n", domain);
		return NULL;
	}
	struct addrinfo *p;
	for(p=servinfo; p!=NULL; p=p->ai_next) {
		if (p->ai_family == AF_INET) {
			printf("an IPv4!\n");  // TODO

		} else if (p->ai_family == AF_INET6) {
			printf("an IPv6!\n");  // TODO
		} else {
			printf("Unknown addrinfo address type.\n");
		}
	}
	return NULL;
}

/*
 * Initialize the network connection to the XMPP server
 *
 * TODO: Error handling is missing.
 */
void xmpp_connect(void)
{
	printf("net_init()\n");

	char *jid = getenv("LIMOX_USER");
	char *pwd = getenv("LIMOX_PWD");
	printf("Trying to connect as '%s' with '%s'.\n", jid, pwd);

	char *domain = get_domainpart(jid);
	printf("Domainpart is '%s'.\n", domain);

	get_addrinfo(domain);
}