/*
	Command line tool to control trli-stop
*/
#include <stdio.h>
#include <stdlib.h>
#include <unistd.h>
#include <string.h>
#include <tlmplib.h>
#include <tlmpnet.h>
#include <string>
#include "fdpass.h"

using namespace std;

#include "proto/trli_stop_control.protoch"

<mod>
int main (int argc, char *argv[])
{
	glocal int ret = -1;
	glocal const char *control = "/var/run/trlid.sock";
	glocal.ret = <call tlmpprogram>(argc,argv);
	<f init>
		setproginfo ("trli-stop-control",VERSION
			,"Command line tool to control trli-stop\n"
			 "\n"
			 "\tdebug 0/1\n"
			 "\tdebugfile filename\n"
			 "\tquit\n"
			 "\tstart\n"
			 "\tstatus\n"
			 "\tstop\n"
			);
		setarg ('p',"control","Unix socket to reach trlid",glocal.control,false);
	</f>
	<f main>
		glocal int ret = -1;
		glocal CONNECT_INFO con;
		glocal.con.port = glocal.control;	
		if (strcmp(argv[0],"status")==0 && argc==1){
			<call trli_stop_control_status>(glocal.con);
			<f ok>
				for (auto x:lines) printf ("%s\n",x);
				glocal.ret = 0;
			</f>
			</call>
		}else if (strcmp(argv[0],"quit")==0){
			<call trli_stop_control_quit>(glocal.con);
			<f ok>
				glocal.ret = 0;
			</f>
			</call>
		}else if (strcmp(argv[0],"stop")==0){
			<call trli_stop_control_stop>(glocal.con);
			<f ok>
				if (nbalive == 0){
					glocal.ret = 0;
				}else{
					for (int i=0; i<5 && glocal.ret == -1; i++){
						printf ("nbalive=%u\n",nbalive);
						sleep(1);
						<call trli_stop_control_nbalive>(glocal.con);
						<f ok>
							printf ("nbalive=%u\n",nbalive);
							if (nbalive == 0) glocal.ret = 0;
						</f>
						</call>
					}
				}
			</f>
			</call>
		}else if (strcmp(argv[0],"start")==0){
			<call trli_stop_control_start>(glocal.con);
			<f ok>
				glocal.ret = 0;
			</f>
			</call>
		}else if (strcmp(argv[0],"debug")==0 && argc==2){
			<call trli_stop_control_debug>(glocal.con,atoi(argv[1]));
			<f ok>
				glocal.ret = 0;
			</f>
			</call>
		}else if (strcmp(argv[0],"debugfile")==0 && argc==2){
			<call trli_stop_control_debugfile>(glocal.con,argv[1]);
			<f ok>
				glocal.ret = 0;
			</f>
			</call>
		}else{
			tlmp_error ("Invalid command: %s\n",argv[0]);
			usage();
		}
		return glocal.ret;
	</f>
	</call>
	return glocal.ret;
}
</mod>