int main(int argc, char** argv) {
if(init() == 0){
printf("Something went wrong, sorry...");
return 0;
}
int p = fork();
if(p == 0){
while(1){
process_heartbeat();
}
}else{
if(p == -1){
logout();
return 1;
}
kill(p, SIGSTOP);
set_child_pid(p);
ui_main();
}
return (EXIT_SUCCESS);
}
void *_link_thread(void *args)
{
int myID=-1;
char iface[40]="";
char essid[40]="";
char free_id[12]="";
char free_passwd[20]="";
struct mini_display_s *display=NULL;
int nb_reconnection=0;
struct _link_thread_data_s *_args=(struct _link_thread_data_s *)args;
if(_args!=NULL)
{
myID=_args->myID;
strncpy(iface,_args->iface,sizeof(iface)-1);
strncpy(essid,_args->essid,sizeof(essid)-1);
strncpy(free_id,_args->free_id,sizeof(free_id)-1);
strncpy(free_passwd,_args->free_passwd,sizeof(free_passwd)-1);
display=_args->display;
free(args);
}
int ret=0;
int exit_code=0;
mea_timer_t auth_timer;
mea_timer_t ping_timer;
mea_timer_t auth_ctrl_timer;
mea_timer_t hb_timer;
mea_init_timer(&auth_timer, 60*30, 1); // authentification toutes les 30 minutes
mea_init_timer(&ping_timer, 15, 1); // ping toutes les 15 secondes
mea_init_timer(&auth_ctrl_timer, 60, 1);
mea_init_timer(&hb_timer, 5, 1);
mea_start_timer(&ping_timer);
mea_start_timer(&hb_timer);
curl_global_init(CURL_GLOBAL_DEFAULT);
DEBUG_SECTION mea_log_printf("%s (%s) : link server is running\n", DEBUG_STR, __func__);
for(;;) // boucle principale
{
int ping_error_cntr=0;
int iptables_flag=0;
int auth_flag=0;
int ip_flag;
char addr[16], addr_last[16];
if(mea_test_timer(&hb_timer))
{
process_heartbeat(myID);
}
ip_flag=mea_waitipaddr(iface, 5, addr);
if(ip_flag==0)
{
system("/sbin/iptables -t nat -F");
iptables_flag=set_iptables_nat(iface);
DEBUG_SECTION mea_log_printf("%s (%s) : iptables return = %d\n", DEBUG_STR, __func__, iptables_flag);
if(display)
{
mini_display_clear_screen(display, DISPLAY_PAGE);
mini_display_xy_printf(display, DISPLAY_PAGE, 0, AUTH_LINE, 1, "AUTHENTICATION: __");
mini_display_xy_printf(display, DISPLAY_PAGE, 0, PING_LINE, 1, "PING: __");
mini_display_xy_printf(display, DISPLAY_PAGE, 0, IP_LINE, 1, "IP: %15s", addr);
strcpy(addr_last,addr);
}
int auth_retry=0;
do
{
if (mea_test_timer(&hb_timer))
{
process_heartbeat(myID);
}
if(auth_flag==0 || mea_test_timer(&auth_timer)==0)
{
mea_stop_timer(&auth_ctrl_timer);
int authret=freewifi_auth(free_id, free_passwd);
DEBUG_SECTION mea_log_printf("%s (%s) : freewifi_auth return = %d\n", DEBUG_STR, __func__, authret);
if(authret==0)
{
int i=0;
for(;i<3;i++)
{
if (mea_test_timer(&hb_timer))
{
process_heartbeat(myID);
}
if(display)
mini_display_xy_printf(display, DISPLAY_PAGE, 17, AUTH_LINE, 0, "%02d", i);
if(auth_url_to_check[auth_url_to_check_rr]==NULL)
auth_url_to_check_rr=0;
authret=freewifi_auth_validation(auth_url_to_check[auth_url_to_check_rr]);
auth_url_to_check_rr++;
if(authret==0)
break;
}
}
if(authret==0)
{
if(display)
mini_display_xy_printf(display, DISPLAY_PAGE, 17, AUTH_LINE, 0, "OK");
mea_start_timer(&auth_timer);
mea_start_timer(&auth_ctrl_timer);
auth_retry=0;
auth_flag=1;
}
else
{
if(display)
mini_display_xy_printf(display, DISPLAY_PAGE, 17, AUTH_LINE, 0, "KO");
auth_retry++;
}
}
if(mea_test_timer(&auth_ctrl_timer)==0)
{
int auth_ctrl_ret=0;
int i=0;
if(display)
mini_display_xy_printf(display, DISPLAY_PAGE, 0, AUTH_LINE, 1, "AUTHENTICATION: --");
for(;i<3;i++)
{
if (mea_test_timer(&hb_timer)==0)
{
process_heartbeat(myID);
}
if(display)
mini_display_xy_printf(display, DISPLAY_PAGE, 17, AUTH_LINE, 0, "%02d", i);
if(auth_url_to_check[auth_url_to_check_rr]==NULL)
auth_url_to_check_rr=0;
auth_ctrl_ret=freewifi_auth_validation(auth_url_to_check[auth_url_to_check_rr]);
auth_url_to_check_rr++;
if(auth_ctrl_ret==0)
break;
}
if(display)
mini_display_gotoxy(display, DISPLAY_PAGE, 17, AUTH_LINE);
if(auth_ctrl_ret==0)
{
if(display)
mini_display_print(display, DISPLAY_PAGE, "OK");
auth_flag=1;
}
else
{
if(display)
mini_display_print(display, DISPLAY_PAGE, "KO");
auth_flag=0;
}
}
if(mea_test_timer(&ping_timer)==0)
{
int i=0;
int ping_ok=-1;
if(strcmp(addr,addr_last)!=0)
{
if(display)
mini_display_xy_printf(display, DISPLAY_PAGE, 0, IP_LINE, 1, "IP: %15s", addr);
}
for(i=0;i<3;i++)
{
if (mea_test_timer(&hb_timer)==0)
{
process_heartbeat(myID);
}
if(ping_hosts_to_check[ping_hosts_to_check_rr]==NULL)
ping_hosts_to_check_rr=0;
if(display)
mini_display_xy_printf(display, DISPLAY_PAGE, 0, PING_LINE, 1, "PING: %02d",i);
if (mea_ping(ping_hosts_to_check[ping_hosts_to_check_rr])<0)
{
DEBUG_SECTION mea_log_printf("%s (%s) : Ping (%s) is not OK.\n", DEBUG_STR, __func__, ping_hosts_to_check[ping_hosts_to_check_rr]);
if(display)
mini_display_xy_printf(display, DISPLAY_PAGE, 17, PING_LINE, 0, "KO");
ping_hosts_to_check_rr++;
}
else
{
DEBUG_SECTION mea_log_printf("%s (%s) : Ping (%s) is OK.\n", DEBUG_STR, __func__, ping_hosts_to_check[ping_hosts_to_check_rr]);
if(display)
mini_display_xy_printf(display, DISPLAY_PAGE, 17, PING_LINE, 0, "OK");
ping_ok=0;
ping_hosts_to_check_rr++;
break;
}
}
if(ping_ok==0)
ping_error_cntr=0;
else
ping_error_cntr++;
if(ping_error_cntr>2)
break;
}
usleep(100*1000); // 100ms
}
while(mea_waitipaddr(iface,5,addr)==0 && auth_retry<3);
}
if(display)
{
mini_display_clear_screen(display,DISPLAY_PAGE);
mini_display_change_page(display,DISPLAY_PAGE);
}
process_update_indicator(myID, "NB_RECONNECTION", ++nb_reconnection);
VERBOSE(5) mea_log_printf("%s (%s) : shutdown %s ...\n",INFO_STR,__func__, iface);
if(display)
mini_display_xy_printf(display, DISPLAY_PAGE, 0, 0, 0, "ifdown %s ...", iface);
int ifdownret=ifupdown(myID, iface, 0);
DEBUG_SECTION mea_log_printf("%s (%s) : ifdown %s return = %d\n", DEBUG_STR, __func__, iface, ifdownret);
process_heartbeat(myID);
VERBOSE(5) mea_log_printf("%s (%s) : wait for %s ...\n", INFO_STR, __func__, essid);
if(display)
mini_display_xy_printf(display, DISPLAY_PAGE, 0, 0, 1, "wait %s ...", essid);
ret=waitessid(iface, essid, 0.0, 30);
if(ret<0)
{
VERBOSE(2) mea_log_printf("%s (%s) : waitessid can't get info !\n", ERROR_STR, __func__);
if(display)
mini_display_xy_printf(display, DISPLAY_PAGE, 0, 0, 1, "ERROR");
goto next;
}
if(ret==0)
{
VERBOSE(5) mea_log_printf("%s (%s) : no %s network in range !\n", INFO_STR, __func__, essid);
if(display)
{
mini_display_xy_printf(display, DISPLAY_PAGE, 0, 0, 1, "no %s", essid);
mini_display_xy_printf(display, DISPLAY_PAGE, 0, 1, 1, "in range", essid);
}
goto next;
}
if(display)
{
mini_display_xy_printf(display, DISPLAY_PAGE, 0, 0, 1, "wait %s: %dx", essid, ret);
mini_display_xy_printf(display, DISPLAY_PAGE, 0, 1, 1, "ifup %s ...", iface);
}
process_heartbeat(myID);
ifdownret=ifupdown(myID, iface, 1);
if(ifdownret==0)
{
if(display)
{
mini_display_xy_printf(display, DISPLAY_PAGE, 0, 1, 1, "ifup %s: DONE", iface);
mini_display_xy_printf(display, DISPLAY_PAGE, 0, 2, 1, "wait ip addr ...");
}
}
else
if(display)
mini_display_xy_printf(display, DISPLAY_PAGE, 0, 1, 1, "ifup %s: KO", iface);
next:
process_heartbeat(myID);
}
_link_thread_clean_exit:
curl_global_cleanup();
VERBOSE(5) mea_log_printf("%s (%s) : link server is down\n", INFO_STR, __func__);
exit(exit_code);
}
int ifupdown(int myID, char *iface, int updown)
{
/* create the pipe */
int pfd[2];
if (pipe(pfd) == -1)
{
VERBOSE(2) mea_log_printf("%s (%s) : pipe failed\n", ERROR_STR, __func__);
return -1;
}
/* create the child */
int pid;
if ((pid = fork()) < 0)
{
VERBOSE(2) mea_log_printf("%s (%s) : fork failed\n", ERROR_STR, __func__);
return -1;
}
if (pid == 0) // dans le fils, on lance la commande
{
/* child */
close(pfd[0]); /* close the unused read side */
dup2(pfd[1], 1); /* connect the write side with stdout */
dup2(pfd[1], 2); /* connect the write side with stdout */
close(pfd[1]); /* close the write side */
if(updown==1) // up
{
execl(IFUPCMND, IFUPCMND, iface, "--verbose", NULL);
}
else
{
execl(IFDOWNCMND, IFDOWNCMND, iface, "--verbose", NULL);
}
VERBOSE(2) mea_log_printf("%s (%s) : excel failed\n", ERROR_STR, __func__);
return -1;
}
else
{
FILE *fpfd;
int status;
char line[255];
close(pfd[1]); /* close the unused write side */
fpfd=fdopen(pfd[0],"r");
while(!feof(fpfd))
{
char *ptr=fgets(line,254,fpfd);
if(ptr)
{
DEBUG_SECTION mea_log_printf("%s (%s) : %s\n", DEBUG_STR, __func__, mea_strrtrim(line));
process_heartbeat(myID);
}
}
waitpid(pid, &status, 0);
fclose(fpfd); /* close the read side */
return WEXITSTATUS(status);
}
return -1;
}