/*
 * Copyright 2010, Atis Elsts, the.kfx@gmail.com
 * Distributed under the terms of the MIT license.
 */


#include <unistd.h>
#include <memory.h>
#include <netinet/in.h>
#include <arpa/inet.h>
#include <errno.h>
#include <stdio.h>
#include <stdlib.h>


const unsigned short TEST_PROTOCOL = 89;


int
main(int argc, char *argv[])
{
	int socketFamily = AF_INET;

	if (argc > 1) {
		if (!strcmp(argv[1], "-4"))
			socketFamily = AF_INET;
		else if (!strcmp(argv[1], "-6"))
			socketFamily = AF_INET6;
	}

	int fd = socket(socketFamily, SOCK_RAW, TEST_PROTOCOL);
	if (fd < 0) {
		perror("socket");
		return -1;
	}

	sockaddr_storage saddr;
	memset(&saddr, 0, sizeof(saddr));
	if (socketFamily == AF_INET) {
		sockaddr_in *sa = (sockaddr_in *) &saddr;
		sa->sin_family = AF_INET;
		sa->sin_addr.s_addr = htonl(INADDR_LOOPBACK);
	} else {
		sockaddr_in6 *sa = (sockaddr_in6 *) &saddr;
		sa->sin6_family = AF_INET6;
		sa->sin6_addr.s6_addr[15] = 0x01; // loopback
	}

	const char *buffer = "hello world";
	unsigned length = strlen(buffer);
	int status = sendto(fd, buffer, length, 0, (sockaddr *) &saddr,
		socketFamily == AF_INET ? sizeof(sockaddr_in) : sizeof(sockaddr_in6));
	if (status < length) {
		if (status < 0)
			perror("sendto");
		else if (status == 0)
			printf("no data sent!\n");
		else
			printf("not all data sent!\n");
	} else
		printf("send(): success\n");

	close(fd);
	return 0;
}