/******************************************************************************* Eurecom OpenAirInterface Copyright(c) 1999 - 2011 Eurecom This program is free software; you can redistribute it and/or modify it under the terms and conditions of the GNU General Public License, version 2, as published by the Free Software Foundation. This program is distributed in the hope it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this program; if not, write to the Free Software Foundation, Inc., 51 Franklin St - Fifth Floor, Boston, MA 02110-1301 USA. The full GNU General Public License is included in this distribution in the file called "COPYING". Contact Information Openair Admin: openair_admin@eurecom.fr Openair Tech : openair_tech@eurecom.fr Forums : http://forums.eurecom.fsr/openairinterface Address : Eurecom, 2229, route des crêtes, 06560 Valbonne Sophia Antipolis, France *******************************************************************************/ /*! \file otg_config.h main used structures * \brief otg structure * \author A. Hafsaoui and Navid Nikaein * \date 2011 * \version 0.1 * \company Eurecom * \email: openair_tech@eurecom.fr * \note * \warning */ #include "otg_form.h" #include "otg_vars.h" #include "otg_kpi.h" extern unsigned char NB_eNB_INST; extern unsigned char NB_UE_INST; FD_otg * form_dl, *form_ul; FL_FORM *fclock; unsigned int clear_cmpt_ul=0; unsigned int clear_cmpt_dl=0; FD_otg *create_form_otg(void) { FL_OBJECT *obj; FD_otg *fdui = (FD_otg *) fl_calloc(1, sizeof(*fdui)); fdui->otg = fl_bgn_form(FL_NO_BOX, 550, 550); obj = fl_add_box(FL_UP_BOX,0,0,900,700,""); fdui->owd = fl_add_xyplot(FL_NORMAL_XYPLOT,50,30,450,190,"Delay(ms)"); fl_set_object_color(fdui->owd,FL_BLACK,FL_YELLOW); fdui->throughput = fl_add_xyplot(FL_NORMAL_XYPLOT,50,300,450,190,"Throughput(Kbit/s)"); fl_set_object_color(fdui->throughput,FL_BLACK,FL_YELLOW); obj = fl_add_button(FL_NORMAL_BUTTON,250,510,50,30,"Exit"); fl_set_object_callback(obj, exit_cb, 0); fdui->loss_ratio=fl_add_text(FL_NORMAL_TEXT,5,510,220,20,"NB Loss pkts"); fdui->simu_time=fl_add_text(FL_NORMAL_TEXT,370,510,250,30,"Simulation Time"); fl_end_form(); fdui->otg->fdui = fdui; return fdui; } //For more details about object parameters, refer to: http://xforms-toolkit.org/doc/xforms_25.html void show_otg_form() { int eNB_id; char title[255]; char *tArgv[] = { "OTG", "OTG" }; int tArgc = 2; fl_initialize(&tArgc,tArgv,"OTG",0,0); for (eNB_id = 0; eNB_id < NB_eNB_INST; eNB_id++) { //NB_eNB_INST form_dl= create_form_otg (); sprintf (title, "LTE eNB->UE (DL)"); fl_show_form (form_dl->otg, FL_PLACE_HOTSPOT, FL_FULLBORDER, title); fl_set_form_position(form_dl->otg, 200, 200); if (g_otg->owd_radio_access==1) fl_set_xyplot_ybounds(form_dl->owd,0,200); else fl_set_xyplot_ybounds(form_dl->owd,0,400); fl_set_xyplot_ybounds(form_dl->throughput,0,200); form_ul= create_form_otg (); sprintf (title, "LTE UE->eNB (UL)"); fl_show_form (form_ul->otg, FL_PLACE_HOTSPOT, FL_FULLBORDER, title); fl_set_form_position(form_ul->otg, 850, 200); if (g_otg->owd_radio_access==1) fl_set_xyplot_ybounds(form_ul->owd,0,200); else fl_set_xyplot_ybounds(form_ul->owd,0,400); fl_set_xyplot_ybounds(form_ul->throughput,0,200); } //create_form_clock(); //fl_show_form(fclock, FL_PLACE_CENTER,FL_TRANSIENT,"clocks"); //fl_do_forms(); fl_check_forms(); } void add_tab_metric(int src, int dst, float owd, float throughput, int ctime){ if (otg_forms_info->init_forms==0){ show_otg_form(); otg_forms_info->init_forms=1; otg_forms_info->is_data_plot_ul=-1; otg_forms_info->is_data_plot_dl=-1; } if (dstdata_owd_ul[src][dst][otg_forms_info->idx_ul[src][dst]]= owd; otg_forms_info->data_throughput_ul[src][dst][otg_forms_info->idx_ul[src][dst]]=throughput; otg_forms_info->data_ctime_ul[src][dst][otg_forms_info->idx_ul[src][dst]]= otg_forms_info->idx_ul[src][dst]; otg_forms_info->idx_ul[src][dst]++; plot_graphes_ul(src, dst, ctime); } else{ //LOG_D(OTG,"direction: DL [src:%d, dst:%d] \n", src, dst); otg_forms_info->data_owd_dl[src][dst][otg_forms_info->idx_dl[src][dst]]= owd; otg_forms_info->data_throughput_dl[src][dst][otg_forms_info->idx_dl[src][dst]]= throughput; otg_forms_info->data_ctime_dl[src][dst][otg_forms_info->idx_dl[src][dst]]= otg_forms_info->idx_dl[src][dst]; otg_forms_info->idx_dl[src][dst]++; plot_graphes_dl(src, dst, ctime); } //LOG_D(OTG,"OTG_forms[src %d, dst %d] owd %f TH %f \n", src, dst, owd, throughput); //LOG_D(OTG,"MAX_UE_eNB %d, %d \n:", NB_UE_INST, NB_eNB_INST); } void plot_graphes_ul(int src, int dst, int ctime) //UE -->eNB { int i, src_idx=1, curve_id=1; char loss_rate[100]; char simu_time[100]; char curve_label[100]; int x_key_position=27; int y_key_position=75; if (otg_forms_info->idx_ul[src][dst]==MAX_SAMPLES-1){ fl_update_display(1); //the function flushes the X buffer so the drawing requests are on their way to the server if (otg_forms_info->is_data_plot_ul == -1) otg_forms_info->is_data_plot_ul=src; if (otg_forms_info->is_data_plot_ul == src) { fl_set_xyplot_data (form_ul->owd, otg_forms_info->data_ctime_ul[src][dst], otg_forms_info->data_owd_ul[src][dst], otg_forms_info->idx_ul[src][dst], "", "time", "ms"); sprintf(curve_label, "%d%s%d", src,"-->", dst); fl_set_xyplot_key(form_ul->owd, 0, curve_label); fl_set_xyplot_key_position(form_ul->owd, x_key_position,y_key_position, FL_ALIGN_BOTTOM_LEFT); fl_set_xyplot_data (form_ul->throughput, otg_forms_info->data_ctime_ul[src][dst], otg_forms_info->data_throughput_ul[src][dst], otg_forms_info->idx_ul[src][dst], "", "time", "kbit/s"); fl_set_xyplot_key(form_ul->throughput, 0, curve_label); fl_set_xyplot_key_font(form_ul->throughput, FL_BOLD_STYLE, FL_HUGE_SIZE); fl_set_xyplot_key_position(form_ul->throughput, x_key_position,y_key_position , FL_ALIGN_BOTTOM_LEFT); otg_kpi_nb_loss_pkts(); sprintf(loss_rate, "%s%d","NB Loss pkts UL=", otg_info->total_loss_ul); fl_set_object_label(form_ul->loss_ratio, loss_rate); sprintf(simu_time, "%s%d","Simulation Time(ms)=", ctime); fl_set_object_label(form_ul->simu_time, simu_time); } else { fl_set_xyplot_data (form_ul->owd, otg_forms_info->data_ctime_ul[otg_forms_info->is_data_plot_ul][dst], otg_forms_info->data_owd_ul[otg_forms_info->is_data_plot_ul][dst], otg_forms_info->idx_ul[otg_forms_info->is_data_plot_ul][dst], "", "time", "ms"); sprintf(curve_label, "%d%s%d", otg_forms_info->is_data_plot_ul,"-->", dst); fl_set_xyplot_key(form_ul->owd, 0, curve_label); fl_set_xyplot_key_position(form_ul->owd, x_key_position,y_key_position, FL_ALIGN_BOTTOM_LEFT); fl_set_xyplot_data (form_ul->throughput, otg_forms_info->data_ctime_ul[otg_forms_info->is_data_plot_ul][dst], otg_forms_info->data_throughput_ul[otg_forms_info->is_data_plot_ul][dst], otg_forms_info->idx_ul[otg_forms_info->is_data_plot_ul][dst], "", "time", "kbit/s"); sprintf(curve_label, "%d%s%d", otg_forms_info->is_data_plot_ul,"-->", dst); fl_set_xyplot_key(form_ul->throughput, 0, curve_label); fl_set_xyplot_key_position(form_ul->throughput, x_key_position,y_key_position , FL_ALIGN_BOTTOM_LEFT); otg_kpi_nb_loss_pkts(); sprintf(loss_rate, "%s%d","NB Loss pkts UL=",otg_info->total_loss_ul); fl_set_object_label(form_ul->loss_ratio, loss_rate); sprintf(simu_time, "%s%d","Simulation Time(ms)=", ctime); fl_set_object_label(form_ul->simu_time, simu_time); } for (src_idx=1;src_idx<=NB_UE_INST;src_idx++){ if (src_idx!=otg_forms_info->is_data_plot_ul){ fl_add_xyplot_overlay(form_ul->owd,curve_id++, otg_forms_info->data_ctime_ul[src_idx][dst], otg_forms_info->data_owd_ul[src_idx][dst], otg_forms_info->idx_ul[src_idx][dst],src_idx+6); sprintf(curve_label, "%d%s%d", src_idx,"-->", dst); fl_set_xyplot_key(form_ul->owd, curve_id-1, curve_label); fl_set_xyplot_key_position(form_ul->owd, x_key_position,y_key_position, FL_ALIGN_BOTTOM_LEFT); fl_add_xyplot_overlay(form_ul->throughput,curve_id++, otg_forms_info->data_ctime_ul[src_idx][dst], otg_forms_info->data_throughput_ul[src_idx][dst], otg_forms_info->idx_ul[src_idx][dst],src_idx+6); sprintf(curve_label, "%d%s%d", src_idx,"-->", dst); fl_set_xyplot_key(form_ul->throughput, curve_id-1, curve_label); fl_set_xyplot_key_position(form_ul->throughput,x_key_position,y_key_position, FL_ALIGN_BOTTOM_LEFT); } } for (i=0;iidx_ul[src][dst];i++){ otg_forms_info->data_ctime_ul[src][dst][otg_forms_info->idx_ul[src][dst]]=i; otg_forms_info->data_owd_ul[src][dst][i]= otg_forms_info->data_owd_ul[src][dst][i+1]; otg_forms_info->data_throughput_ul[src][dst][i]= otg_forms_info->data_throughput_ul[src][dst][i+1]; } otg_forms_info->idx_ul[src][dst]--; } fl_check_forms(); } void plot_graphes_dl(int src, int dst, int ctime) //eNB -->UE { int i, dst_idx=1, curve_id=1; char loss_rate[100]; char curve_label[100]; char simu_time[100]; int x_key_position=27; int y_key_position=75; if (otg_forms_info->idx_dl[src][dst]==MAX_SAMPLES-1){ fl_update_display(1); //the function flushes the X buffer so the drawing requests are on their way to the server if (otg_forms_info->is_data_plot_dl == -1) otg_forms_info->is_data_plot_dl=dst; if (otg_forms_info->is_data_plot_dl == dst) { fl_set_xyplot_data (form_dl->owd, otg_forms_info->data_ctime_dl[src][dst], otg_forms_info->data_owd_dl[src][dst], otg_forms_info->idx_dl[src][dst], "", "time", "ms"); sprintf(curve_label, "%d%s%d", src,"-->", dst); fl_set_xyplot_key(form_dl->owd, 0, curve_label); fl_set_xyplot_key_position(form_dl->owd, x_key_position,y_key_position, FL_ALIGN_BOTTOM_LEFT); fl_set_xyplot_data (form_dl->throughput, otg_forms_info->data_ctime_dl[src][dst], otg_forms_info->data_throughput_dl[src][dst], otg_forms_info->idx_dl[src][dst], "", "time", "kbit/s"); sprintf(curve_label, "%d%s%d", src,"-->", dst); fl_set_xyplot_key(form_dl->throughput, 0, curve_label); fl_set_xyplot_key_position(form_dl->throughput, x_key_position,y_key_position, FL_ALIGN_BOTTOM_LEFT); otg_kpi_nb_loss_pkts(); sprintf(loss_rate, "%s%d","NB Loss pkts DL=",otg_info->total_loss_dl); fl_set_object_label(form_dl->loss_ratio, loss_rate); sprintf(simu_time, "%s%d","Simulation Time(ms)=", ctime); fl_set_object_label(form_dl->simu_time, simu_time); } else { fl_set_xyplot_data (form_dl->owd, otg_forms_info->data_ctime_dl[src][otg_forms_info->is_data_plot_dl], otg_forms_info->data_owd_dl[src][otg_forms_info->is_data_plot_dl], otg_forms_info->idx_dl[src][otg_forms_info->is_data_plot_dl], "", "time", "ms"); sprintf(curve_label, "%d%s%d", src,"-->", otg_forms_info->is_data_plot_dl); fl_set_xyplot_key(form_dl->owd, 0, curve_label); fl_set_xyplot_key_position(form_dl->owd, x_key_position,y_key_position, FL_ALIGN_BOTTOM_LEFT); fl_set_xyplot_data (form_dl->throughput, otg_forms_info->data_ctime_dl[src][otg_forms_info->is_data_plot_dl], otg_forms_info->data_throughput_dl[src][otg_forms_info->is_data_plot_dl], otg_forms_info->idx_dl[src][otg_forms_info->is_data_plot_dl], "", "time", "kB/s"); sprintf(curve_label, "%d%s%d", src,"-->",otg_forms_info->is_data_plot_dl); fl_set_xyplot_key(form_dl->throughput, 0, curve_label); fl_set_xyplot_key_position(form_dl->throughput,x_key_position,y_key_position, FL_ALIGN_BOTTOM_LEFT); otg_kpi_nb_loss_pkts(); sprintf(loss_rate, "%s%d","NB Loss pkts DL=",otg_info->total_loss_dl); fl_set_object_label(form_dl->loss_ratio, loss_rate); sprintf(simu_time, "%s%d","Simulation Time(ms)=", ctime); fl_set_object_label(form_dl->simu_time, simu_time); } for (dst_idx=1;dst_idx<=NB_UE_INST;dst_idx++){ if (dst_idx!=otg_forms_info->is_data_plot_dl){ fl_add_xyplot_overlay(form_dl->owd,curve_id++, otg_forms_info->data_ctime_dl[src][dst_idx], otg_forms_info->data_owd_dl[src][dst_idx], otg_forms_info->idx_dl[src][dst_idx],dst_idx+6); sprintf(curve_label, "%d%s%d", src,"-->", dst_idx); fl_set_xyplot_key(form_dl->owd, curve_id-1, curve_label); fl_set_xyplot_key_position(form_dl->owd, x_key_position,y_key_position, FL_ALIGN_BOTTOM_LEFT); fl_add_xyplot_overlay(form_dl->throughput,curve_id++, otg_forms_info->data_ctime_dl[src][dst_idx], otg_forms_info->data_throughput_dl[src][dst_idx], otg_forms_info->idx_dl[src][dst_idx],dst_idx+6); sprintf(curve_label, "%d%s%d", src,"-->", dst_idx); fl_set_xyplot_key(form_dl->throughput, curve_id-1, curve_label); fl_set_xyplot_key_position(form_dl->throughput, x_key_position,y_key_position, FL_ALIGN_BOTTOM_LEFT); } } for (i=0;iidx_dl[src][dst];i++){ otg_forms_info->data_ctime_dl[src][dst][otg_forms_info->idx_dl[src][dst]]=i; otg_forms_info->data_owd_dl[src][dst][i]= otg_forms_info->data_owd_dl[src][dst][i+1]; otg_forms_info->data_throughput_dl[src][dst][i]= otg_forms_info->data_throughput_dl[src][dst][i+1]; } otg_forms_info->idx_dl[src][dst]--; } fl_check_forms(); } void exit_cb(FL_OBJECT *ob, long q) { fl_finish(); exit(0); } void create_form_clock(void) { FL_OBJECT *obj; if (fclock) return; fclock = fl_bgn_form(FL_NO_BOX,500,350); obj = fl_add_box(FL_UP_BOX,0,0,500,350,""); obj = fl_add_clock(FL_DIGITAL_CLOCK,185,20,150,35,""); fl_set_object_boxtype(obj,FL_ROUNDED_BOX); fl_set_object_color(obj,FL_COL1,FL_BLACK); fl_set_object_lsize(obj,FL_MEDIUM_SIZE); fl_set_object_lstyle(obj,FL_BOLD_STYLE); obj = fl_add_clock(FL_ANALOG_CLOCK,30,70,220,200,""); fl_set_object_boxtype(obj,FL_UP_BOX); obj = fl_add_clock(FL_ANALOG_CLOCK,260,70,220,200,""); fl_set_object_boxtype(obj,FL_OVAL3D_UPBOX); obj = fl_add_button(FL_NORMAL_BUTTON,375,300,110,35,"Exit"); fl_set_object_callback(obj, exit_cb, 0); fl_end_form(); fl_scale_form(fclock, 0.7, 0.7); }