/*
	Envoie des commandes au esp32
*/
#include <stdio.h>
#include <stdlib.h>
#include <unistd.h>
#include <string.h>
#include <tlmplib.h>
#include <tlmpnet.h>
#include <string>

using namespace std;

<mod>
int main (int argc, char *argv[])
{
	glocal int ret = -1;
	glocal const char *espname = nullptr;
	glocal const char *port = "23";
	glocal int timeout = 3;
	glocal.ret = <call tlmpprogram>(argc,argv);
	<f init>
		setproginfo ("talkesp32","0.0","...");
		setarg ('e',"espname","Nom du esp ou adresse IP",glocal.espname,true);
		setarg ('p',"port","Port TCP",glocal.port,false);
		setarg ('t',"timeout","Delai d'attente",glocal.timeout,false);
	</f>
	<f main>
		glocal int ret = -1;
		for (int i=0; i<argc; i++){
			glocal const char *arg = argv[i];
			if (i > 0) sleep (1);
			<call tcpconnect>(glocal.espname,glocal.port,glocal.timeout);
			<f init>
				sendf ("%s\n",glocal.arg);
			</f>
			<f time_out>
				tlmp_error ("Delai d'attente expiré\n");
				end = true;
			</f>
			<f oneline>
				if (strcmp(line,"fin")==0){
					glocal.ret = 0;
					end = true;
				}else{
					printf ("%s\n",line);
				}
			</f>
			<f end>
				if (glocal.ret == -1) tlmp_error ("Communication incomplète\n");
			</f>
			</call>
		}
		return glocal.ret;
	</f>
	</call>
	return glocal.ret;
}
</mod>