/*
	Talk to the wormhole program using the unix socket
*/
#include <stdio.h>
#include <string.h>
#include <misc.h>
#include <tlmplib.h>
#include <tlmpnet.h>

<mod>
int main (int argc, char *argv[])
{
	glocal const char *port = "/var/run/blackhole/wormhole.sock";
	glocal int ret = -1;
	glocal.ret = <call tlmpprogram>(argc,argv);
	<f init>
		setproginfo ("wormhole-control",VERSION
			,"Send control command to the wormhole server\n"
			 "\n"
			 "Commands are:\n"
			 "\tallow ip\n"
			 "\tconnections\n"
			 "\treadsecrets\n"
			 "\tstatus\n");

		setarg ('p',"port","Unix domain control port",glocal.port,false);
	</f>
	<f main>
		glocal SSTRING cmd;
		for (int i=0; i<argc; i++){
			if (i>0) glocal.cmd.append (' ');
			glocal.cmd.append (argv[i]);
		}
		int ret = -1;
		ret = <call tcpconnect>("unix:",glocal.port,5);
		<f init>
			sendf ("%s\n",glocal.cmd.c_str());
		</f>
		<f oneline>
			if (strcmp(line,"Ok")==0){
				end = true;
			}else{
				printf ("%s\n",line);
			}
		</f>
		<f end>
		</f>
		</call>
		return ret;
	</f>
	</call>
	return glocal.ret;
}
</mod>