/*******************************************************************************
    OpenAirInterface
    Copyright(c) 1999 - 2014 Eurecom

    OpenAirInterface is free software: you can redistribute it and/or modify
    it under the terms of the GNU General Public License as published by
    the Free Software Foundation, either version 3 of the License, or
    (at your option) any later version.


    OpenAirInterface is distributed in the hope that 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 OpenAirInterface.The full GNU General Public License is
   included in this distribution in the file called "COPYING". If not,
   see <http://www.gnu.org/licenses/>.

  Contact Information
  OpenAirInterface Admin: openair_admin@eurecom.fr
  OpenAirInterface Tech : openair_tech@eurecom.fr
  OpenAirInterface Dev  : openair4g-devel@lists.eurecom.fr

  Address      : Eurecom, Campus SophiaTech, 450 Route des Chappes, CS 50193 - 06904 Biot Sophia Antipolis cedex, FRANCE

 *******************************************************************************/

/*! \file PHY/LTE_TRANSPORT/print_stats.c
* \brief PHY statstic logging function
* \author R. Knopp, F. Kaltenberger, navid nikaein
* \date 2011
* \version 0.1
* \company Eurecom
* \email: knopp@eurecom.fr,florian.kaltenberger@eurecom.fr, navid.nikaein@eurecom.fr
* \note
* \warning
*/

#include "PHY/LTE_TRANSPORT/proto.h"

#include "PHY/defs.h"
#include "PHY/extern.h"
#include "SCHED/extern.h"

#ifdef OPENAIR2
#include "../openair2/LAYER2/MAC/proto.h"
#include "../openair2/RRC/L2_INTERFACE/openair_rrc_L2_interface.h"
#endif

extern int mac_get_rrc_status(uint8_t Mod_id,uint8_t eNB_flag,uint8_t index);
#if defined(OAI_USRP) || defined(EXMIMO) || defined(OAI_BLADERF) || defined(OAI_LMSSDR)
#include "common_lib.h"
extern openair0_config_t openair0_cfg[];
#endif

int dump_ue_stats(PHY_VARS_UE *phy_vars_ue, char* buffer, int length, runmode_t mode, int input_level_dBm)
{

  uint8_t eNB=0;
  uint32_t RRC_status;
  int len=length;
  int harq_pid,round;

  if (phy_vars_ue==NULL)
    return 0;

  if ((mode == normal_txrx) || (mode == no_L2_connect)) {
    len += sprintf(&buffer[len], "[UE_PROC] UE %d, RNTI %x\n",phy_vars_ue->Mod_id, phy_vars_ue->lte_ue_pdcch_vars[0]->crnti);
     len += sprintf(&buffer[len],"[UE PROC] RSRP[0] %.2f dBm/RE, RSSI %.2f dBm, RSRQ[0] %.2f dB, N0 %d dBm/RE (NF %.1f dB)\n",
		    10*log10(phy_vars_ue->PHY_measurements.rsrp[0])-phy_vars_ue->rx_total_gain_dB,
		    10*log10(phy_vars_ue->PHY_measurements.rssi)-phy_vars_ue->rx_total_gain_dB, 
		    10*log10(phy_vars_ue->PHY_measurements.rsrq[0]),
		    phy_vars_ue->PHY_measurements.n0_power_tot_dBm,
		    (double)phy_vars_ue->PHY_measurements.n0_power_tot_dBm+132.24);

    /*
    len += sprintf(&buffer[len],
                   "[UE PROC] Frame count: %d\neNB0 RSSI %d dBm/RE (%d dB, %d dB)\neNB1 RSSI %d dBm/RE (%d dB, %d dB)neNB2 RSSI %d dBm/RE (%d dB, %d dB)\nN0 %d dBm/RE, %f dBm/%dPRB (%d dB, %d dB)\n",
                   phy_vars_ue->frame_rx,
                   phy_vars_ue->PHY_measurements.rx_rssi_dBm[0],
                   phy_vars_ue->PHY_measurements.rx_power_dB[0][0],
                   phy_vars_ue->PHY_measurements.rx_power_dB[0][1],
                   phy_vars_ue->PHY_measurements.rx_rssi_dBm[1],
                   phy_vars_ue->PHY_measurements.rx_power_dB[1][0],
                   phy_vars_ue->PHY_measurements.rx_power_dB[1][1],
                   phy_vars_ue->PHY_measurements.rx_rssi_dBm[2],
                   phy_vars_ue->PHY_measurements.rx_power_dB[2][0],
                   phy_vars_ue->PHY_measurements.rx_power_dB[2][1],
                   phy_vars_ue->PHY_measurements.n0_power_tot_dBm,
                   phy_vars_ue->PHY_measurements.n0_power_tot_dBm+10*log10(12*phy_vars_ue->lte_frame_parms.N_RB_DL),
                   phy_vars_ue->lte_frame_parms.N_RB_DL,
                   phy_vars_ue->PHY_measurements.n0_power_dB[0],
                   phy_vars_ue->PHY_measurements.n0_power_dB[1]);
    */

#ifdef EXMIMO
    len += sprintf(&buffer[len], "[UE PROC] RX Gain %d dB (LNA %d, vga %d dB)\n",phy_vars_ue->rx_total_gain_dB, openair0_cfg[0].rxg_mode[0],(int)openair0_cfg[0].rx_gain[0]);
#endif
#if defined(OAI_USRP) || defined(OAI_BLADERF) || defined(OAI_LMSSDR)
    len += sprintf(&buffer[len], "[UE PROC] RX Gain %d dB\n",phy_vars_ue->rx_total_gain_dB);
#endif
#if defined(EXMIMO) || defined(OAI_USRP) || defined(OAI_BLADERF) || defined(OAI_LMSSDR)
    len += sprintf(&buffer[len], "[UE_PROC] Frequency offset %d Hz (%d), estimated carrier frequency %f Hz\n",phy_vars_ue->lte_ue_common_vars.freq_offset,openair_daq_vars.freq_offset,openair0_cfg[0].rx_freq[0]-phy_vars_ue->lte_ue_common_vars.freq_offset);
#endif
    len += sprintf(&buffer[len], "[UE PROC] UE mode = %s (%d)\n",mode_string[phy_vars_ue->UE_mode[0]],phy_vars_ue->UE_mode[0]);
    len += sprintf(&buffer[len], "[UE PROC] timing_advance = %d\n",phy_vars_ue->timing_advance);
    if (phy_vars_ue->UE_mode[0]==PUSCH) {
      len += sprintf(&buffer[len], "[UE PROC] Po_PUSCH = %d dBm (PL %d dB, Po_NOMINAL_PUSCH %d dBm, PHR %d dB)\n", 
		     phy_vars_ue->ulsch_ue[0]->Po_PUSCH,
		     get_PL(phy_vars_ue->Mod_id,phy_vars_ue->CC_id,0),
		     phy_vars_ue->lte_frame_parms.ul_power_control_config_common.p0_NominalPUSCH,
		     phy_vars_ue->ulsch_ue[0]->PHR);
      len += sprintf(&buffer[len], "[UE PROC] Po_PUCCH = %d dBm (Po_NOMINAL_PUCCH %d dBm, g_pucch %d dB)\n", 
		     get_PL(phy_vars_ue->Mod_id,phy_vars_ue->CC_id,0)+
		     phy_vars_ue->lte_frame_parms.ul_power_control_config_common.p0_NominalPUCCH+
		     phy_vars_ue->dlsch_ue[0][0]->g_pucch,
		     phy_vars_ue->lte_frame_parms.ul_power_control_config_common.p0_NominalPUCCH,
		     phy_vars_ue->dlsch_ue[0][0]->g_pucch);
    }
    //for (eNB=0;eNB<NUMBER_OF_eNB_MAX;eNB++) {
    for (eNB=0; eNB<1; eNB++) {
      len += sprintf(&buffer[len], "[UE PROC] RX spatial power eNB%d: [%d %d; %d %d] dB\n",
                     eNB,
                     phy_vars_ue->PHY_measurements.rx_spatial_power_dB[eNB][0][0],
                     phy_vars_ue->PHY_measurements.rx_spatial_power_dB[eNB][0][1],
                     phy_vars_ue->PHY_measurements.rx_spatial_power_dB[eNB][1][0],
                     phy_vars_ue->PHY_measurements.rx_spatial_power_dB[eNB][1][1]);

      len += sprintf(&buffer[len], "[UE PROC] RX total power eNB%d: %d dB, avg: %d dB\n",eNB,phy_vars_ue->PHY_measurements.rx_power_tot_dB[eNB],phy_vars_ue->PHY_measurements.rx_power_avg_dB[eNB]);
      len += sprintf(&buffer[len], "[UE PROC] RX total power lin: %d, avg: %d, RX total noise lin: %d, avg: %d\n",phy_vars_ue->PHY_measurements.rx_power_tot[eNB],
                     phy_vars_ue->PHY_measurements.rx_power_avg[eNB], phy_vars_ue->PHY_measurements.n0_power_tot, phy_vars_ue->PHY_measurements.n0_power_avg);
      len += sprintf(&buffer[len], "[UE PROC] effective SINR %.2f dB\n",phy_vars_ue->sinr_eff);
      len += sprintf(&buffer[len], "[UE PROC] Wideband CQI eNB %d: %d dB, avg: %d dB\n",eNB,phy_vars_ue->PHY_measurements.wideband_cqi_tot[eNB],phy_vars_ue->PHY_measurements.wideband_cqi_avg[eNB]);

      switch (phy_vars_ue->lte_frame_parms.N_RB_DL) {
      case 6:
        len += sprintf(&buffer[len], "[UE PROC] Subband CQI eNB%d (Ant 0): [%d %d %d %d %d %d] dB\n",
                       eNB,
                       phy_vars_ue->PHY_measurements.subband_cqi_dB[eNB][0][0],
                       phy_vars_ue->PHY_measurements.subband_cqi_dB[eNB][0][1],
                       phy_vars_ue->PHY_measurements.subband_cqi_dB[eNB][0][2],
                       phy_vars_ue->PHY_measurements.subband_cqi_dB[eNB][0][3],
                       phy_vars_ue->PHY_measurements.subband_cqi_dB[eNB][0][4],
                       phy_vars_ue->PHY_measurements.subband_cqi_dB[eNB][0][5]);


        len += sprintf(&buffer[len], "[UE PROC] Subband CQI eNB%d (Ant 1): [%d %d %d %d %d %d] dB\n",
                       eNB,
                       phy_vars_ue->PHY_measurements.subband_cqi_dB[eNB][1][0],
                       phy_vars_ue->PHY_measurements.subband_cqi_dB[eNB][1][1],
                       phy_vars_ue->PHY_measurements.subband_cqi_dB[eNB][1][2],
                       phy_vars_ue->PHY_measurements.subband_cqi_dB[eNB][1][3],
                       phy_vars_ue->PHY_measurements.subband_cqi_dB[eNB][1][4],
                       phy_vars_ue->PHY_measurements.subband_cqi_dB[eNB][1][5]);


        len += sprintf(&buffer[len], "[UE PROC] Subband PMI eNB%d (Ant 0): [(%d %d) (%d %d) (%d %d) (%d %d) (%d %d) (%d %d)]\n",
                       eNB,
                       phy_vars_ue->PHY_measurements.subband_pmi_re[eNB][0][0],
                       phy_vars_ue->PHY_measurements.subband_pmi_im[eNB][0][0],
                       phy_vars_ue->PHY_measurements.subband_pmi_re[eNB][1][0],
                       phy_vars_ue->PHY_measurements.subband_pmi_im[eNB][1][0],
                       phy_vars_ue->PHY_measurements.subband_pmi_re[eNB][2][0],
                       phy_vars_ue->PHY_measurements.subband_pmi_im[eNB][2][0],
                       phy_vars_ue->PHY_measurements.subband_pmi_re[eNB][3][0],
                       phy_vars_ue->PHY_measurements.subband_pmi_im[eNB][3][0],
                       phy_vars_ue->PHY_measurements.subband_pmi_re[eNB][4][0],
                       phy_vars_ue->PHY_measurements.subband_pmi_im[eNB][4][0],
                       phy_vars_ue->PHY_measurements.subband_pmi_re[eNB][5][0],
                       phy_vars_ue->PHY_measurements.subband_pmi_im[eNB][5][0]);

        len += sprintf(&buffer[len], "[UE PROC] Subband PMI eNB%d (Ant 1): [(%d %d) (%d %d) (%d %d) (%d %d) (%d %d) (%d %d)]\n",
                       eNB,
                       phy_vars_ue->PHY_measurements.subband_pmi_re[eNB][0][1],
                       phy_vars_ue->PHY_measurements.subband_pmi_im[eNB][0][1],
                       phy_vars_ue->PHY_measurements.subband_pmi_re[eNB][1][1],
                       phy_vars_ue->PHY_measurements.subband_pmi_im[eNB][1][1],
                       phy_vars_ue->PHY_measurements.subband_pmi_re[eNB][2][1],
                       phy_vars_ue->PHY_measurements.subband_pmi_im[eNB][2][1],
                       phy_vars_ue->PHY_measurements.subband_pmi_re[eNB][3][1],
                       phy_vars_ue->PHY_measurements.subband_pmi_im[eNB][3][1],
                       phy_vars_ue->PHY_measurements.subband_pmi_re[eNB][4][1],
                       phy_vars_ue->PHY_measurements.subband_pmi_im[eNB][4][1],
                       phy_vars_ue->PHY_measurements.subband_pmi_re[eNB][5][1],
                       phy_vars_ue->PHY_measurements.subband_pmi_im[eNB][5][1]);

        len += sprintf(&buffer[len], "[UE PROC] PMI Antenna selection eNB%d : [%d %d %d %d %d %d]\n",
                       eNB,
                       phy_vars_ue->PHY_measurements.selected_rx_antennas[eNB][0],
                       phy_vars_ue->PHY_measurements.selected_rx_antennas[eNB][1],
                       phy_vars_ue->PHY_measurements.selected_rx_antennas[eNB][2],
                       phy_vars_ue->PHY_measurements.selected_rx_antennas[eNB][3],
                       phy_vars_ue->PHY_measurements.selected_rx_antennas[eNB][4],
                       phy_vars_ue->PHY_measurements.selected_rx_antennas[eNB][5]);

        len += sprintf(&buffer[len], "[UE PROC] Quantized PMI eNB %d (max): %jx\n",eNB,pmi2hex_2Ar1(quantize_subband_pmi(&phy_vars_ue->PHY_measurements,eNB,6)));
        len += sprintf(&buffer[len], "[UE PROC] Quantized PMI eNB %d (both): %jx,%jx\n",eNB,
                       pmi2hex_2Ar1(quantize_subband_pmi2(&phy_vars_ue->PHY_measurements,eNB,0,6)),
                       pmi2hex_2Ar1(quantize_subband_pmi2(&phy_vars_ue->PHY_measurements,eNB,1,6)));
        break;

      case 25:
        len += sprintf(&buffer[len], "[UE PROC] Subband CQI eNB%d (Ant 0): [%d %d %d %d %d %d %d] dB\n",
                       eNB,
                       phy_vars_ue->PHY_measurements.subband_cqi_dB[eNB][0][0],
                       phy_vars_ue->PHY_measurements.subband_cqi_dB[eNB][0][1],
                       phy_vars_ue->PHY_measurements.subband_cqi_dB[eNB][0][2],
                       phy_vars_ue->PHY_measurements.subband_cqi_dB[eNB][0][3],
                       phy_vars_ue->PHY_measurements.subband_cqi_dB[eNB][0][4],
                       phy_vars_ue->PHY_measurements.subband_cqi_dB[eNB][0][5],
                       phy_vars_ue->PHY_measurements.subband_cqi_dB[eNB][0][6]);

        len += sprintf(&buffer[len], "[UE PROC] Subband CQI eNB%d (Ant 1): [%d %d %d %d %d %d %d] dB\n",
                       eNB,
                       phy_vars_ue->PHY_measurements.subband_cqi_dB[eNB][1][0],
                       phy_vars_ue->PHY_measurements.subband_cqi_dB[eNB][1][1],
                       phy_vars_ue->PHY_measurements.subband_cqi_dB[eNB][1][2],
                       phy_vars_ue->PHY_measurements.subband_cqi_dB[eNB][1][3],
                       phy_vars_ue->PHY_measurements.subband_cqi_dB[eNB][1][4],
                       phy_vars_ue->PHY_measurements.subband_cqi_dB[eNB][1][5],
                       phy_vars_ue->PHY_measurements.subband_cqi_dB[eNB][1][6]);


        len += sprintf(&buffer[len], "[UE PROC] Subband PMI eNB%d (Ant 0): [(%d %d) (%d %d) (%d %d) (%d %d) (%d %d) (%d %d) (%d %d)]\n",
                       eNB,
                       phy_vars_ue->PHY_measurements.subband_pmi_re[eNB][0][0],
                       phy_vars_ue->PHY_measurements.subband_pmi_im[eNB][0][0],
                       phy_vars_ue->PHY_measurements.subband_pmi_re[eNB][1][0],
                       phy_vars_ue->PHY_measurements.subband_pmi_im[eNB][1][0],
                       phy_vars_ue->PHY_measurements.subband_pmi_re[eNB][2][0],
                       phy_vars_ue->PHY_measurements.subband_pmi_im[eNB][2][0],
                       phy_vars_ue->PHY_measurements.subband_pmi_re[eNB][3][0],
                       phy_vars_ue->PHY_measurements.subband_pmi_im[eNB][3][0],
                       phy_vars_ue->PHY_measurements.subband_pmi_re[eNB][4][0],
                       phy_vars_ue->PHY_measurements.subband_pmi_im[eNB][4][0],
                       phy_vars_ue->PHY_measurements.subband_pmi_re[eNB][5][0],
                       phy_vars_ue->PHY_measurements.subband_pmi_im[eNB][5][0],
                       phy_vars_ue->PHY_measurements.subband_pmi_re[eNB][6][0],
                       phy_vars_ue->PHY_measurements.subband_pmi_im[eNB][6][0]);

        len += sprintf(&buffer[len], "[UE PROC] Subband PMI eNB%d (Ant 1): [(%d %d) (%d %d) (%d %d) (%d %d) (%d %d) (%d %d) (%d %d)]\n",
                       eNB,
                       phy_vars_ue->PHY_measurements.subband_pmi_re[eNB][0][1],
                       phy_vars_ue->PHY_measurements.subband_pmi_im[eNB][0][1],
                       phy_vars_ue->PHY_measurements.subband_pmi_re[eNB][1][1],
                       phy_vars_ue->PHY_measurements.subband_pmi_im[eNB][1][1],
                       phy_vars_ue->PHY_measurements.subband_pmi_re[eNB][2][1],
                       phy_vars_ue->PHY_measurements.subband_pmi_im[eNB][2][1],
                       phy_vars_ue->PHY_measurements.subband_pmi_re[eNB][3][1],
                       phy_vars_ue->PHY_measurements.subband_pmi_im[eNB][3][1],
                       phy_vars_ue->PHY_measurements.subband_pmi_re[eNB][4][1],
                       phy_vars_ue->PHY_measurements.subband_pmi_im[eNB][4][1],
                       phy_vars_ue->PHY_measurements.subband_pmi_re[eNB][5][1],
                       phy_vars_ue->PHY_measurements.subband_pmi_im[eNB][5][1],
                       phy_vars_ue->PHY_measurements.subband_pmi_re[eNB][6][1],
                       phy_vars_ue->PHY_measurements.subband_pmi_im[eNB][6][1]);

        len += sprintf(&buffer[len], "[UE PROC] PMI Antenna selection eNB%d : [%d %d %d %d %d %d %d]\n",
                       eNB,
                       phy_vars_ue->PHY_measurements.selected_rx_antennas[eNB][0],
                       phy_vars_ue->PHY_measurements.selected_rx_antennas[eNB][1],
                       phy_vars_ue->PHY_measurements.selected_rx_antennas[eNB][2],
                       phy_vars_ue->PHY_measurements.selected_rx_antennas[eNB][3],
                       phy_vars_ue->PHY_measurements.selected_rx_antennas[eNB][4],
                       phy_vars_ue->PHY_measurements.selected_rx_antennas[eNB][5],
                       phy_vars_ue->PHY_measurements.selected_rx_antennas[eNB][6]);

        len += sprintf(&buffer[len], "[UE PROC] Quantized PMI eNB %d (max): %jx\n",eNB,pmi2hex_2Ar1(quantize_subband_pmi(&phy_vars_ue->PHY_measurements,eNB,7)));
        len += sprintf(&buffer[len], "[UE PROC] Quantized PMI eNB %d (both): %jx,%jx\n",eNB,
                       pmi2hex_2Ar1(quantize_subband_pmi2(&phy_vars_ue->PHY_measurements,eNB,0,7)),
                       pmi2hex_2Ar1(quantize_subband_pmi2(&phy_vars_ue->PHY_measurements,eNB,1,7)));
        break;

      case 50:
        len += sprintf(&buffer[len], "[UE PROC] Subband CQI eNB%d (Ant 0): [%d %d %d %d %d %d %d %d %d] dB\n",
                       eNB,
                       phy_vars_ue->PHY_measurements.subband_cqi_dB[eNB][0][0],
                       phy_vars_ue->PHY_measurements.subband_cqi_dB[eNB][0][1],
                       phy_vars_ue->PHY_measurements.subband_cqi_dB[eNB][0][2],
                       phy_vars_ue->PHY_measurements.subband_cqi_dB[eNB][0][3],
                       phy_vars_ue->PHY_measurements.subband_cqi_dB[eNB][0][4],
                       phy_vars_ue->PHY_measurements.subband_cqi_dB[eNB][0][5],
                       phy_vars_ue->PHY_measurements.subband_cqi_dB[eNB][0][6],
                       phy_vars_ue->PHY_measurements.subband_cqi_dB[eNB][0][7],
                       phy_vars_ue->PHY_measurements.subband_cqi_dB[eNB][0][8]);

        len += sprintf(&buffer[len], "[UE PROC] Subband CQI eNB%d (Ant 1): [%d %d %d %d %d %d %d %d %d] dB\n",
                       eNB,
                       phy_vars_ue->PHY_measurements.subband_cqi_dB[eNB][1][0],
                       phy_vars_ue->PHY_measurements.subband_cqi_dB[eNB][1][1],
                       phy_vars_ue->PHY_measurements.subband_cqi_dB[eNB][1][2],
                       phy_vars_ue->PHY_measurements.subband_cqi_dB[eNB][1][3],
                       phy_vars_ue->PHY_measurements.subband_cqi_dB[eNB][1][4],
                       phy_vars_ue->PHY_measurements.subband_cqi_dB[eNB][1][5],
                       phy_vars_ue->PHY_measurements.subband_cqi_dB[eNB][1][6],
                       phy_vars_ue->PHY_measurements.subband_cqi_dB[eNB][1][7],
                       phy_vars_ue->PHY_measurements.subband_cqi_dB[eNB][1][8]);


        len += sprintf(&buffer[len], "[UE PROC] Subband PMI eNB%d (Ant 0): [(%d %d) (%d %d) (%d %d) (%d %d) (%d %d) (%d %d) (%d %d) (%d %d) (%d %d)]\n",
                       eNB,
                       phy_vars_ue->PHY_measurements.subband_pmi_re[eNB][0][0],
                       phy_vars_ue->PHY_measurements.subband_pmi_im[eNB][0][0],
                       phy_vars_ue->PHY_measurements.subband_pmi_re[eNB][1][0],
                       phy_vars_ue->PHY_measurements.subband_pmi_im[eNB][1][0],
                       phy_vars_ue->PHY_measurements.subband_pmi_re[eNB][2][0],
                       phy_vars_ue->PHY_measurements.subband_pmi_im[eNB][2][0],
                       phy_vars_ue->PHY_measurements.subband_pmi_re[eNB][3][0],
                       phy_vars_ue->PHY_measurements.subband_pmi_im[eNB][3][0],
                       phy_vars_ue->PHY_measurements.subband_pmi_re[eNB][4][0],
                       phy_vars_ue->PHY_measurements.subband_pmi_im[eNB][4][0],
                       phy_vars_ue->PHY_measurements.subband_pmi_re[eNB][5][0],
                       phy_vars_ue->PHY_measurements.subband_pmi_im[eNB][5][0],
                       phy_vars_ue->PHY_measurements.subband_pmi_re[eNB][6][0],
                       phy_vars_ue->PHY_measurements.subband_pmi_im[eNB][6][0],
                       phy_vars_ue->PHY_measurements.subband_pmi_re[eNB][7][0],
                       phy_vars_ue->PHY_measurements.subband_pmi_im[eNB][7][0],
                       phy_vars_ue->PHY_measurements.subband_pmi_re[eNB][8][0],
                       phy_vars_ue->PHY_measurements.subband_pmi_im[eNB][8][0]);

        len += sprintf(&buffer[len], "[UE PROC] Subband PMI eNB%d (Ant 1): [(%d %d) (%d %d) (%d %d) (%d %d) (%d %d) (%d %d) (%d %d) (%d %d) (%d %d)]\n",
                       eNB,
                       phy_vars_ue->PHY_measurements.subband_pmi_re[eNB][0][1],
                       phy_vars_ue->PHY_measurements.subband_pmi_im[eNB][0][1],
                       phy_vars_ue->PHY_measurements.subband_pmi_re[eNB][1][1],
                       phy_vars_ue->PHY_measurements.subband_pmi_im[eNB][1][1],
                       phy_vars_ue->PHY_measurements.subband_pmi_re[eNB][2][1],
                       phy_vars_ue->PHY_measurements.subband_pmi_im[eNB][2][1],
                       phy_vars_ue->PHY_measurements.subband_pmi_re[eNB][3][1],
                       phy_vars_ue->PHY_measurements.subband_pmi_im[eNB][3][1],
                       phy_vars_ue->PHY_measurements.subband_pmi_re[eNB][4][1],
                       phy_vars_ue->PHY_measurements.subband_pmi_im[eNB][4][1],
                       phy_vars_ue->PHY_measurements.subband_pmi_re[eNB][5][1],
                       phy_vars_ue->PHY_measurements.subband_pmi_im[eNB][5][1],
                       phy_vars_ue->PHY_measurements.subband_pmi_re[eNB][6][1],
                       phy_vars_ue->PHY_measurements.subband_pmi_im[eNB][6][1],
                       phy_vars_ue->PHY_measurements.subband_pmi_re[eNB][7][1],
                       phy_vars_ue->PHY_measurements.subband_pmi_im[eNB][7][1],
                       phy_vars_ue->PHY_measurements.subband_pmi_re[eNB][8][1],
                       phy_vars_ue->PHY_measurements.subband_pmi_im[eNB][8][1]);

        len += sprintf(&buffer[len], "[UE PROC] PMI Antenna selection eNB%d : [%d %d %d %d %d %d %d %d %d]\n",
                       eNB,
                       phy_vars_ue->PHY_measurements.selected_rx_antennas[eNB][0],
                       phy_vars_ue->PHY_measurements.selected_rx_antennas[eNB][1],
                       phy_vars_ue->PHY_measurements.selected_rx_antennas[eNB][2],
                       phy_vars_ue->PHY_measurements.selected_rx_antennas[eNB][3],
                       phy_vars_ue->PHY_measurements.selected_rx_antennas[eNB][4],
                       phy_vars_ue->PHY_measurements.selected_rx_antennas[eNB][5],
                       phy_vars_ue->PHY_measurements.selected_rx_antennas[eNB][6],
                       phy_vars_ue->PHY_measurements.selected_rx_antennas[eNB][7],
                       phy_vars_ue->PHY_measurements.selected_rx_antennas[eNB][8]);

        len += sprintf(&buffer[len], "[UE PROC] Quantized PMI eNB %d (max): %jx\n",eNB,pmi2hex_2Ar1(quantize_subband_pmi(&phy_vars_ue->PHY_measurements,eNB,9)));
        len += sprintf(&buffer[len], "[UE PROC] Quantized PMI eNB %d (both): %jx,%jx\n",eNB,
                       pmi2hex_2Ar1(quantize_subband_pmi2(&phy_vars_ue->PHY_measurements,eNB,0,9)),
                       pmi2hex_2Ar1(quantize_subband_pmi2(&phy_vars_ue->PHY_measurements,eNB,1,9)));
        break;

      case 100:
        len += sprintf(&buffer[len], "[UE PROC] Subband CQI eNB%d (Ant 0): [%d %d %d %d %d %d %d %d %d %d %d %d %d] dB\n",
                       eNB,
                       phy_vars_ue->PHY_measurements.subband_cqi_dB[eNB][0][0],
                       phy_vars_ue->PHY_measurements.subband_cqi_dB[eNB][0][1],
                       phy_vars_ue->PHY_measurements.subband_cqi_dB[eNB][0][2],
                       phy_vars_ue->PHY_measurements.subband_cqi_dB[eNB][0][3],
                       phy_vars_ue->PHY_measurements.subband_cqi_dB[eNB][0][4],
                       phy_vars_ue->PHY_measurements.subband_cqi_dB[eNB][0][5],
                       phy_vars_ue->PHY_measurements.subband_cqi_dB[eNB][0][6],
                       phy_vars_ue->PHY_measurements.subband_cqi_dB[eNB][0][7],
                       phy_vars_ue->PHY_measurements.subband_cqi_dB[eNB][0][8],
                       phy_vars_ue->PHY_measurements.subband_cqi_dB[eNB][0][9],
                       phy_vars_ue->PHY_measurements.subband_cqi_dB[eNB][0][10],
                       phy_vars_ue->PHY_measurements.subband_cqi_dB[eNB][0][11],
                       phy_vars_ue->PHY_measurements.subband_cqi_dB[eNB][0][12]);

        len += sprintf(&buffer[len], "[UE PROC] Subband CQI eNB%d (Ant 1): [%d %d %d %d %d %d %d %d %d %d %d %d %d] dB\n",
                       eNB,
                       phy_vars_ue->PHY_measurements.subband_cqi_dB[eNB][1][0],
                       phy_vars_ue->PHY_measurements.subband_cqi_dB[eNB][1][1],
                       phy_vars_ue->PHY_measurements.subband_cqi_dB[eNB][1][2],
                       phy_vars_ue->PHY_measurements.subband_cqi_dB[eNB][1][3],
                       phy_vars_ue->PHY_measurements.subband_cqi_dB[eNB][1][4],
                       phy_vars_ue->PHY_measurements.subband_cqi_dB[eNB][1][5],
                       phy_vars_ue->PHY_measurements.subband_cqi_dB[eNB][1][6],
                       phy_vars_ue->PHY_measurements.subband_cqi_dB[eNB][1][7],
                       phy_vars_ue->PHY_measurements.subband_cqi_dB[eNB][1][8],
                       phy_vars_ue->PHY_measurements.subband_cqi_dB[eNB][1][9],
                       phy_vars_ue->PHY_measurements.subband_cqi_dB[eNB][1][10],
                       phy_vars_ue->PHY_measurements.subband_cqi_dB[eNB][1][11],
                       phy_vars_ue->PHY_measurements.subband_cqi_dB[eNB][1][12]);


        len += sprintf(&buffer[len], "[UE PROC] Subband PMI eNB%d (Ant 0): [(%d %d) (%d %d) (%d %d) (%d %d) (%d %d) (%d %d) (%d %d) (%d %d) (%d %d) (%d %d) (%d %d) (%d %d) (%d %d)]\n",
                       eNB,
                       phy_vars_ue->PHY_measurements.subband_pmi_re[eNB][0][0],
                       phy_vars_ue->PHY_measurements.subband_pmi_im[eNB][0][0],
                       phy_vars_ue->PHY_measurements.subband_pmi_re[eNB][1][0],
                       phy_vars_ue->PHY_measurements.subband_pmi_im[eNB][1][0],
                       phy_vars_ue->PHY_measurements.subband_pmi_re[eNB][2][0],
                       phy_vars_ue->PHY_measurements.subband_pmi_im[eNB][2][0],
                       phy_vars_ue->PHY_measurements.subband_pmi_re[eNB][3][0],
                       phy_vars_ue->PHY_measurements.subband_pmi_im[eNB][3][0],
                       phy_vars_ue->PHY_measurements.subband_pmi_re[eNB][4][0],
                       phy_vars_ue->PHY_measurements.subband_pmi_im[eNB][4][0],
                       phy_vars_ue->PHY_measurements.subband_pmi_re[eNB][5][0],
                       phy_vars_ue->PHY_measurements.subband_pmi_im[eNB][5][0],
                       phy_vars_ue->PHY_measurements.subband_pmi_re[eNB][6][0],
                       phy_vars_ue->PHY_measurements.subband_pmi_im[eNB][6][0],
                       phy_vars_ue->PHY_measurements.subband_pmi_re[eNB][7][0],
                       phy_vars_ue->PHY_measurements.subband_pmi_im[eNB][7][0],
                       phy_vars_ue->PHY_measurements.subband_pmi_re[eNB][8][0],
                       phy_vars_ue->PHY_measurements.subband_pmi_im[eNB][8][0],
                       phy_vars_ue->PHY_measurements.subband_pmi_re[eNB][9][0],
                       phy_vars_ue->PHY_measurements.subband_pmi_im[eNB][9][0],
                       phy_vars_ue->PHY_measurements.subband_pmi_re[eNB][10][0],
                       phy_vars_ue->PHY_measurements.subband_pmi_im[eNB][10][0],
                       phy_vars_ue->PHY_measurements.subband_pmi_re[eNB][11][0],
                       phy_vars_ue->PHY_measurements.subband_pmi_im[eNB][11][0],
                       phy_vars_ue->PHY_measurements.subband_pmi_re[eNB][12][0],
                       phy_vars_ue->PHY_measurements.subband_pmi_im[eNB][12][0]);

        len += sprintf(&buffer[len], "[UE PROC] Subband PMI eNB%d (Ant 1): [(%d %d) (%d %d) (%d %d) (%d %d) (%d %d) (%d %d) (%d %d) (%d %d) (%d %d) (%d %d) (%d %d) (%d %d) (%d %d)]\n",
                       eNB,
                       phy_vars_ue->PHY_measurements.subband_pmi_re[eNB][0][1],
                       phy_vars_ue->PHY_measurements.subband_pmi_im[eNB][0][1],
                       phy_vars_ue->PHY_measurements.subband_pmi_re[eNB][1][1],
                       phy_vars_ue->PHY_measurements.subband_pmi_im[eNB][1][1],
                       phy_vars_ue->PHY_measurements.subband_pmi_re[eNB][2][1],
                       phy_vars_ue->PHY_measurements.subband_pmi_im[eNB][2][1],
                       phy_vars_ue->PHY_measurements.subband_pmi_re[eNB][3][1],
                       phy_vars_ue->PHY_measurements.subband_pmi_im[eNB][3][1],
                       phy_vars_ue->PHY_measurements.subband_pmi_re[eNB][4][1],
                       phy_vars_ue->PHY_measurements.subband_pmi_im[eNB][4][1],
                       phy_vars_ue->PHY_measurements.subband_pmi_re[eNB][5][1],
                       phy_vars_ue->PHY_measurements.subband_pmi_im[eNB][5][1],
                       phy_vars_ue->PHY_measurements.subband_pmi_re[eNB][6][1],
                       phy_vars_ue->PHY_measurements.subband_pmi_im[eNB][6][1],
                       phy_vars_ue->PHY_measurements.subband_pmi_re[eNB][7][1],
                       phy_vars_ue->PHY_measurements.subband_pmi_im[eNB][7][1],
                       phy_vars_ue->PHY_measurements.subband_pmi_re[eNB][8][1],
                       phy_vars_ue->PHY_measurements.subband_pmi_im[eNB][8][1],
                       phy_vars_ue->PHY_measurements.subband_pmi_re[eNB][9][1],
                       phy_vars_ue->PHY_measurements.subband_pmi_im[eNB][9][1],
                       phy_vars_ue->PHY_measurements.subband_pmi_re[eNB][10][1],
                       phy_vars_ue->PHY_measurements.subband_pmi_im[eNB][10][1],
                       phy_vars_ue->PHY_measurements.subband_pmi_re[eNB][11][1],
                       phy_vars_ue->PHY_measurements.subband_pmi_im[eNB][11][1],
                       phy_vars_ue->PHY_measurements.subband_pmi_re[eNB][12][1],
                       phy_vars_ue->PHY_measurements.subband_pmi_im[eNB][12][1]);

        len += sprintf(&buffer[len], "[UE PROC] PMI Antenna selection eNB%d : [%d %d %d %d %d %d %d %d %d %d %d %d %d]\n",
                       eNB,
                       phy_vars_ue->PHY_measurements.selected_rx_antennas[eNB][0],
                       phy_vars_ue->PHY_measurements.selected_rx_antennas[eNB][1],
                       phy_vars_ue->PHY_measurements.selected_rx_antennas[eNB][2],
                       phy_vars_ue->PHY_measurements.selected_rx_antennas[eNB][3],
                       phy_vars_ue->PHY_measurements.selected_rx_antennas[eNB][4],
                       phy_vars_ue->PHY_measurements.selected_rx_antennas[eNB][5],
                       phy_vars_ue->PHY_measurements.selected_rx_antennas[eNB][6],
                       phy_vars_ue->PHY_measurements.selected_rx_antennas[eNB][7],
                       phy_vars_ue->PHY_measurements.selected_rx_antennas[eNB][8],
                       phy_vars_ue->PHY_measurements.selected_rx_antennas[eNB][9],
                       phy_vars_ue->PHY_measurements.selected_rx_antennas[eNB][10],
                       phy_vars_ue->PHY_measurements.selected_rx_antennas[eNB][11],
                       phy_vars_ue->PHY_measurements.selected_rx_antennas[eNB][12]);

        len += sprintf(&buffer[len], "[UE PROC] Quantized PMI eNB %d (max): %jx\n",eNB,pmi2hex_2Ar1(quantize_subband_pmi(&phy_vars_ue->PHY_measurements,eNB,13)));
        len += sprintf(&buffer[len], "[UE PROC] Quantized PMI eNB %d (both): %jx,%jx\n",eNB,
                       pmi2hex_2Ar1(quantize_subband_pmi2(&phy_vars_ue->PHY_measurements,eNB,0,13)),
                       pmi2hex_2Ar1(quantize_subband_pmi2(&phy_vars_ue->PHY_measurements,eNB,1,13)));
        break;
      }

#ifdef OPENAIR2
      RRC_status = mac_UE_get_rrc_status(phy_vars_ue->Mod_id, 0);
      len += sprintf(&buffer[len],"[UE PROC] RRC status = %d\n",RRC_status);
#endif

 
      len += sprintf(&buffer[len], "[UE PROC] Transmission Mode %d (mode1_flag %d)\n",phy_vars_ue->transmission_mode[eNB],phy_vars_ue->lte_frame_parms.mode1_flag);
      len += sprintf(&buffer[len], "[UE PROC] PBCH err conseq %d, PBCH error total %d, PBCH FER %d\n",
                     phy_vars_ue->lte_ue_pbch_vars[eNB]->pdu_errors_conseq,
                     phy_vars_ue->lte_ue_pbch_vars[eNB]->pdu_errors,
                     phy_vars_ue->lte_ue_pbch_vars[eNB]->pdu_fer);

      if (phy_vars_ue->transmission_mode[eNB] == 6)
        len += sprintf(&buffer[len], "[UE PROC] Mode 6 Wideband CQI eNB %d : %d dB\n",eNB,phy_vars_ue->PHY_measurements.precoded_cqi_dB[eNB][0]);

      for (harq_pid=0;harq_pid<8;harq_pid++) {
	len+=sprintf(&buffer[len],"[UE PROC] eNB %d: CW 0 harq_pid %d, mcs %d:",eNB,harq_pid,phy_vars_ue->dlsch_ue[0][0]->harq_processes[harq_pid]->mcs);
	for (round=0;round<8;round++)
	  len+=sprintf(&buffer[len],"%d/%d ",
		       phy_vars_ue->dlsch_ue[0][0]->harq_processes[harq_pid]->errors[round],
		       phy_vars_ue->dlsch_ue[0][0]->harq_processes[harq_pid]->trials[round]);
	len+=sprintf(&buffer[len],"\n");
      }
      if (phy_vars_ue->dlsch_ue[0] && phy_vars_ue->dlsch_ue[0][0] && phy_vars_ue->dlsch_ue[0][1]) {
        len += sprintf(&buffer[len], "[UE PROC] Saved PMI for DLSCH eNB %d : %jx (%p)\n",eNB,pmi2hex_2Ar1(phy_vars_ue->dlsch_ue[0][0]->pmi_alloc),phy_vars_ue->dlsch_ue[0][0]);

        len += sprintf(&buffer[len], "[UE PROC] eNB %d: dl_power_off = %d\n",eNB,phy_vars_ue->dlsch_ue[0][0]->harq_processes[0]->dl_power_off);

	for (harq_pid=0;harq_pid<8;harq_pid++) {
	  len+=sprintf(&buffer[len],"[UE PROC] eNB %d: CW 1 harq_pid %d, mcs %d:",eNB,harq_pid,phy_vars_ue->dlsch_ue[0][1]->harq_processes[0]->mcs);
	  for (round=0;round<8;round++)
	    len+=sprintf(&buffer[len],"%d/%d ",
			 phy_vars_ue->dlsch_ue[0][1]->harq_processes[harq_pid]->errors[round],
			 phy_vars_ue->dlsch_ue[0][1]->harq_processes[harq_pid]->trials[round]);
	  len+=sprintf(&buffer[len],"\n");
	}
      }

      len += sprintf(&buffer[len], "[UE PROC] DLSCH Total %d, Error %d, FER %d\n",phy_vars_ue->dlsch_received[0],phy_vars_ue->dlsch_errors[0],phy_vars_ue->dlsch_fer[0]);
      len += sprintf(&buffer[len], "[UE PROC] DLSCH (SI) Total %d, Error %d\n",phy_vars_ue->dlsch_SI_received[0],phy_vars_ue->dlsch_SI_errors[0]);
      len += sprintf(&buffer[len], "[UE PROC] DLSCH (RA) Total %d, Error %d\n",phy_vars_ue->dlsch_ra_received[0],phy_vars_ue->dlsch_ra_errors[0]);
#ifdef Rel10
      int i=0;

      //len += sprintf(&buffer[len], "[UE PROC] MCH  Total %d\n", phy_vars_ue->dlsch_mch_received[0]);
      for(i=0; i <phy_vars_ue->lte_frame_parms.num_MBSFN_config; i++ ) {
        len += sprintf(&buffer[len], "[UE PROC] MCH (MCCH MBSFN %d) Total %d, Error %d, Trials %d\n",
                       i, phy_vars_ue->dlsch_mcch_received[i][0],phy_vars_ue->dlsch_mcch_errors[i][0],phy_vars_ue->dlsch_mcch_trials[i][0]);
        len += sprintf(&buffer[len], "[UE PROC] MCH (MTCH MBSFN %d) Total %d, Error %d, Trials %d\n",
                       i, phy_vars_ue->dlsch_mtch_received[i][0],phy_vars_ue->dlsch_mtch_errors[i][0],phy_vars_ue->dlsch_mtch_trials[i][0]);
      }

#endif
      len += sprintf(&buffer[len], "[UE PROC] DLSCH Bitrate %dkbps\n",(phy_vars_ue->bitrate[0]/1000));
      len += sprintf(&buffer[len], "[UE PROC] Total Received Bits %dkbits\n",(phy_vars_ue->total_received_bits[0]/1000));
      len += sprintf(&buffer[len], "[UE PROC] IA receiver %d\n",openair_daq_vars.use_ia_receiver);

    }

  } else {
    len += sprintf(&buffer[len], "[UE PROC] Frame count: %d, RSSI %3.2f dB (%d dB, %d dB), N0 %3.2f dB (%d dB, %d dB)\n",
                   phy_vars_ue->frame_rx,
                   10*log10(phy_vars_ue->PHY_measurements.rssi),
                   phy_vars_ue->PHY_measurements.rx_power_dB[0][0],
                   phy_vars_ue->PHY_measurements.rx_power_dB[0][1],
                   10*log10(phy_vars_ue->PHY_measurements.n0_power_tot),
                   phy_vars_ue->PHY_measurements.n0_power_dB[0],
                   phy_vars_ue->PHY_measurements.n0_power_dB[1]);
#ifdef EXMIMO
    phy_vars_ue->rx_total_gain_dB = ((int)(10*log10(phy_vars_ue->PHY_measurements.rssi)))-input_level_dBm;
    len += sprintf(&buffer[len], "[UE PROC] rxg_mode %d, input level (set by user) %d dBm, VGA gain %d dB ==> total gain %3.2f dB, noise figure %3.2f dB\n",
                   openair0_cfg[0].rxg_mode[0],
                   input_level_dBm,
                   (int)openair0_cfg[0].rx_gain[0],
                   10*log10(phy_vars_ue->PHY_measurements.rssi)-input_level_dBm,
                   10*log10(phy_vars_ue->PHY_measurements.n0_power_tot)-phy_vars_ue->rx_total_gain_dB+105);
#endif
  }

  len += sprintf(&buffer[len],"EOF\n");

  return len;
} // is_clusterhead


int dump_eNB_stats(PHY_VARS_eNB *phy_vars_eNB, char* buffer, int length)
{

  unsigned int success=0;
  uint8_t eNB,UE_id,i,j,number_of_cards_l=1;
  uint32_t ulsch_errors=0,dlsch_errors=0;
  uint32_t ulsch_round_attempts[4]= {0,0,0,0},ulsch_round_errors[4]= {0,0,0,0};
  uint32_t dlsch_round_attempts[4]= {0,0,0,0},dlsch_round_errors[4]= {0,0,0,0};
  uint32_t UE_id_mac, RRC_status;

  if (phy_vars_eNB==NULL)
    return 0;

  int len = length;

  //  if(phy_vars_eNB->frame==0){
  phy_vars_eNB->total_dlsch_bitrate = 0;//phy_vars_eNB->eNB_UE_stats[UE_id].dlsch_bitrate + phy_vars_eNB->total_dlsch_bitrate;
  phy_vars_eNB->total_transmitted_bits = 0;// phy_vars_eNB->eNB_UE_stats[UE_id].total_transmitted_bits +  phy_vars_eNB->total_transmitted_bits;
  phy_vars_eNB->total_system_throughput = 0;//phy_vars_eNB->eNB_UE_stats[UE_id].total_transmitted_bits + phy_vars_eNB->total_system_throughput;
  // }

  for (eNB=0; eNB<number_of_cards_l; eNB++) {
    len += sprintf(&buffer[len],"eNB %d/%d Frame %d: RX Gain %d dB, I0 %d dBm (%d,%d) dB \n",
                   eNB,number_of_cards_l,
                   phy_vars_eNB->proc[0].frame_tx,
                   phy_vars_eNB->rx_total_gain_eNB_dB,
                   phy_vars_eNB->PHY_measurements_eNB[eNB].n0_power_tot_dBm,
                   phy_vars_eNB->PHY_measurements_eNB[eNB].n0_power_dB[0],
                   phy_vars_eNB->PHY_measurements_eNB[eNB].n0_power_dB[1]);

    len += sprintf(&buffer[len],"PRB I0 (%X.%X.%X.%X): ",
		   phy_vars_eNB->rb_mask_ul[0],
		   phy_vars_eNB->rb_mask_ul[1],phy_vars_eNB->rb_mask_ul[2],phy_vars_eNB->rb_mask_ul[3]);

    for (i=0; i<phy_vars_eNB->lte_frame_parms.N_RB_UL; i++) {
      len += sprintf(&buffer[len],"%4d ",
                     phy_vars_eNB->PHY_measurements_eNB[eNB].n0_subband_power_tot_dBm[i]);
      if ((i>0) && ((i%25) == 0)) 
	len += sprintf(&buffer[len],"\n");
    }
    len += sprintf(&buffer[len],"\n");
    len += sprintf(&buffer[len],"\nPERFORMANCE PARAMETERS\n");
    /*
    len += sprintf(&buffer[len],"[eNB PROC] Total DLSCH Bitrate for the System %dkbps\n",((phy_vars_eNB->eNB_UE_stats[0].dlsch_bitrate + phy_vars_eNB->eNB_UE_stats[1].dlsch_bitrate)/1000));
    len += sprintf(&buffer[len],"[eNB PROC] Total Bits successfully transitted %dKbits in %dframe(s)\n",((phy_vars_eNB->eNB_UE_stats[0].total_transmitted_bits + phy_vars_eNB->eNB_UE_stats[1].total_transmitted_bits)/1000),phy_vars_eNB->frame+1);
    len += sprintf(&buffer[len],"[eNB PROC] Average System Throughput %dKbps\n",(phy_vars_eNB->eNB_UE_stats[0].total_transmitted_bits + phy_vars_eNB->eNB_UE_stats[1].total_transmitted_bits)/((phy_vars_eNB->frame+1)*10));
    */

    for (UE_id=0; UE_id<NUMBER_OF_UE_MAX; UE_id++) {
      if ((phy_vars_eNB->dlsch_eNB[(uint8_t)UE_id][0]->rnti>0)&&
	  (phy_vars_eNB->eNB_UE_stats[UE_id].mode == PUSCH)) {	

        phy_vars_eNB->total_dlsch_bitrate = phy_vars_eNB->eNB_UE_stats[UE_id].dlsch_bitrate + phy_vars_eNB->total_dlsch_bitrate;
        phy_vars_eNB->total_transmitted_bits = phy_vars_eNB->eNB_UE_stats[UE_id].total_TBS + phy_vars_eNB->total_transmitted_bits;

        //phy_vars_eNB->total_system_throughput = phy_vars_eNB->eNB_UE_stats[UE_id].total_transmitted_bits + phy_vars_eNB->total_system_throughput;
         
	for (i=0; i<8; i++)
	  success = success + (phy_vars_eNB->eNB_UE_stats[UE_id].dlsch_trials[i][0] - phy_vars_eNB->eNB_UE_stats[UE_id].dlsch_l2_errors[i]);

    
	
	len += sprintf(&buffer[len],"Total DLSCH %d kbits / %d frames ",(phy_vars_eNB->total_transmitted_bits/1000),phy_vars_eNB->proc[0].frame_tx+1);
	len += sprintf(&buffer[len],"Total DLSCH throughput %d kbps ",(phy_vars_eNB->total_dlsch_bitrate/1000));
	len += sprintf(&buffer[len],"Total DLSCH trans %d / %d frames\n",success,phy_vars_eNB->proc[0].frame_tx+1);
	//len += sprintf(&buffer[len],"[eNB PROC] FULL MU-MIMO Transmissions/Total Transmissions = %d/%d\n",phy_vars_eNB->FULL_MUMIMO_transmissions,phy_vars_eNB->check_for_total_transmissions);
	//len += sprintf(&buffer[len],"[eNB PROC] MU-MIMO Transmissions/Total Transmissions = %d/%d\n",phy_vars_eNB->check_for_MUMIMO_transmissions,phy_vars_eNB->check_for_total_transmissions);
	//len += sprintf(&buffer[len],"[eNB PROC] SU-MIMO Transmissions/Total Transmissions = %d/%d\n",phy_vars_eNB->check_for_SUMIMO_transmissions,phy_vars_eNB->check_for_total_transmissions);
	
	len += sprintf(&buffer[len],"UE %d (%x) Power: (%d,%d) dB, Po_PUSCH: (%d,%d) dBm, Po_PUCCH (%d/%d) dBm, Po_PUCCH1 (%d,%d) dBm,  PUCCH1 Thres %d dBm \n",
		       UE_id,
		       phy_vars_eNB->eNB_UE_stats[UE_id].crnti,
		       dB_fixed(phy_vars_eNB->lte_eNB_pusch_vars[UE_id]->ulsch_power[0]),
		       dB_fixed(phy_vars_eNB->lte_eNB_pusch_vars[UE_id]->ulsch_power[1]),
		       phy_vars_eNB->eNB_UE_stats[UE_id].UL_rssi[0],
		       phy_vars_eNB->eNB_UE_stats[UE_id].UL_rssi[1],
		       dB_fixed(phy_vars_eNB->eNB_UE_stats[UE_id].Po_PUCCH/phy_vars_eNB->lte_frame_parms.N_RB_UL)-phy_vars_eNB->rx_total_gain_eNB_dB,
		       phy_vars_eNB->lte_frame_parms.ul_power_control_config_common.p0_NominalPUCCH,
		       dB_fixed(phy_vars_eNB->eNB_UE_stats[UE_id].Po_PUCCH1_below/phy_vars_eNB->lte_frame_parms.N_RB_UL)-phy_vars_eNB->rx_total_gain_eNB_dB,
		       dB_fixed(phy_vars_eNB->eNB_UE_stats[UE_id].Po_PUCCH1_above/phy_vars_eNB->lte_frame_parms.N_RB_UL)-phy_vars_eNB->rx_total_gain_eNB_dB,
		       PUCCH1_THRES+phy_vars_eNB->PHY_measurements_eNB[0].n0_power_tot_dBm-dB_fixed(phy_vars_eNB->lte_frame_parms.N_RB_UL),
		       phy_vars_eNB->eNB_UE_stats[UE_id].sector);
	
	len+= sprintf(&buffer[len],"DL mcs %d, UL mcs %d, UL rb %d, delta_TF %d, ",
		      phy_vars_eNB->dlsch_eNB[(uint8_t)UE_id][0]->harq_processes[0]->mcs,
		      phy_vars_eNB->ulsch_eNB[(uint8_t)UE_id]->harq_processes[0]->mcs,
		      phy_vars_eNB->ulsch_eNB[(uint8_t)UE_id]->harq_processes[0]->nb_rb,
		      phy_vars_eNB->ulsch_eNB[(uint8_t)UE_id]->harq_processes[0]->delta_TF);
	
	len += sprintf(&buffer[len],"Wideband CQI: (%d,%d) dB\n",
		       phy_vars_eNB->PHY_measurements_eNB[eNB].wideband_cqi_dB[UE_id][0],
		       phy_vars_eNB->PHY_measurements_eNB[eNB].wideband_cqi_dB[UE_id][1]);
	
	/*	len += sprintf(&buffer[len],"[eNB PROC] Subband CQI:    ");
	
	for (i=0; i<phy_vars_eNB->lte_frame_parms.N_RB_DL; i++)
	  len += sprintf(&buffer[len],"%2d ",
			 phy_vars_eNB->PHY_measurements_eNB[eNB].subband_cqi_tot_dB[UE_id][i]);
	
	len += sprintf(&buffer[len],"\n");
	*/

	len += sprintf(&buffer[len],"DL TM %d, DL_cqi %d, DL_pmi_single %jx ",
		       phy_vars_eNB->transmission_mode[UE_id],
		       phy_vars_eNB->eNB_UE_stats[UE_id].DL_cqi[0],
		       pmi2hex_2Ar1(phy_vars_eNB->eNB_UE_stats[UE_id].DL_pmi_single));

	len += sprintf(&buffer[len],"Timing advance %d samples (%d 16Ts), update %d ",
		       phy_vars_eNB->eNB_UE_stats[UE_id].UE_timing_offset,
		       phy_vars_eNB->eNB_UE_stats[UE_id].UE_timing_offset>>2,
		       phy_vars_eNB->eNB_UE_stats[UE_id].timing_advance_update);
	
	len += sprintf(&buffer[len],"Mode = %s(%d) ",
		       mode_string[phy_vars_eNB->eNB_UE_stats[UE_id].mode],
		       phy_vars_eNB->eNB_UE_stats[UE_id].mode);
	UE_id_mac = find_UE_id(phy_vars_eNB->Mod_id,phy_vars_eNB->dlsch_eNB[(uint8_t)UE_id][0]->rnti);
	
	if (UE_id_mac != -1) {
	  RRC_status = mac_eNB_get_rrc_status(phy_vars_eNB->Mod_id,phy_vars_eNB->dlsch_eNB[(uint8_t)UE_id][0]->rnti);
	  len += sprintf(&buffer[len],"UE_id_mac = %d, RRC status = %d\n",UE_id_mac,RRC_status);
	} else
	  len += sprintf(&buffer[len],"UE_id_mac = -1\n");
	
        len += sprintf(&buffer[len],"SR received/total: %d/%d (diff %d)\n",
                       phy_vars_eNB->eNB_UE_stats[UE_id].sr_received,
                       phy_vars_eNB->eNB_UE_stats[UE_id].sr_total,
                       phy_vars_eNB->eNB_UE_stats[UE_id].sr_total-phy_vars_eNB->eNB_UE_stats[UE_id].sr_received);
	
	len += sprintf(&buffer[len],"DL Subband CQI: ");
	
	for (i=0; i<25; i++)
	  len += sprintf(&buffer[len],"%2d ",
			 phy_vars_eNB->eNB_UE_stats[UE_id].DL_subband_cqi[0][i]);
	
	len += sprintf(&buffer[len],"\n");
	


        ulsch_errors = 0;

        for (j=0; j<4; j++) {
          ulsch_round_attempts[j]=0;
          ulsch_round_errors[j]=0;
        }

        len += sprintf(&buffer[len],"ULSCH errors/attempts per harq (per round): \n");

        for (i=0; i<8; i++) {
          len += sprintf(&buffer[len],"   harq %d: %d/%d (fer %d) (%d/%d, %d/%d, %d/%d, %d/%d) ",
                         i,
                         phy_vars_eNB->eNB_UE_stats[UE_id].ulsch_errors[i],
                         phy_vars_eNB->eNB_UE_stats[UE_id].ulsch_decoding_attempts[i][0],
                         phy_vars_eNB->eNB_UE_stats[UE_id].ulsch_round_fer[i][0],
                         phy_vars_eNB->eNB_UE_stats[UE_id].ulsch_round_errors[i][0],
                         phy_vars_eNB->eNB_UE_stats[UE_id].ulsch_decoding_attempts[i][0],
                         phy_vars_eNB->eNB_UE_stats[UE_id].ulsch_round_errors[i][1],
                         phy_vars_eNB->eNB_UE_stats[UE_id].ulsch_decoding_attempts[i][1],
                         phy_vars_eNB->eNB_UE_stats[UE_id].ulsch_round_errors[i][2],
                         phy_vars_eNB->eNB_UE_stats[UE_id].ulsch_decoding_attempts[i][2],
                         phy_vars_eNB->eNB_UE_stats[UE_id].ulsch_round_errors[i][3],
                         phy_vars_eNB->eNB_UE_stats[UE_id].ulsch_decoding_attempts[i][3]);
	  if ((i&1) == 1)
	    len += sprintf(&buffer[len],"\n");
	    
          ulsch_errors+=phy_vars_eNB->eNB_UE_stats[UE_id].ulsch_errors[i];

          for (j=0; j<4; j++) {
            ulsch_round_attempts[j]+=phy_vars_eNB->eNB_UE_stats[UE_id].ulsch_decoding_attempts[i][j];
            ulsch_round_errors[j]+=phy_vars_eNB->eNB_UE_stats[UE_id].ulsch_round_errors[i][j];
          }
        }

        len += sprintf(&buffer[len],"ULSCH errors/attempts total %d/%d (%d/%d, %d/%d, %d/%d, %d/%d)\n",
                       ulsch_errors,ulsch_round_attempts[0],

                       ulsch_round_errors[0],ulsch_round_attempts[0],
                       ulsch_round_errors[1],ulsch_round_attempts[1],
                       ulsch_round_errors[2],ulsch_round_attempts[2],
                       ulsch_round_errors[3],ulsch_round_attempts[3]);

        dlsch_errors = 0;

        for (j=0; j<4; j++) {
          dlsch_round_attempts[j]=0;
          dlsch_round_errors[j]=0;
        }

        len += sprintf(&buffer[len],"DLSCH errors/attempts per harq (per round): \n");

        for (i=0; i<8; i++) {
          len += sprintf(&buffer[len],"   harq %d: %d/%d (%d/%d/%d, %d/%d/%d, %d/%d/%d, %d/%d/%d) ",
                         i,
                         phy_vars_eNB->eNB_UE_stats[UE_id].dlsch_l2_errors[i],
                         phy_vars_eNB->eNB_UE_stats[UE_id].dlsch_trials[i][0],
                         phy_vars_eNB->eNB_UE_stats[UE_id].dlsch_ACK[i][0],
                         phy_vars_eNB->eNB_UE_stats[UE_id].dlsch_NAK[i][0],
                         phy_vars_eNB->eNB_UE_stats[UE_id].dlsch_trials[i][0],
                         phy_vars_eNB->eNB_UE_stats[UE_id].dlsch_ACK[i][1],
                         phy_vars_eNB->eNB_UE_stats[UE_id].dlsch_NAK[i][1],
                         phy_vars_eNB->eNB_UE_stats[UE_id].dlsch_trials[i][1],
                         phy_vars_eNB->eNB_UE_stats[UE_id].dlsch_ACK[i][2],
                         phy_vars_eNB->eNB_UE_stats[UE_id].dlsch_NAK[i][2],
                         phy_vars_eNB->eNB_UE_stats[UE_id].dlsch_trials[i][2],
                         phy_vars_eNB->eNB_UE_stats[UE_id].dlsch_ACK[i][3],
                         phy_vars_eNB->eNB_UE_stats[UE_id].dlsch_NAK[i][3],
                         phy_vars_eNB->eNB_UE_stats[UE_id].dlsch_trials[i][3]);
	  if ((i&1) == 1)
	    len += sprintf(&buffer[len],"\n");


          dlsch_errors+=phy_vars_eNB->eNB_UE_stats[UE_id].dlsch_l2_errors[i];

          for (j=0; j<4; j++) {
            dlsch_round_attempts[j]+=phy_vars_eNB->eNB_UE_stats[UE_id].dlsch_trials[i][j];
            dlsch_round_errors[j]+=phy_vars_eNB->eNB_UE_stats[UE_id].dlsch_NAK[i][j];
          }
        }

        len += sprintf(&buffer[len],"DLSCH errors/attempts total %d/%d (%d/%d, %d/%d, %d/%d, %d/%d): \n",
                       dlsch_errors,dlsch_round_attempts[0],
                       dlsch_round_errors[0],dlsch_round_attempts[0],
                       dlsch_round_errors[1],dlsch_round_attempts[1],
                       dlsch_round_errors[2],dlsch_round_attempts[2],
                       dlsch_round_errors[3],dlsch_round_attempts[3]);


        len += sprintf(&buffer[len],"DLSCH total bits from MAC: %dkbit ",(phy_vars_eNB->eNB_UE_stats[UE_id].total_TBS_MAC)/1000);
        len += sprintf(&buffer[len],"DLSCH total bits ack'ed: %dkbit ",(phy_vars_eNB->eNB_UE_stats[UE_id].total_TBS)/1000);
        len += sprintf(&buffer[len],"DLSCH Average throughput (100 frames): %dkbps\n",(phy_vars_eNB->eNB_UE_stats[UE_id].dlsch_bitrate/1000));
	//        len += sprintf(&buffer[len],"[eNB PROC] Transmission Mode %d\n",phy_vars_eNB->transmission_mode[UE_id]);
	/*
        if(phy_vars_eNB->transmission_mode[UE_id] == 5) {
          if(phy_vars_eNB->mu_mimo_mode[UE_id].dl_pow_off == 0)
            len += sprintf(&buffer[len],"[eNB PROC] ****UE %d is in MU-MIMO mode****\n",UE_id);
          else if(phy_vars_eNB->mu_mimo_mode[UE_id].dl_pow_off == 1)
            len += sprintf(&buffer[len],"[eNB PROC] ****UE %d is in SU-MIMO mode****\n",UE_id);
          else
            len += sprintf(&buffer[len],"[eNB PROC] ****UE %d is not scheduled****\n",UE_id);
        }
	*/
	/*
        len += sprintf(&buffer[len],"[eNB PROC] RB Allocation on Sub-bands: ");

        //  for (j=0;j< mac_xface->lte_frame_parms->N_RBGS;j++)
        for (j=0; j<7; j++)
          len += sprintf(&buffer[len],"%d ",
                         phy_vars_eNB->mu_mimo_mode[UE_id].rballoc_sub[j]);

        len += sprintf(&buffer[len],"\n");
        len += sprintf(&buffer[len],"[eNB PROC] Total Number of Allocated PRBs = %d\n",phy_vars_eNB->mu_mimo_mode[UE_id].pre_nb_available_rbs);
	*/
      }
    }

    len += sprintf(&buffer[len],"\n");
  }
  
  len += sprintf(&buffer[len],"EOF\n");
  
  return len;
}