#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <errno.h>
#include <unistd.h>
#include <wifi_intf.h>
#include <pthread.h>
#include <sys/time.h>
#include <signal.h>
#include "wmg_debug.h"

#define TEST_TIMES 1001

static pthread_t  app_scan_tid;
static int event = WIFIMG_NETWORK_DISCONNECTED;
static int terminate_flag = 0;

static void wifi_event_handle(tWIFI_EVENT wifi_event, void *buf, int event_label)
{
    wmg_printf(MSG_DEBUG,"event_label 0x%x\n", event_label);

    switch(wifi_event)
    {
        case WIFIMG_WIFI_ON_SUCCESS:
        {
            wmg_printf(MSG_INFO,"WiFi on success!\n");
            event = WIFIMG_WIFI_ON_SUCCESS;
            break;
        }

        case WIFIMG_WIFI_ON_FAILED:
        {
            wmg_printf(MSG_ERROR,"WiFi on failed!\n");
            event = WIFIMG_WIFI_ON_FAILED;
            break;
        }

        case WIFIMG_WIFI_OFF_FAILED:
        {
            wmg_printf(MSG_ERROR,"wifi off failed!\n");
            event = WIFIMG_WIFI_OFF_FAILED;
            break;
        }

        case WIFIMG_WIFI_OFF_SUCCESS:
        {
            wmg_printf(MSG_INFO,"wifi off success!\n");
            event = WIFIMG_WIFI_OFF_SUCCESS;
            break;
        }

        case WIFIMG_NETWORK_CONNECTED:
        {
            wmg_printf(MSG_INFO,"WiFi connected ap!\n");
            event = WIFIMG_NETWORK_CONNECTED;
            break;
        }

        case WIFIMG_NETWORK_DISCONNECTED:
        {
            wmg_printf(MSG_INFO,"WiFi disconnected!\n");
            event = WIFIMG_NETWORK_DISCONNECTED;
            break;
        }

        case WIFIMG_PASSWORD_FAILED:
        {
            wmg_printf(MSG_ERROR,"Password authentication failed!\n");
            event = WIFIMG_PASSWORD_FAILED;
            break;
        }

        case WIFIMG_CONNECT_TIMEOUT:
        {
            wmg_printf(MSG_ERROR,"Connected timeout!\n");
            event = WIFIMG_CONNECT_TIMEOUT;
            break;
        }

        case WIFIMG_NO_NETWORK_CONNECTING:
        {
            wmg_printf(MSG_INFO,"It has no wifi auto connect when wifi on!\n");
            event = WIFIMG_NO_NETWORK_CONNECTING;
            break;
        }

        case WIFIMG_CMD_OR_PARAMS_ERROR:
        {
            wmg_printf(MSG_ERROR,"cmd or params error!\n");
            event = WIFIMG_CMD_OR_PARAMS_ERROR;
            break;
        }

        case WIFIMG_KEY_MGMT_NOT_SUPPORT:
        {
            wmg_printf(MSG_ERROR,"key mgmt is not supported!\n");
            event = WIFIMG_KEY_MGMT_NOT_SUPPORT;
            break;
        }

        case WIFIMG_OPT_NO_USE_EVENT:
        {
            wmg_printf(MSG_INFO,"operation no use!\n");
            event = WIFIMG_OPT_NO_USE_EVENT;
            break;
        }

        case WIFIMG_NETWORK_NOT_EXIST:
        {
            wmg_printf(MSG_ERROR,"network not exist!\n");
            event = WIFIMG_NETWORK_NOT_EXIST;
            break;
        }

        case WIFIMG_DEV_BUSING_EVENT:
        {
            wmg_printf(MSG_INFO,"wifi device busing!\n");
            event = WIFIMG_DEV_BUSING_EVENT;
            break;
        }

        default:
        {
            wmg_printf(MSG_DEBUG,"Other event, no care!\n");
        }
    }
}


void *app_scan_task(void *args)
{
    const aw_wifi_interface_t *p_wifi = (aw_wifi_interface_t *)args;
    char scan_results[4096];
    int len = 0;
    int event_label = 0;

    while(1){
        event_label++;
        p_wifi->start_scan(event_label);
        len = 4096;
        p_wifi->get_scan_results(scan_results, &len);
    }
}


void print_help(){
	wmg_printf(MSG_INFO,"---------------------------------------------------------------------------------\n");
	wmg_printf(MSG_INFO,"NAME:\n\twifi_longtime_test\n");
	wmg_printf(MSG_INFO,"DESCRIPTION:\n\tTest the stability of wifi module(see the test result in file:/etc/test_result).\n");
	wmg_printf(MSG_INFO,"USAGE:\n\twifi_add_network_test <ssid> <passwd> [test_times]\n");
	wmg_printf(MSG_INFO,"PARAMS:\n\tssid       : ssid of the AP\n");
	wmg_printf(MSG_INFO,"\tpasswd     : Password of the AP\n");
	wmg_printf(MSG_INFO,"\ttest_times : test times of the action(connect AP and disconnect AP)\n");
	wmg_printf(MSG_INFO,"\t             default test times: %d\n",TEST_TIMES);
	wmg_printf(MSG_INFO,"--------------------------------------MORE---------------------------------------\n");
	wmg_printf(MSG_INFO,"The way to get help information:\n");
	wmg_printf(MSG_INFO,"\twifi_longtime_test --help\n");
	wmg_printf(MSG_INFO,"\twifi_longtime_test -h\n");
	wmg_printf(MSG_INFO,"\twifi_longtime_test -H\n");
	wmg_printf(MSG_INFO,"---------------------------------------------------------------------------------\n");
}

static void signal_handler(int signo)
{
    wmg_printf(MSG_DEBUG,"Recieve signal: SIGINT\n");
    terminate_flag = 1;
}

static int set_log_level(int argv, char *argc[])
{
	if(argv >=5 && !strncmp(argc[4],"d",1)){
		char *debug = argc[4];
		if(strlen(debug) >=2 && debug[1] >= '0' &&
			debug[1] <= '5'){
			wmg_set_debug_level(debug[1] - '0');
			return 0;
		}else{
			printf("Illegal level\n");
			printf("Level range 0~5\n");
			return -1;
		}
	}
	return 0;
}

/*
 *argc[1]   ap ssid
 *argc[2]   ap passwd
 *agrc[3]   [test times]
 *see the test result in file:/etc/test_result
*/
int main(int argv, char *argc[]){
    int i = 0, ret = 0, len = 0;
    int times = 0, event_label = 0;;
    char ssid[256] = {0}, scan_results[4096] = {0};
    int  wifi_state = WIFIMG_WIFI_DISABLED;
    const aw_wifi_interface_t *p_wifi_interface = NULL;
    unsigned long long int total_con_sec = 0, total_con_microsec = 0;
    unsigned long long int con_sec = 0, con_microsec = 0;
    unsigned long long int total_disc_sec = 0, total_disc_microsec = 0;
    unsigned long long int discon_sec = 0, discon_microsec = 0;
    struct timeval tv1;
    struct timeval tv2;
    int success_times = 0, fail_times = 0, timeout_times = 0;
    char prt_buf[256] = {0};
    int ttest_times = 0;

    if(argv == 2 && (!strcmp(argc[1],"--help") || !strcmp(argc[1], "-h") || !strcmp(argc[1], "-H"))){
	print_help();
	return -1;
    }

    if(NULL == argc[1]){
	//printf("Usage:wifi_long_test <ssid> <psk> [test_times]!\n");
	//printf("default test times: %d\n",TEST_TIMES);
	print_help();
	return -1;
    }
    if(NULL == argc[3])
	ttest_times = TEST_TIMES;
    else
	ttest_times = atoi(argc[3]);
	if(set_log_level(argv,argc))
		return -1;

    wmg_printf(MSG_INFO,"\n*********************************\n");
    wmg_printf(MSG_INFO,"***Start wifi long test!***\n");
    wmg_printf(MSG_INFO,"*********************************\n");

	wmg_printf(MSG_INFO,"Test times: %d\n",ttest_times);

	sleep(2);

    if(signal(SIGINT, signal_handler) == SIG_ERR)
        wmg_printf(MSG_ERROR,"signal(SIGINT) error\n");

    event_label = rand();
    p_wifi_interface = aw_wifi_on(wifi_event_handle, event_label);
    if(p_wifi_interface == NULL){
        wmg_printf(MSG_ERROR,"wifi on failed event 0x%x\n", event);
        return -1;
    }

    while(aw_wifi_get_wifi_state() == WIFIMG_WIFI_BUSING){
        wmg_printf(MSG_INFO,"wifi state busing,waiting\n");
        usleep(2000000);
    }

    //pthread_create(&app_scan_tid, NULL, &app_scan_task,(void *)p_wifi_interface);
    for(i=0;i<ttest_times;i++){
	event_label++;
        gettimeofday(&tv1, NULL);
	p_wifi_interface->connect_ap(argc[1], argc[2], event_label);

	while(aw_wifi_get_wifi_state() == WIFIMG_WIFI_BUSING){
		wmg_printf(MSG_INFO,"wifi state busing,waiting\n");
		usleep(2000000);
	}

        if(event == WIFIMG_NETWORK_CONNECTED || event == WIFIMG_CONNECT_TIMEOUT)
	{
	    success_times++;
	    if(event == WIFIMG_CONNECT_TIMEOUT)
	        timeout_times++;
	}
	else
	{
	    fail_times++;
	}
        gettimeofday(&tv2, NULL);
        con_microsec = (tv2.tv_sec*1000000 + tv2.tv_usec)-(tv1.tv_sec*1000000 + tv1.tv_usec);
        con_sec = con_microsec/1000000;
        con_microsec = con_microsec%1000000;
        total_con_sec += con_sec;
        total_con_microsec += con_microsec;
	wmg_printf(MSG_INFO,"==========================================\n");
	wmg_printf(MSG_INFO,"Test Times: %d\nSuccess Times: %d\nFailed Times: %d\n",i+1,success_times,fail_times);
	wmg_printf(MSG_INFO,"Connecting time: %llu.%-llu seconds\n", con_sec, con_microsec);
	wmg_printf(MSG_INFO,"==========================================\n");
        sleep(1);

	event_label++;

        gettimeofday(&tv1, NULL);
	p_wifi_interface->disconnect_ap(event_label);

	while(aw_wifi_get_wifi_state() == WIFIMG_WIFI_BUSING){
		wmg_printf(MSG_INFO,"wifi state busing,waiting\n");
		usleep(2000000);
	}
        gettimeofday(&tv2, NULL);
        discon_microsec = (tv2.tv_sec*1000000 + tv2.tv_usec)-(tv1.tv_sec*1000000 + tv1.tv_usec);
        discon_sec = discon_microsec/1000000;
        discon_microsec = discon_microsec%1000000;
        total_disc_sec += discon_sec;
        total_disc_microsec += discon_microsec;
	wmg_printf(MSG_INFO,"==========================================\n");
	wmg_printf(MSG_INFO,"Disconnecting time: %llu.%-llu seconds\n", discon_sec, discon_microsec);
	wmg_printf(MSG_INFO,"==========================================\n");
        sleep(1);

        if(1 == terminate_flag)
            exit(-1);
    }

    total_con_microsec = total_con_sec*1000000+total_con_microsec;
    total_disc_microsec = total_disc_sec*1000000+total_disc_microsec;
    wmg_printf(MSG_INFO,"Test Times:%d, Success Times:%d(including get IP timeout times:%d), Failed Times:%d\n",i,success_times,timeout_times,fail_times);
    sprintf(prt_buf,"echo \"Test Times:%d, Success Times:%d(including get IP timeout times:%d), Failed Times:%d\" > /etc/test_results",i,success_times,timeout_times,fail_times);
    system(prt_buf);
    wmg_printf(MSG_INFO,"Connecting mean time: %llu.%-llu seconds\n",(total_con_microsec/1000000)/i,(total_con_microsec/i)%1000000);
    sprintf(prt_buf,"echo \"Connecting mean time: %llu.%-llu seconds\" >> /etc/test_results",(total_con_microsec/1000000)/i,(total_con_microsec/i)%1000000);
    system(prt_buf);
    wmg_printf(MSG_INFO,"Disconnecting mean time: %llu.%-llu seconds\n",(total_disc_microsec/1000000)/i,(total_disc_microsec/i)%1000000);
    wmg_printf(MSG_INFO,prt_buf,"echo \"Disconnecting mean time: %llu.%-llu seconds\" >> /etc/test_results",(total_disc_microsec/1000000)/i,(total_disc_microsec/i)%1000000);
    system(prt_buf);
    if(success_times == ttest_times)
    {
        sprintf(prt_buf,"echo Congratulations! >> /etc/test_results");
	system(prt_buf);
    }

    wmg_printf(MSG_INFO,"******************************\n");
    wmg_printf(MSG_INFO,"Wifi connect ap test: Success!\n");
    wmg_printf(MSG_INFO,"******************************\n");

    return 0;
}