/* server_v6.c
 *
 * Copyright (c) 2000 Sean Walton and Macmillan Publishers.  Use may be in
 * whole or in part in accordance to the General Public License (GPL).
 *
 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
 * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
 * SUCH DAMAGE.
*/

/*****************************************************************************/
/*** server_v6.c                                                           ***/
/***                                                                       ***/
/*** Demonstrate IPv6 services.                                            ***/
/*****************************************************************************/

#include <stdio.h>
#include <resolv.h>
#include <sys/socket.h>
#include <arpa/inet.h>
#include <ctype.h>
#include <stdarg.h>

void panic(char* msg, ...)
{	va_list ap;

	va_start(ap, msg);
	vprintf(msg, ap);
	va_end(ap);
	abort();
}

int main(int count, char *strings[])
{	int sd, portnum;
	struct sockaddr_in6 addr;

	if ( count == 2 )
		portnum = atoi(strings[1]);
	else
		portnum = 9999;
	bzero(&addr, sizeof(addr));
	if ( (sd = socket(PF_INET6, SOCK_STREAM, 0)) < 0 )
		panic("socket");
	addr.sin6_family = AF_INET6;
	addr.sin6_port = htons(portnum);
	if ( inet_pton(AF_INET6, "0::0", &addr.sin6_addr) == 0 )
		panic("inet_pton");
	if ( bind(sd, &addr, sizeof(addr)) != 0 )
		panic("bind6");
	if ( listen(sd, 15) != 0 )
		panic("listen6");
	while (1)
	{	int sent, size=sizeof(addr);
		int client;
		char line[100];

		client = accept(sd, &addr, &size);
		fprintf(stderr, "Connected: %s port=%d\n",
				inet_ntop(AF_INET6, &addr.sin6_addr, line, sizeof(line)),
				addr.sin6_port);
		do
		{
			sent = send(client, line, recv(client, line, sizeof(line), 0), 0);
			fprintf(stderr, "server=%s", line);
		}
		while ( sent > 0  &&  strcmp(line, "bye\n") != 0 );
		close(client);
	}
}