/* A simple server in the internet domain using TCP
   The port number is passed as an argument */

#include "sls_detector_defs.h"
#include "slsDetectorServer_defs.h"

#include "communication_funcs.h"
#include "slsDetectorServer_funcs.h"

#include <stdio.h>
#include <stdlib.h>
#include <signal.h>
#include <string.h>

extern int sockfd;


void error(char *msg){
	perror(msg);
}

int main(int argc, char *argv[]){
	int  portno, b;
	int retval=OK;
	int sd, fd;
	int debugflag = 0;

	// if socket crash, ignores SISPIPE, prevents global signal handler
	// subsequent read/write to socket gives error - must handle locally
	signal(SIGPIPE, SIG_IGN);

    // circumvent the basic tests
    if(argc > 1) {
        if(!strcasecmp(argv[1],"-debug")){
            debugflag = 1;
            argc=1;
        }
    }

#ifdef STOP_SERVER
	char cmd[100];
#endif
	if (argc==1) {
		portno = DEFAULT_PORTNO;
		cprintf(BLUE,
		"********************************************************\n"
		"********* opening control server on port %d **********\n"
		"********************************************************\n\n"
		, portno);
		b=1;
		basictests(debugflag);
#ifdef STOP_SERVER
		sprintf(cmd,"%s %d &",argv[0],DEFAULT_PORTNO+1);
		//cprintf(BLUE,"cmd:%s\n", cmd);
		system(cmd);
#endif
	} else {
		portno = DEFAULT_PORTNO+1;
		if ( sscanf(argv[1],"%d",&portno) == 0) {
			printf("could not open stop server: unknown port\n");
			return 1;
		}
		cprintf(BLUE,
		"********************************************************\n"
		"*********** opening stop server on port %d ***********\n"
		"********************************************************\n\n"
		, portno);
		b=0;
	}

	init_detector(b); //defined in slsDetectorServer_funcs

	sd=bindSocket(portno); //defined in communication_funcs
	sockfd=sd;
	if (getServerError(sd)) {  //defined in communication_funcs
		printf("server error!\n");
		return -1;
	}

	/* assign function table */
	function_table();  //defined in slsDetectorServer_funcs
#ifdef VERBOSE
	printf("function table assigned \n");
#endif

	if (b)
	    printf("\nControl Server Ready...\n\n");
	else
	    printf("\nStop Server Ready...\n\n");

	/* waits for connection */
	while(retval!=GOODBYE) {
#ifdef VERBOSE
		printf("\n");
#endif
#ifdef VERY_VERBOSE
		printf("Waiting for client call\n");
#endif
		fd=acceptConnection(sockfd);  //defined in communication_funcs
#ifdef VERY_VERBOSE
		printf("Conenction accepted\n");
#endif
		if (fd>0) {
			retval=decode_function(fd);   //defined in slsDetectorServer_funcs
#ifdef VERY_VERBOSE
			printf("function executed\n");
#endif
			closeConnection(fd);  //defined in communication_funcs
#ifdef VERY_VERBOSE
			printf("connection closed\n");
#endif
		}
	}

	exitServer(sockfd); //defined in communication_funcs
	printf("Goodbye!\n");

	return 0;
}