phy_procedures_lte_ue.c 203 KB
Newer Older
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20
/*
 * Licensed to the OpenAirInterface (OAI) Software Alliance under one or more
 * contributor license agreements.  See the NOTICE file distributed with
 * this work for additional information regarding copyright ownership.
 * The OpenAirInterface Software Alliance licenses this file to You under
 * the OAI Public License, Version 1.0  (the "License"); you may not use this file
 * except in compliance with the License.
 * You may obtain a copy of the License at
 *
 *      http://www.openairinterface.org/?page_id=698
 *
 * Unless required by applicable law or agreed to in writing, software
 * distributed under the License is distributed on an "AS IS" BASIS,
 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
 * See the License for the specific language governing permissions and
 * limitations under the License.
 *-------------------------------------------------------------------------------
 * For more information about the OpenAirInterface (OAI) Software Alliance:
 *      contact@openairinterface.org
 */
21 22 23

/*! \file phy_procedures_lte_ue.c
 * \brief Implementation of UE procedures from 36.213 LTE specifications
24
 * \author R. Knopp, F. Kaltenberger, N. Nikaein
25 26 27
 * \date 2011
 * \version 0.1
 * \company Eurecom
28
 * \email: knopp@eurecom.fr,florian.kaltenberger@eurecom.fr, navid.nikaein@eurecom.fr
29 30 31 32
 * \note
 * \warning
 */

33 34
#define _GNU_SOURCE

35
#include "assertions.h"
36 37 38 39 40
#include "defs.h"
#include "PHY/defs.h"
#include "PHY/extern.h"
#include "SCHED/defs.h"
#include "SCHED/extern.h"
41 42
#include <sched.h>
#include "targets/RT/USER/lte-softmodem.h"
43

Florian Kaltenberger's avatar
Florian Kaltenberger committed
44
#define DEBUG_PHY_PROC
45 46 47 48 49 50 51 52 53 54 55 56 57 58

#ifndef PUCCH
#define PUCCH
#endif

#include "LAYER2/MAC/extern.h"
#include "LAYER2/MAC/defs.h"
#include "UTIL/LOG/log.h"

#ifdef EMOS
fifo_dump_emos_UE emos_dump_UE;
#endif

#include "UTIL/LOG/vcd_signal_dumper.h"
59
#include "UTIL/OPT/opt.h"
60

61 62 63 64
#if defined(ENABLE_ITTI)
# include "intertask_interface.h"
#endif

65 66 67
#include "PHY/defs.h"

#include "PHY/CODING/extern.h"
68

69 70
#include "T.h"

71 72 73 74 75
#define DLSCH_RB_ALLOC 0x1fbf  // skip DC RB (total 23/25 RBs)
#define DLSCH_RB_ALLOC_12 0x0aaa  // skip DC RB (total 23/25 RBs)

#define NS_PER_SLOT 500000

hbilel's avatar
hbilel committed
76
extern double cpuf;
77 78 79



kaltenbe's avatar
kaltenbe committed
80
#if defined(EXMIMO) || defined(OAI_USRP) || defined(OAI_BLADERF) || defined(OAI_LMSSDR)
81
extern uint32_t downlink_frequency[MAX_NUM_CCs][4];
82 83
#endif

84

85

86
void dump_dlsch(PHY_VARS_UE *ue,UE_rxtx_proc_t *proc,uint8_t eNB_id,uint8_t subframe,uint8_t harq_pid)
87
{
88
  unsigned int coded_bits_per_codeword;
89 90 91
  uint8_t nsymb = (ue->frame_parms.Ncp == 0) ? 14 : 12;

  coded_bits_per_codeword = get_G(&ue->frame_parms,
92 93 94 95
                                  ue->dlsch[ue->current_thread_id[subframe]][eNB_id][0]->harq_processes[harq_pid]->nb_rb,
                                  ue->dlsch[ue->current_thread_id[subframe]][eNB_id][0]->harq_processes[harq_pid]->rb_alloc_even,
                                  ue->dlsch[ue->current_thread_id[subframe]][eNB_id][0]->harq_processes[harq_pid]->Qm,
                                  ue->dlsch[ue->current_thread_id[subframe]][eNB_id][0]->harq_processes[harq_pid]->Nl,
96
                                  ue->pdcch_vars[0%RX_NB_TH][eNB_id]->num_pdcch_symbols,
97
                                  proc->frame_rx,
98 99
          subframe,
          ue->transmission_mode[eNB_id]<7?0:ue->transmission_mode[eNB_id]);
100

101 102 103
  write_output("rxsigF0.m","rxsF0", ue->common_vars.common_vars_rx_data_per_thread[ue->current_thread_id[subframe]].rxdataF[0],2*nsymb*ue->frame_parms.ofdm_symbol_size,2,1);
  write_output("rxsigF0_ext.m","rxsF0_ext", ue->pdsch_vars[ue->current_thread_id[subframe]][0]->rxdataF_ext[0],2*nsymb*ue->frame_parms.ofdm_symbol_size,1,1);
  write_output("dlsch00_ch0_ext.m","dl00_ch0_ext", ue->pdsch_vars[ue->current_thread_id[subframe]][0]->dl_ch_estimates_ext[0],300*nsymb,1,1);
104
  /*
105 106 107 108
    write_output("dlsch01_ch0_ext.m","dl01_ch0_ext",pdsch_vars[0]->dl_ch_estimates_ext[1],300*12,1,1);
    write_output("dlsch10_ch0_ext.m","dl10_ch0_ext",pdsch_vars[0]->dl_ch_estimates_ext[2],300*12,1,1);
    write_output("dlsch11_ch0_ext.m","dl11_ch0_ext",pdsch_vars[0]->dl_ch_estimates_ext[3],300*12,1,1);
    write_output("dlsch_rho.m","dl_rho",pdsch_vars[0]->rho[0],300*12,1,1);
109
  */
110 111
  write_output("dlsch_rxF_comp0.m","dlsch0_rxF_comp0", ue->pdsch_vars[ue->current_thread_id[subframe]][0]->rxdataF_comp0[0],300*12,1,1);
  write_output("dlsch_rxF_llr.m","dlsch_llr", ue->pdsch_vars[ue->current_thread_id[subframe]][0]->llr[0],coded_bits_per_codeword,1,0);
112

113 114
  write_output("dlsch_mag1.m","dlschmag1",ue->pdsch_vars[ue->current_thread_id[subframe]][0]->dl_ch_mag0,300*12,1,1);
  write_output("dlsch_mag2.m","dlschmag2",ue->pdsch_vars[ue->current_thread_id[subframe]][0]->dl_ch_magb0,300*12,1,1);
115 116
}

117
void dump_dlsch_SI(PHY_VARS_UE *ue,UE_rxtx_proc_t *proc,uint8_t eNB_id,uint8_t subframe)
118
{
119
  unsigned int coded_bits_per_codeword;
120
  uint8_t nsymb = ((ue->frame_parms.Ncp == 0) ? 14 : 12);
121

122 123 124
  coded_bits_per_codeword = get_G(&ue->frame_parms,
                                  ue->dlsch_SI[eNB_id]->harq_processes[0]->nb_rb,
                                  ue->dlsch_SI[eNB_id]->harq_processes[0]->rb_alloc_even,
125
                                  2,
126
                                  1,
127
                                  ue->pdcch_vars[0%RX_NB_TH][eNB_id]->num_pdcch_symbols,
128
                                  proc->frame_rx,
129 130
          subframe,
          0);
131
  LOG_D(PHY,"[UE %d] Dumping dlsch_SI : ofdm_symbol_size %d, nsymb %d, nb_rb %d, mcs %d, nb_rb %d, num_pdcch_symbols %d,G %d\n",
132
        ue->Mod_id,
133 134
  ue->frame_parms.ofdm_symbol_size,
  nsymb,
135 136 137
        ue->dlsch_SI[eNB_id]->harq_processes[0]->nb_rb,
        ue->dlsch_SI[eNB_id]->harq_processes[0]->mcs,
        ue->dlsch_SI[eNB_id]->harq_processes[0]->nb_rb,
138
        ue->pdcch_vars[0%RX_NB_TH][eNB_id]->num_pdcch_symbols,
139
        coded_bits_per_codeword);
140

141
  write_output("rxsig0.m","rxs0", &ue->common_vars.rxdata[0][subframe*ue->frame_parms.samples_per_tti],ue->frame_parms.samples_per_tti,1,1);
142

143
  write_output("rxsigF0.m","rxsF0", ue->common_vars.common_vars_rx_data_per_thread[ue->current_thread_id[subframe]].rxdataF[0],nsymb*ue->frame_parms.ofdm_symbol_size,1,1);
144 145
  write_output("rxsigF0_ext.m","rxsF0_ext", ue->pdsch_vars_SI[0]->rxdataF_ext[0],2*nsymb*ue->frame_parms.ofdm_symbol_size,1,1);
  write_output("dlsch00_ch0_ext.m","dl00_ch0_ext", ue->pdsch_vars_SI[0]->dl_ch_estimates_ext[0],ue->frame_parms.N_RB_DL*12*nsymb,1,1);
146
  /*
147 148 149 150
    write_output("dlsch01_ch0_ext.m","dl01_ch0_ext",pdsch_vars[0]->dl_ch_estimates_ext[1],300*12,1,1);
    write_output("dlsch10_ch0_ext.m","dl10_ch0_ext",pdsch_vars[0]->dl_ch_estimates_ext[2],300*12,1,1);
    write_output("dlsch11_ch0_ext.m","dl11_ch0_ext",pdsch_vars[0]->dl_ch_estimates_ext[3],300*12,1,1);
    write_output("dlsch_rho.m","dl_rho",pdsch_vars[0]->rho[0],300*12,1,1);
151
  */
152 153
  write_output("dlsch_rxF_comp0.m","dlsch0_rxF_comp0", ue->pdsch_vars_SI[0]->rxdataF_comp0[0],ue->frame_parms.N_RB_DL*12*nsymb,1,1);
  write_output("dlsch_rxF_llr.m","dlsch_llr", ue->pdsch_vars_SI[0]->llr[0],coded_bits_per_codeword,1,0);
154

155 156
  write_output("dlsch_mag1.m","dlschmag1",ue->pdsch_vars_SI[0]->dl_ch_mag0,300*nsymb,1,1);
  write_output("dlsch_mag2.m","dlschmag2",ue->pdsch_vars_SI[0]->dl_ch_magb0,300*nsymb,1,1);
157
  sleep(1);
158 159 160
  exit(-1);
}

kaltenbe's avatar
kaltenbe committed
161
#if defined(EXMIMO) || defined(OAI_USRP) || defined(OAI_BLADERF) || defined(OAI_LMSSDR)
Raymond Knopp's avatar
 
Raymond Knopp committed
162 163
//unsigned int gain_table[31] = {100,112,126,141,158,178,200,224,251,282,316,359,398,447,501,562,631,708,794,891,1000,1122,1258,1412,1585,1778,1995,2239,2512,2818,3162};
/*
164 165
  unsigned int get_tx_amp_prach(int power_dBm, int power_max_dBm, int N_RB_UL)
  {
166

167
  int gain_dB = power_dBm - power_max_dBm;
Raymond Knopp's avatar
 
Raymond Knopp committed
168 169 170 171
  int amp_x_100;

  switch (N_RB_UL) {
  case 6:
172 173
  amp_x_100 = AMP;      // PRACH is 6 PRBS so no scale
  break;
Raymond Knopp's avatar
 
Raymond Knopp committed
174
  case 15:
175 176
  amp_x_100 = 158*AMP;  // 158 = 100*sqrt(15/6)
  break;
Raymond Knopp's avatar
 
Raymond Knopp committed
177
  case 25:
178 179
  amp_x_100 = 204*AMP;  // 204 = 100*sqrt(25/6)
  break;
Raymond Knopp's avatar
 
Raymond Knopp committed
180
  case 50:
181 182
  amp_x_100 = 286*AMP;  // 286 = 100*sqrt(50/6)
  break;
Raymond Knopp's avatar
 
Raymond Knopp committed
183
  case 75:
184 185
  amp_x_100 = 354*AMP;  // 354 = 100*sqrt(75/6)
  break;
Raymond Knopp's avatar
 
Raymond Knopp committed
186
  case 100:
187 188
  amp_x_100 = 408*AMP;  // 408 = 100*sqrt(100/6)
  break;
Raymond Knopp's avatar
 
Raymond Knopp committed
189
  default:
190 191 192
  LOG_E(PHY,"Unknown PRB size %d\n",N_RB_UL);
  mac_xface->macphy_exit("");
  break;
Raymond Knopp's avatar
 
Raymond Knopp committed
193
  }
194
  if (gain_dB < -30) {
195
  return(amp_x_100/3162);
196
  } else if (gain_dB>0)
197
  return(amp_x_100);
198
  else
199 200
  return(amp_x_100/gain_table[-gain_dB]);  // 245 corresponds to the factor sqrt(25/6)
  }
Raymond Knopp's avatar
 
Raymond Knopp committed
201 202 203 204 205 206 207 208 209
*/

unsigned int get_tx_amp(int power_dBm, int power_max_dBm, int N_RB_UL, int nb_rb)
{

  int gain_dB = power_dBm - power_max_dBm;
  double gain_lin;

  gain_lin = pow(10,.1*gain_dB);
210 211
  AssertFatal((nb_rb >0) && (nb_rb <= N_RB_UL),"Illegal nb_rb/N_RB_UL combination (%d/%d)\n",nb_rb,N_RB_UL);
  return((int)(AMP*sqrt(gain_lin*N_RB_UL/(double)nb_rb)));
Raymond Knopp's avatar
 
Raymond Knopp committed
212 213
}

214 215
#endif

216
void dump_dlsch_ra(PHY_VARS_UE *ue,UE_rxtx_proc_t *proc,uint8_t eNB_id,uint8_t subframe)
217
{
218
  unsigned int coded_bits_per_codeword;
219
  uint8_t nsymb = ((ue->frame_parms.Ncp == 0) ? 14 : 12);
220

221 222 223
  coded_bits_per_codeword = get_G(&ue->frame_parms,
                                  ue->dlsch_ra[eNB_id]->harq_processes[0]->nb_rb,
                                  ue->dlsch_ra[eNB_id]->harq_processes[0]->rb_alloc_even,
224
                                  2,
225
                                  1,
226
                                  ue->pdcch_vars[0%RX_NB_TH][eNB_id]->num_pdcch_symbols,
227
                                  proc->frame_rx,
228 229
          subframe,
          0);
230
  LOG_D(PHY,"[UE %d] Dumping dlsch_ra : nb_rb %d, mcs %d, nb_rb %d, num_pdcch_symbols %d,G %d\n",
231 232 233 234
        ue->Mod_id,
        ue->dlsch_ra[eNB_id]->harq_processes[0]->nb_rb,
        ue->dlsch_ra[eNB_id]->harq_processes[0]->mcs,
        ue->dlsch_ra[eNB_id]->harq_processes[0]->nb_rb,
235
        ue->pdcch_vars[0%RX_NB_TH][eNB_id]->num_pdcch_symbols,
236
        coded_bits_per_codeword);
237

238
  write_output("rxsigF0.m","rxsF0", ue->common_vars.common_vars_rx_data_per_thread[ue->current_thread_id[subframe]].rxdataF[0],2*12*ue->frame_parms.ofdm_symbol_size,2,1);
239 240
  write_output("rxsigF0_ext.m","rxsF0_ext", ue->pdsch_vars_ra[0]->rxdataF_ext[0],2*12*ue->frame_parms.ofdm_symbol_size,1,1);
  write_output("dlsch00_ch0_ext.m","dl00_ch0_ext", ue->pdsch_vars_ra[0]->dl_ch_estimates_ext[0],300*nsymb,1,1);
241
  /*
242 243 244 245
    write_output("dlsch01_ch0_ext.m","dl01_ch0_ext",pdsch_vars[0]->dl_ch_estimates_ext[1],300*12,1,1);
    write_output("dlsch10_ch0_ext.m","dl10_ch0_ext",pdsch_vars[0]->dl_ch_estimates_ext[2],300*12,1,1);
    write_output("dlsch11_ch0_ext.m","dl11_ch0_ext",pdsch_vars[0]->dl_ch_estimates_ext[3],300*12,1,1);
    write_output("dlsch_rho.m","dl_rho",pdsch_vars[0]->rho[0],300*12,1,1);
246
  */
247 248
  write_output("dlsch_rxF_comp0.m","dlsch0_rxF_comp0", ue->pdsch_vars_ra[0]->rxdataF_comp0[0],300*nsymb,1,1);
  write_output("dlsch_rxF_llr.m","dlsch_llr", ue->pdsch_vars_ra[0]->llr[0],coded_bits_per_codeword,1,0);
249

250 251
  write_output("dlsch_mag1.m","dlschmag1",ue->pdsch_vars_ra[0]->dl_ch_mag0,300*nsymb,1,1);
  write_output("dlsch_mag2.m","dlschmag2",ue->pdsch_vars_ra[0]->dl_ch_magb0,300*nsymb,1,1);
252
}
253

254 255
void phy_reset_ue(uint8_t Mod_id,uint8_t CC_id,uint8_t eNB_index)
{
256 257 258

  // This flushes ALL DLSCH and ULSCH harq buffers of ALL connected eNBs...add the eNB_index later
  // for more flexibility
259

260
  uint8_t i,j,k,s;
261
  PHY_VARS_UE *ue = PHY_vars_UE_g[Mod_id][CC_id];
262

hbilel's avatar
hbilel committed
263
  //[NUMBER_OF_RX_THREAD=2][NUMBER_OF_CONNECTED_eNB_MAX][2];
264
  for(int l=0; l<RX_NB_TH; l++) {
hbilel's avatar
hbilel committed
265 266 267 268 269 270 271 272 273 274 275 276 277 278 279
      for(i=0; i<NUMBER_OF_CONNECTED_eNB_MAX; i++) {
          for(j=0; j<2; j++) {
              //DL HARQ
              if(ue->dlsch[l][i][j]) {
                  for(k=0; k<NUMBER_OF_HARQ_PID_MAX && ue->dlsch[l][i][j]->harq_processes[k]; k++) {
                      ue->dlsch[l][i][j]->harq_processes[k]->status = SCH_IDLE;
                      for (s=0; s<10; s++) {
                          // reset ACK/NACK bit to DTX for all subframes s = 0..9
                          ue->dlsch[l][i][j]->harq_ack[s].ack = 2;
                          ue->dlsch[l][i][j]->harq_ack[s].send_harq_status = 0;
                          ue->dlsch[l][i][j]->harq_ack[s].vDAI_UL = 0xff;
                          ue->dlsch[l][i][j]->harq_ack[s].vDAI_DL = 0xff;
                      }
                  }
              }
280
          }
281

hbilel's avatar
hbilel committed
282 283 284 285 286 287
          //UL HARQ
          if(ue->ulsch[i]) {
              for(k=0; k<NUMBER_OF_HARQ_PID_MAX && ue->ulsch[i]->harq_processes[k]; k++) {
                  ue->ulsch[i]->harq_processes[k]->status = SCH_IDLE;
                  //Set NDIs for all UL HARQs to 0
                  //  ue->ulsch[i]->harq_processes[k]->Ndi = 0;
288

hbilel's avatar
hbilel committed
289 290
              }
          }
291

hbilel's avatar
hbilel committed
292 293
          // flush Msg3 buffer
          ue->ulsch_Msg3_active[i] = 0;
294

hbilel's avatar
hbilel committed
295
      }
296 297 298
  }
}

299 300
void ra_failed(uint8_t Mod_id,uint8_t CC_id,uint8_t eNB_index)
{
301 302

  // if contention resolution fails, go back to PRACH
Raymond Knopp's avatar
 
Raymond Knopp committed
303
  PHY_vars_UE_g[Mod_id][CC_id]->UE_mode[eNB_index] = PRACH;
hbilel's avatar
hbilel committed
304 305 306 307
  PHY_vars_UE_g[Mod_id][CC_id]->pdcch_vars[0][eNB_index]->crnti_is_temporary = 0;
  PHY_vars_UE_g[Mod_id][CC_id]->pdcch_vars[0][eNB_index]->crnti = 0;
  PHY_vars_UE_g[Mod_id][CC_id]->pdcch_vars[1][eNB_index]->crnti_is_temporary = 0;
  PHY_vars_UE_g[Mod_id][CC_id]->pdcch_vars[1][eNB_index]->crnti = 0;
308
  LOG_E(PHY,"[UE %d] Random-access procedure fails, going back to PRACH, setting SIStatus = 0, discard temporary C-RNTI and State RRC_IDLE\n",Mod_id);
309 310
}

311 312
void ra_succeeded(uint8_t Mod_id,uint8_t CC_id,uint8_t eNB_index)
{
313 314 315

  int i;

316
  LOG_I(PHY,"[UE %d][RAPROC] Random-access procedure succeeded. Set C-RNTI = Temporary C-RNTI\n",Mod_id);
317

hbilel's avatar
hbilel committed
318 319
  PHY_vars_UE_g[Mod_id][CC_id]->pdcch_vars[0][eNB_index]->crnti_is_temporary = 0;
  PHY_vars_UE_g[Mod_id][CC_id]->pdcch_vars[1][eNB_index]->crnti_is_temporary = 0;
320
  PHY_vars_UE_g[Mod_id][CC_id]->ulsch_Msg3_active[eNB_index] = 0;
Raymond Knopp's avatar
 
Raymond Knopp committed
321
  PHY_vars_UE_g[Mod_id][CC_id]->UE_mode[eNB_index] = PUSCH;
322

323
  for (i=0; i<8; i++) {
324
    if (PHY_vars_UE_g[Mod_id][CC_id]->ulsch[eNB_index]->harq_processes[i]) {
325
      PHY_vars_UE_g[Mod_id][CC_id]->ulsch[eNB_index]->harq_processes[i]->status=SCH_IDLE;
hbilel's avatar
hbilel committed
326 327
      PHY_vars_UE_g[Mod_id][CC_id]->dlsch[0][eNB_index][0]->harq_processes[i]->round=0;
      PHY_vars_UE_g[Mod_id][CC_id]->dlsch[1][eNB_index][0]->harq_processes[i]->round=0;
328
      PHY_vars_UE_g[Mod_id][CC_id]->ulsch[eNB_index]->harq_processes[i]->subframe_scheduling_flag=0;
329
    }
330 331 332 333 334
  }


}

335 336
UE_MODE_t get_ue_mode(uint8_t Mod_id,uint8_t CC_id,uint8_t eNB_index)
{
337

Raymond Knopp's avatar
 
Raymond Knopp committed
338
  return(PHY_vars_UE_g[Mod_id][CC_id]->UE_mode[eNB_index]);
339 340

}
341
void process_timing_advance_rar(PHY_VARS_UE *ue,UE_rxtx_proc_t *proc,uint16_t timing_advance) {
342

343
  ue->timing_advance = timing_advance*4;
344 345


346
#ifdef DEBUG_PHY_PROC
Cedric Roux's avatar
Cedric Roux committed
347 348 349
  /* TODO: fix this log, what is 'HW timing advance'? */
  /*LOG_I(PHY,"[UE %d] AbsoluteSubFrame %d.%d, received (rar) timing_advance %d, HW timing advance %d\n",ue->Mod_id,proc->frame_rx, proc->subframe_rx, ue->timing_advance);*/
  LOG_I(PHY,"[UE %d] AbsoluteSubFrame %d.%d, received (rar) timing_advance %d\n",ue->Mod_id,proc->frame_rx, proc->subframe_rx, ue->timing_advance);
350 351 352 353
#endif

}

354 355
void process_timing_advance(uint8_t Mod_id,uint8_t CC_id,int16_t timing_advance)
{
356

357
  //  uint32_t frame = PHY_vars_UE_g[Mod_id]->frame;
358

359
  // timing advance has Q1.5 format
360
  timing_advance = timing_advance - 31;
361

362 363
  PHY_vars_UE_g[Mod_id][CC_id]->timing_advance = PHY_vars_UE_g[Mod_id][CC_id]->timing_advance+timing_advance*4; //this is for 25RB only!!!

364

365
  LOG_D(PHY,"[UE %d] Got timing advance %d from MAC, new value %d\n",Mod_id, timing_advance, PHY_vars_UE_g[Mod_id][CC_id]->timing_advance);
366

367 368 369

}

370
uint8_t is_SR_TXOp(PHY_VARS_UE *ue,UE_rxtx_proc_t *proc,uint8_t eNB_id)
371 372
{

373 374
  int subframe=proc->subframe_tx;

375
  LOG_D(PHY,"[UE %d][SR %x] Frame %d subframe %d Checking for SR TXOp (sr_ConfigIndex %d)\n",
376
        ue->Mod_id,ue->pdcch_vars[ue->current_thread_id[proc->subframe_rx]][eNB_id]->crnti,proc->frame_tx,subframe,
377
        ue->scheduling_request_config[eNB_id].sr_ConfigIndex);
378

379 380
  if (ue->scheduling_request_config[eNB_id].sr_ConfigIndex <= 4) {        // 5 ms SR period
    if ((subframe%5) == ue->scheduling_request_config[eNB_id].sr_ConfigIndex)
381
      return(1);
382 383
  } else if (ue->scheduling_request_config[eNB_id].sr_ConfigIndex <= 14) { // 10 ms SR period
    if (subframe==(ue->scheduling_request_config[eNB_id].sr_ConfigIndex-5))
384
      return(1);
385
  } else if (ue->scheduling_request_config[eNB_id].sr_ConfigIndex <= 34) { // 20 ms SR period
386
    if ((10*(proc->frame_tx&1)+subframe) == (ue->scheduling_request_config[eNB_id].sr_ConfigIndex-15))
387
      return(1);
388
  } else if (ue->scheduling_request_config[eNB_id].sr_ConfigIndex <= 74) { // 40 ms SR period
389
    if ((10*(proc->frame_tx&3)+subframe) == (ue->scheduling_request_config[eNB_id].sr_ConfigIndex-35))
390
      return(1);
391
  } else if (ue->scheduling_request_config[eNB_id].sr_ConfigIndex <= 154) { // 80 ms SR period
392
    if ((10*(proc->frame_tx&7)+subframe) == (ue->scheduling_request_config[eNB_id].sr_ConfigIndex-75))
393 394 395 396 397 398
      return(1);
  }

  return(0);
}

399 400 401 402 403 404 405 406 407 408 409
uint8_t is_cqi_TXOp(PHY_VARS_UE *ue,UE_rxtx_proc_t *proc,uint8_t eNB_id)
{
  int subframe = proc->subframe_tx;
  int frame    = proc->frame_tx;
  CQI_REPORTPERIODIC *cqirep = &ue->cqi_report_config[eNB_id].CQI_ReportPeriodic;

  //LOG_I(PHY,"[UE %d][CRNTI %x] AbsSubFrame %d.%d Checking for CQI TXOp (cqi_ConfigIndex %d) isCQIOp %d\n",
  //      ue->Mod_id,ue->pdcch_vars[eNB_id]->crnti,frame,subframe,
  //      cqirep->cqi_PMI_ConfigIndex,
  //      (((10*frame + subframe) % cqirep->Npd) == cqirep->N_OFFSET_CQI));

410 411 412
  if (cqirep->cqi_PMI_ConfigIndex==-1)
    return(0);
  else if (((10*frame + subframe) % cqirep->Npd) == cqirep->N_OFFSET_CQI)
413 414 415 416 417 418 419 420 421 422 423 424 425 426 427 428 429 430
    return(1);
  else
    return(0);
}
uint8_t is_ri_TXOp(PHY_VARS_UE *ue,UE_rxtx_proc_t *proc,uint8_t eNB_id)
{


  int subframe = proc->subframe_tx;
  int frame    = proc->frame_tx;
  CQI_REPORTPERIODIC *cqirep = &ue->cqi_report_config[eNB_id].CQI_ReportPeriodic;
  int log2Mri = cqirep->ri_ConfigIndex/161;
  int N_OFFSET_RI = cqirep->ri_ConfigIndex % 161;

  //LOG_I(PHY,"[UE %d][CRNTI %x] AbsSubFrame %d.%d Checking for RI TXOp (ri_ConfigIndex %d) isRIOp %d\n",
  //      ue->Mod_id,ue->pdcch_vars[eNB_id]->crnti,frame,subframe,
  //      cqirep->ri_ConfigIndex,
  //      (((10*frame + subframe + cqirep->N_OFFSET_CQI - N_OFFSET_RI) % (cqirep->Npd<<log2Mri)) == 0));
431 432 433
  if (cqirep->ri_ConfigIndex==-1)
    return(0);
  else if (((10*frame + subframe + cqirep->N_OFFSET_CQI - N_OFFSET_RI) % (cqirep->Npd<<log2Mri)) == 0)
434 435 436 437 438
    return(1);
  else
    return(0);
}

hbilel's avatar
hbilel committed
439 440 441 442 443 444 445 446
void compute_cqi_ri_resources(PHY_VARS_UE *ue,
                              LTE_UE_ULSCH_t *ulsch,
                              uint8_t eNB_id,
                              uint16_t rnti,
                              uint16_t p_rnti,
                              uint16_t cba_rnti,
                              uint8_t cqi_status,
                              uint8_t ri_status)
hbilel's avatar
hbilel committed
447
{
448 449
    //PHY_MEASUREMENTS *meas = &ue->measurements;
    //uint8_t transmission_mode = ue->transmission_mode[eNB_id];
hbilel's avatar
hbilel committed
450 451


452
    //LOG_I(PHY,"compute_cqi_ri_resources O_RI %d O %d uci format %d \n",ulsch->O_RI,ulsch->O,ulsch->uci_format);
hbilel's avatar
hbilel committed
453
    if (cqi_status == 1 || ri_status == 1)
hbilel's avatar
hbilel committed
454
    {
hbilel's avatar
hbilel committed
455
        ulsch->O = 4;
hbilel's avatar
hbilel committed
456 457 458
    }
}

459
void ue_compute_srs_occasion(PHY_VARS_UE *ue,UE_rxtx_proc_t *proc,uint8_t eNB_id,uint8_t isSubframeSRS)
hbilel's avatar
hbilel committed
460
{
461

462 463 464 465 466 467 468 469
  LTE_DL_FRAME_PARMS *frame_parms = &ue->frame_parms;
  int frame_tx    = proc->frame_tx;
  int subframe_tx = proc->subframe_tx;
  SOUNDINGRS_UL_CONFIG_DEDICATED *pSoundingrs_ul_config_dedicated=&ue->soundingrs_ul_config_dedicated[eNB_id];
  uint16_t srsPeriodicity;
  uint16_t srsOffset;
  uint8_t is_pucch2_subframe = 0;
  uint8_t is_sr_an_subframe  = 0;
hbilel's avatar
hbilel committed
470 471 472

  // check for SRS opportunity
  pSoundingrs_ul_config_dedicated->srsUeSubframe   = 0;
473
  pSoundingrs_ul_config_dedicated->srsCellSubframe = isSubframeSRS;
hbilel's avatar
hbilel committed
474

475
  if (isSubframeSRS) {
476
    LOG_D(PHY," SrsDedicatedSetup: %d \n",pSoundingrs_ul_config_dedicated->srsConfigDedicatedSetup);
fnabet's avatar
fnabet committed
477 478
      if(pSoundingrs_ul_config_dedicated->srsConfigDedicatedSetup)
      {
479 480 481 482 483 484 485 486 487 488 489 490 491 492 493 494 495 496 497 498 499 500 501 502 503 504 505 506 507 508
          compute_srs_pos(frame_parms->frame_type, pSoundingrs_ul_config_dedicated->srs_ConfigIndex, &srsPeriodicity, &srsOffset);

          LOG_D(PHY," srsPeriodicity: %d srsOffset: %d isSubframeSRS %d \n",srsPeriodicity,srsOffset,isSubframeSRS);

          // transmit SRS if the four following constraints are respected:
          // - UE is configured to transmit SRS
          // - SRS are configured in current subframe
          // - UE is configured to send SRS in this subframe

          // 36.213 8.2
          // 1- A UE shall not transmit SRS whenever SRS and PUCCH format 2/2a/2b transmissions happen to coincide in the same subframe
          // 2- A UE shall not transmit SRS whenever SRS transmit
          //    on and PUCCH transmission carrying ACK/NACK and/or
          //    positive SR happen to coincide in the same subframe if the parameter
          //    Simultaneous-AN-and-SRS is FALSE

          // check PUCCH format 2/2a/2b transmissions
          is_pucch2_subframe = is_cqi_TXOp(ue,proc,eNB_id) && (ue->cqi_report_config[eNB_id].CQI_ReportPeriodic.cqi_PMI_ConfigIndex>0);
          is_pucch2_subframe = (is_ri_TXOp(ue,proc,eNB_id) && (ue->cqi_report_config[eNB_id].CQI_ReportPeriodic.ri_ConfigIndex>0)) || is_pucch2_subframe;

          // check ACK/SR transmission
          if(frame_parms->soundingrs_ul_config_common.ackNackSRS_SimultaneousTransmission == FALSE)
          {
              if(is_SR_TXOp(ue,proc,eNB_id))
              {
                  uint32_t SR_payload = 0;
                  if (ue->mac_enabled==1)
                  {
                      int Mod_id = ue->Mod_id;
                      int CC_id = ue->CC_id;
509
                      // Panos: Substitute call to ue_get_SR() with the filled ue_SR_config->SR_payload (0, or 1).
510 511 512 513
                      SR_payload = ue_get_SR(Mod_id,
					     CC_id,
					     frame_tx,
					     eNB_id,
514
					     ue->pdcch_vars[ue->current_thread_id[proc->subframe_rx]][eNB_id]->crnti,
515
					     subframe_tx); // subframe used for meas gap
516 517 518 519 520 521 522 523

                      if (SR_payload > 0)
                          is_sr_an_subframe = 1;
                  }
              }

              uint8_t pucch_ack_payload[2];
              if (get_ack(&ue->frame_parms,
524
                      ue->dlsch[ue->current_thread_id[proc->subframe_rx]][eNB_id][0]->harq_ack,
hbilel's avatar
hbilel committed
525
                      subframe_tx,proc->subframe_rx,pucch_ack_payload,0) > 0)
526 527 528 529 530 531 532 533 534 535 536 537 538 539 540 541 542 543 544 545 546
              {
                  is_sr_an_subframe = 1;
              }
          }

          // check SRS UE opportunity
          if( isSubframeSRS  &&
                  (((10*frame_tx+subframe_tx) % srsPeriodicity) == srsOffset)
          )
          {
              if ((is_pucch2_subframe == 0) && (is_sr_an_subframe == 0))
              {
                  pSoundingrs_ul_config_dedicated->srsUeSubframe = 1;
                  ue->ulsch[eNB_id]->srs_active   = 1;
                  ue->ulsch[eNB_id]->Nsymb_pusch  = 12-(frame_parms->Ncp<<1)- ue->ulsch[eNB_id]->srs_active;
              }
              else
              {
                  LOG_I(PHY,"DROP UE-SRS-TX for this subframe %d.%d: collision with PUCCH2 or SR/AN: PUCCH2-occasion: %d, SR-AN-occasion[simSRS-SR-AN %d]: %d  \n", frame_tx, subframe_tx, is_pucch2_subframe, frame_parms->soundingrs_ul_config_common.ackNackSRS_SimultaneousTransmission, is_sr_an_subframe);
              }
          }
fnabet's avatar
fnabet committed
547
      }
fnabet's avatar
fnabet committed
548
      LOG_D(PHY," srsCellSubframe: %d, srsUeSubframe: %d, Nsymb-pusch: %d \n", pSoundingrs_ul_config_dedicated->srsCellSubframe, pSoundingrs_ul_config_dedicated->srsUeSubframe, ue->ulsch[eNB_id]->Nsymb_pusch);
hbilel's avatar
hbilel committed
549 550 551
  }
}

552

Raymond Knopp's avatar
Raymond Knopp committed
553 554 555 556 557 558 559 560 561 562 563 564
void get_cqipmiri_params(PHY_VARS_UE *ue,uint8_t eNB_id)
{

  CQI_REPORTPERIODIC *cqirep = &ue->cqi_report_config[eNB_id].CQI_ReportPeriodic;
  int cqi_PMI_ConfigIndex = cqirep->cqi_PMI_ConfigIndex;

  if (ue->frame_parms.frame_type == FDD) {
    if (cqi_PMI_ConfigIndex <= 1) {        // 2 ms CQI_PMI period
      cqirep->Npd = 2;
      cqirep->N_OFFSET_CQI = cqi_PMI_ConfigIndex;
    } else if (cqi_PMI_ConfigIndex <= 6) { // 5 ms CQI_PMI period
      cqirep->Npd = 5;
565
      cqirep->N_OFFSET_CQI = cqi_PMI_ConfigIndex-2;
Raymond Knopp's avatar
Raymond Knopp committed
566 567
    } else if (cqi_PMI_ConfigIndex <=16) { // 10ms CQI_PMI period
      cqirep->Npd = 10;
568
      cqirep->N_OFFSET_CQI = cqi_PMI_ConfigIndex-7;
Raymond Knopp's avatar
Raymond Knopp committed
569 570
    } else if (cqi_PMI_ConfigIndex <= 36) { // 20 ms CQI_PMI period
      cqirep->Npd = 20;
571
      cqirep->N_OFFSET_CQI = cqi_PMI_ConfigIndex-17;
Raymond Knopp's avatar
Raymond Knopp committed
572 573
    } else if (cqi_PMI_ConfigIndex <= 76) { // 40 ms CQI_PMI period
      cqirep->Npd = 40;
574
      cqirep->N_OFFSET_CQI = cqi_PMI_ConfigIndex-37;
Raymond Knopp's avatar
Raymond Knopp committed
575 576
    } else if (cqi_PMI_ConfigIndex <= 156) { // 80 ms CQI_PMI period
      cqirep->Npd = 80;
577
      cqirep->N_OFFSET_CQI = cqi_PMI_ConfigIndex-77;
Raymond Knopp's avatar
Raymond Knopp committed
578 579
    } else if (cqi_PMI_ConfigIndex <= 316) { // 160 ms CQI_PMI period
      cqirep->Npd = 160;
580
      cqirep->N_OFFSET_CQI = cqi_PMI_ConfigIndex-157;
Raymond Knopp's avatar
Raymond Knopp committed
581 582
    }
    else if (cqi_PMI_ConfigIndex > 317) {
583

Raymond Knopp's avatar
Raymond Knopp committed
584
      if (cqi_PMI_ConfigIndex <= 349) { // 32 ms CQI_PMI period
585
  cqirep->Npd = 32;
586
      cqirep->N_OFFSET_CQI = cqi_PMI_ConfigIndex-318;
Raymond Knopp's avatar
Raymond Knopp committed
587 588
      }
      else if (cqi_PMI_ConfigIndex <= 413) { // 64 ms CQI_PMI period
589 590
  cqirep->Npd = 64;
  cqirep->N_OFFSET_CQI = cqi_PMI_ConfigIndex-350;
Raymond Knopp's avatar
Raymond Knopp committed
591 592
      }
      else if (cqi_PMI_ConfigIndex <= 541) { // 128 ms CQI_PMI period
593 594 595
  cqirep->Npd = 128;
  cqirep->N_OFFSET_CQI = cqi_PMI_ConfigIndex-414;
      }
Raymond Knopp's avatar
Raymond Knopp committed
596 597 598 599 600 601 602 603 604 605 606 607 608 609 610 611 612 613 614 615 616 617 618 619 620 621 622 623
    }
  }
  else { // TDD
   if (cqi_PMI_ConfigIndex == 0) {        // all UL subframes
     cqirep->Npd = 1;
     cqirep->N_OFFSET_CQI = 0;
   } else if (cqi_PMI_ConfigIndex <= 6) { // 5 ms CQI_PMI period
     cqirep->Npd = 5;
     cqirep->N_OFFSET_CQI = cqi_PMI_ConfigIndex-1;
   } else if (cqi_PMI_ConfigIndex <=16) { // 10ms CQI_PMI period
     cqirep->Npd = 10;
     cqirep->N_OFFSET_CQI = cqi_PMI_ConfigIndex-6;
   } else if (cqi_PMI_ConfigIndex <= 36) { // 20 ms CQI_PMI period
     cqirep->Npd = 20;
     cqirep->N_OFFSET_CQI = cqi_PMI_ConfigIndex-16;
   } else if (cqi_PMI_ConfigIndex <= 76) { // 40 ms CQI_PMI period
     cqirep->Npd = 40;
     cqirep->N_OFFSET_CQI = cqi_PMI_ConfigIndex-36;
   } else if (cqi_PMI_ConfigIndex <= 156) { // 80 ms CQI_PMI period
     cqirep->Npd = 80;
     cqirep->N_OFFSET_CQI = cqi_PMI_ConfigIndex-76;
   } else if (cqi_PMI_ConfigIndex <= 316) { // 160 ms CQI_PMI period
     cqirep->Npd = 160;
     cqirep->N_OFFSET_CQI = cqi_PMI_ConfigIndex-156;
   }
  }
}

624 625 626 627 628
PUCCH_FMT_t get_pucch_format(lte_frame_type_t frame_type,
                             lte_prefix_type_t cyclic_prefix_type,
                             uint8_t SR_payload,
                             uint8_t nb_cw,
                             uint8_t cqi_status,
hbilel's avatar
hbilel committed
629 630
                             uint8_t ri_status,
                             uint8_t bundling_flag)
631 632 633 634 635 636 637
{
  if((cqi_status == 0) && (ri_status==0))
  {
      // PUCCH Format 1 1a 1b
      // 1- SR only ==> PUCCH format 1
      // 2- 1bit Ack/Nack with/without SR  ==> PUCCH format 1a
      // 3- 2bits Ack/Nack with/without SR ==> PUCCH format 1b
hbilel's avatar
hbilel committed
638
      if((nb_cw == 1)&&(bundling_flag==bundling))
639 640 641
      {
          return pucch_format1a;
      }
hbilel's avatar
hbilel committed
642 643 644 645
      if((nb_cw == 1)&&(bundling_flag==multiplexing))
      {
          return pucch_format1b;
      }
646 647 648 649 650 651
      if(nb_cw == 2)
      {
          return pucch_format1b;
      }
      if(SR_payload == 1)
      {
gabrielC's avatar
gabrielC committed
652 653
          return pucch_format1;
          /*
654 655 656 657 658
          if (frame_type == FDD) {
              return pucch_format1;
          } else if (frame_type == TDD) {
              return pucch_format1b;
          } else {
659
              AssertFatal(1==0,"Unknown frame_type");
gabrielC's avatar
gabrielC committed
660
          }*/
661 662 663 664 665 666 667 668 669 670 671 672 673 674 675 676 677 678 679 680 681 682 683 684 685 686 687 688 689
      }
  }
  else
  {
      // PUCCH Format 2 2a 2b
      // 1- CQI only or RI only  ==> PUCCH format 2
      // 2- CQI or RI + 1bit Ack/Nack for normal CP  ==> PUCCH format 2a
      // 3- CQI or RI + 2bits Ack/Nack for normal CP ==> PUCCH format 2b
      // 4- CQI or RI + Ack/Nack for extended CP ==> PUCCH format 2
      if(nb_cw == 0)
      {
          return pucch_format2;
      }
      if(cyclic_prefix_type == NORMAL)
      {
          if(nb_cw == 1)
          {
              return pucch_format2a;
          }
          if(nb_cw == 2)
          {
              return pucch_format2b;
          }
      }
      else
      {
          return pucch_format2;
      }
  }
hbilel's avatar
hbilel committed
690
  return pucch_format1a;
691
}
692
uint16_t get_n1_pucch(PHY_VARS_UE *ue,
693
          UE_rxtx_proc_t *proc,
694
                      harq_status_t *harq_ack,
695 696 697 698
                      uint8_t eNB_id,
                      uint8_t *b,
                      uint8_t SR)
{
699

700
  LTE_DL_FRAME_PARMS *frame_parms=&ue->frame_parms;
701
  uint8_t nCCE0,nCCE1,nCCE2,nCCE3,harq_ack1,harq_ack0,harq_ack3,harq_ack2;
702
  ANFBmode_t bundling_flag;
gabrielC's avatar
gabrielC committed
703
  uint16_t n1_pucch0=0,n1_pucch1=0,n1_pucch2=0,n1_pucch3=0,n1_pucch_inter;
704 705
  static uint8_t candidate_dl[9]; // which downlink(s) the current ACK/NACK is associating to
  uint8_t last_dl=0xff; // the last downlink with valid DL-DCI. for calculating the PUCCH resource index
706 707
  int sf;
  int M;
708
  uint8_t ack_counter=0;
709
  // clear this, important for case where n1_pucch selection is not used
710
  int subframe=proc->subframe_tx;
711

712
  ue->pucch_sel[subframe] = 0;
713 714 715

  if (frame_parms->frame_type == FDD ) { // FDD
    sf = (subframe<4)? subframe+6 : subframe-4;
716
    LOG_D(PHY,"n1_pucch_UE: subframe %d, nCCE %d\n",sf,ue->pdcch_vars[ue->current_thread_id[proc->subframe_rx]][eNB_id]->nCCE[sf]);
717 718

    if (SR == 0)
719
      return(frame_parms->pucch_config_common.n1PUCCH_AN + ue->pdcch_vars[ue->current_thread_id[proc->subframe_rx]][eNB_id]->nCCE[sf]);
720
    else
721
      return(ue->scheduling_request_config[eNB_id].sr_PUCCH_ResourceIndex);
722
  } else {
723

724
    bundling_flag = ue->pucch_config_dedicated[eNB_id].tdd_AckNackFeedbackMode;
725
#ifdef DEBUG_PHY_PROC
726 727

    if (bundling_flag==bundling) {
gabrielC's avatar
gabrielC committed
728
      LOG_D(PHY,"[UE%d] Frame %d subframe %d : get_n1_pucch, bundling, SR %d/%d\n",ue->Mod_id,proc->frame_tx,subframe,SR,
729
            ue->scheduling_request_config[eNB_id].sr_PUCCH_ResourceIndex);
730
    } else {
gabrielC's avatar
gabrielC committed
731
      LOG_D(PHY,"[UE%d] Frame %d subframe %d : get_n1_pucch, multiplexing, SR %d/%d\n",ue->Mod_id,proc->frame_tx,subframe,SR,
732
            ue->scheduling_request_config[eNB_id].sr_PUCCH_ResourceIndex);
733
    }
734

735
#endif
736

737 738 739 740 741
    switch (frame_parms->tdd_config) {
    case 1:  // DL:S:UL:UL:DL:DL:S:UL:UL:DL

      harq_ack0 = 2; // DTX
      M=1;
742

743
      // This is the offset for a particular subframe (2,3,4) => (0,2,4)
744 745 746
      if (subframe == 2) {  // ACK subframes 5,6
        candidate_dl[0] = 6;
        candidate_dl[1] = 5;
747 748
        M=2;
      } else if (subframe == 3) { // ACK subframe 9
749 750 751 752
        candidate_dl[0] = 9;
      } else if (subframe == 7) { // ACK subframes 0,1
        candidate_dl[0] = 1;
        candidate_dl[1] = 0;
753 754
        M=2;
      } else if (subframe == 8) { // ACK subframes 4
755
        candidate_dl[0] = 4;
756
      } else {
757
        LOG_E(PHY,"[UE%d] : Frame %d phy_procedures_lte.c: get_n1pucch, illegal tx-subframe %d for tdd_config %d\n",
758
              ue->Mod_id,proc->frame_tx,subframe,frame_parms->tdd_config);
759
        return(0);
760 761
      }

762 763 764 765 766 767 768 769 770
      // checking which downlink candidate is the last downlink with valid DL-DCI
      int k;
      for (k=0;k<M;k++) {
        if (harq_ack[candidate_dl[k]].send_harq_status>0) {
          last_dl = candidate_dl[k];
          break;
        }
      }
      if (last_dl >= 10) {
771 772
        LOG_E(PHY,"[UE%d] : Frame %d phy_procedures_lte.c: get_n1pucch, illegal rx-subframe %d (tx-subframe %d) for tdd_config %d\n",
              ue->Mod_id,proc->frame_tx,last_dl,subframe,frame_parms->tdd_config);
773 774 775 776 777 778 779
        return (0);
      }

      LOG_D(PHY,"SFN/SF %d/%d calculating n1_pucch0 from last_dl=%d\n",
          proc->frame_tx%1024,
          proc->subframe_tx,
          last_dl);
780 781

      // i=0
782
      nCCE0 = ue->pdcch_vars[ue->current_thread_id[proc->subframe_rx]][eNB_id]->nCCE[last_dl];
783
      n1_pucch0 = get_Np(frame_parms->N_RB_DL,nCCE0,0) + nCCE0+ frame_parms->pucch_config_common.n1PUCCH_AN;
784

785
      harq_ack0 = b[0];
786 787

      if (harq_ack0!=2) {  // DTX
788 789 790 791
        if (frame_parms->frame_type == FDD ) {
          if (SR == 0) {  // last paragraph pg 68 from 36.213 (v8.6), m=0
            b[0]=(M==2) ? 1-harq_ack0 : harq_ack0;
            b[1]=harq_ack0;   // in case we use pucch format 1b (subframes 2,7)
792
          ue->pucch_sel[subframe] = 0;
793 794 795
            return(n1_pucch0);
          } else { // SR and only 0 or 1 ACKs (first 2 entries in Table 7.3-1 of 36.213)
            b[0]=harq_ack0;
796
          return(ue->scheduling_request_config[eNB_id].sr_PUCCH_ResourceIndex);
797 798 799 800 801 802 803 804 805 806 807 808
          }
        } else {
          if (SR == 0) {
            b[0] = harq_ack0;
            b[1] = harq_ack0;
            ue->pucch_sel[subframe] = 0;
            return(n1_pucch0);
          } else {
            b[0] = harq_ack0;
            b[1] = harq_ack0;
            return(ue->scheduling_request_config[eNB_id].sr_PUCCH_ResourceIndex);
          }
809
        }
810 811 812 813
      }


      break;
814

815 816 817 818 819 820 821
    case 3:  // DL:S:UL:UL:UL:DL:DL:DL:DL:DL
      // in this configuration we have M=2 from pg 68 of 36.213 (v8.6)
      // Note: this doesn't allow using subframe 1 for PDSCH transmission!!! (i.e. SF 1 cannot be acked in SF 2)
      // set ACK/NAKs to DTX
      harq_ack1 = 2; // DTX
      harq_ack0 = 2; // DTX
      // This is the offset for a particular subframe (2,3,4) => (0,2,4)
822
      last_dl = (subframe-2)<<1;
823
      // i=0
824
      nCCE0 = ue->pdcch_vars[ue->current_thread_id[proc->subframe_rx]][eNB_id]->nCCE[5+last_dl];
825
      n1_pucch0 = get_Np(frame_parms->N_RB_DL,nCCE0,0) + nCCE0+ frame_parms->pucch_config_common.n1PUCCH_AN;
826
      // i=1
827
      nCCE1 = ue->pdcch_vars[ue->current_thread_id[proc->subframe_rx]][eNB_id]->nCCE[(6+last_dl)%10];
828
      n1_pucch1 = get_Np(frame_parms->N_RB_DL,nCCE1,1) + nCCE1 + frame_parms->pucch_config_common.n1PUCCH_AN;
829 830

      // set ACK/NAK to values if not DTX
831 832
      if (ue->dlsch[ue->current_thread_id[proc->subframe_rx]][eNB_id][0]->harq_ack[(6+last_dl)%10].send_harq_status>0)  // n-6 // subframe 6 is to be ACK/NAKed
        harq_ack1 = ue->dlsch[ue->current_thread_id[proc->subframe_rx]][eNB_id][0]->harq_ack[(6+last_dl)%10].ack;
833

834 835
      if (ue->dlsch[ue->current_thread_id[proc->subframe_rx]][eNB_id][0]->harq_ack[5+last_dl].send_harq_status>0)  // n-6 // subframe 5 is to be ACK/NAKed
        harq_ack0 = ue->dlsch[ue->current_thread_id[proc->subframe_rx]][eNB_id][0]->harq_ack[5+last_dl].ack;
836

837 838 839 840 841
      LOG_D(PHY,"SFN/SF %d/%d calculating n1_pucch cce0=%d n1_pucch0=%d cce1=%d n1_pucch1=%d\n",
                                      proc->frame_tx%1024,
                                      proc->subframe_tx,
                                      nCCE0,n1_pucch0,
                                      nCCE1,n1_pucch1);
842 843

      if (harq_ack1!=2) { // n-6 // subframe 6,8,0 and maybe 5,7,9 is to be ACK/NAKed
844 845 846 847 848 849 850 851 852

        if ((bundling_flag==bundling)&&(SR == 0)) {  // This is for bundling without SR,
          // n1_pucch index takes value of smallest element in set {0,1}
          // i.e. 0 if harq_ack0 is not DTX, otherwise 1
          b[0] = harq_ack1;

          if (harq_ack0!=2)
            b[0]=b[0]&harq_ack0;

853
          ue->pucch_sel[subframe] = 1;
854 855 856 857 858 859 860 861 862 863
          return(n1_pucch1);

        } else if ((bundling_flag==multiplexing)&&(SR==0)) { // Table 10.1
          if (harq_ack0 == 2)
            harq_ack0 = 0;

          b[1] = harq_ack0;
          b[0] = (harq_ack0!=harq_ack1)?0:1;

          if ((harq_ack0 == 1) && (harq_ack1 == 0)) {
864
            ue->pucch_sel[subframe] = 0;
865 866
            return(n1_pucch0);
          } else {
867
            ue->pucch_sel[subframe] = 1;
868 869 870 871 872 873 874 875 876
            return(n1_pucch1);
          }
        } else if (SR==1) { // SR and 0,1,or 2 ACKS, (first 3 entries in Table 7.3-1 of 36.213)
          // this should be number of ACKs (including
          if (harq_ack0 == 2)
            harq_ack0 = 0;

          b[0]= harq_ack1 | harq_ack0;
          b[1]= harq_ack1 ^ harq_ack0;
877
          return(ue->scheduling_request_config[eNB_id].sr_PUCCH_ResourceIndex);
878 879 880 881
        }
      } else if (harq_ack0!=2) { // n-7  // subframe 5,7,9 only is to be ACK/NAKed
        if ((bundling_flag==bundling)&&(SR == 0)) {  // last paragraph pg 68 from 36.213 (v8.6), m=0
          b[0]=harq_ack0;
882
          ue->pucch_sel[subframe] = 0;
883 884 885 886
          return(n1_pucch0);
        } else if ((bundling_flag==multiplexing)&&(SR==0)) { // Table 10.1 with i=1 set to DTX
          b[0] = harq_ack0;
          b[1] = 1-b[0];
887
          ue->pucch_sel[subframe] = 0;
888 889 890 891
          return(n1_pucch0);
        } else if (SR==1) { // SR and only 0 or 1 ACKs (first 2 entries in Table 7.3-1 of 36.213)
          b[0]=harq_ack0;
          b[1]=b[0];
892
          return(ue->scheduling_request_config[eNB_id].sr_PUCCH_ResourceIndex);
893
        }
894
      }
895

896 897
      break;

898 899 900 901 902 903 904 905 906 907 908 909
    case 4:  // DL:S:UL:UL:DL:DL:DL:DL:DL:DL
          // in this configuration we have M=4 from pg 68 of 36.213 (v8.6)
          // Note: this doesn't allow using subframe 1 for PDSCH transmission!!! (i.e. SF 1 cannot be acked in SF 2)
          // set ACK/NAKs to DTX
          harq_ack3 = 2; // DTX
          harq_ack2 = 2; // DTX
          harq_ack1 = 2; // DTX
          harq_ack0 = 2; // DTX
          // This is the offset for a particular subframe (2,3,4) => (0,2,4)
          //last_dl = (subframe-2)<<1;
          if (subframe == 2) {
          // i=0
910 911
          //nCCE0 = ue->pdcch_vars[ue->current_thread_id[proc->subframe_rx]][eNB_id]->nCCE[2+subframe];
          nCCE0 = ue->pdcch_vars[ue->current_thread_id[proc->subframe_rx]][eNB_id]->nCCE[(8+subframe)%10];
912 913
          n1_pucch0 = 2*get_Np(frame_parms->N_RB_DL,nCCE0,0) + nCCE0+ frame_parms->pucch_config_common.n1PUCCH_AN;
          // i=1
914
          nCCE1 = ue->pdcch_vars[ue->current_thread_id[proc->subframe_rx]][eNB_id]->nCCE[2+subframe];
915 916
          n1_pucch1 = get_Np(frame_parms->N_RB_DL,nCCE1,0) + get_Np(frame_parms->N_RB_DL,nCCE1,1) + nCCE1 + frame_parms->pucch_config_common.n1PUCCH_AN;
          // i=2
917
          nCCE2 = ue->pdcch_vars[ue->current_thread_id[proc->subframe_rx]][eNB_id]->nCCE[(8+subframe)%10];
918

919 920
          n1_pucch2 = 2*get_Np(frame_parms->N_RB_DL,nCCE2,1) + nCCE2+ frame_parms->pucch_config_common.n1PUCCH_AN;
          // i=3
921
          //nCCE3 = ue->pdcch_vars[ue->current_thread_id[proc->subframe_rx]][eNB_id]->nCCE[(9+subframe)%10];
922 923 924
          //n1_pucch3 = get_Np(frame_parms->N_RB_DL,nCCE3,1) + nCCE3 + frame_parms->pucch_config_common.n1PUCCH_AN;

          // set ACK/NAK to values if not DTX
925 926
          if (ue->dlsch[ue->current_thread_id[proc->subframe_rx]][eNB_id][0]->harq_ack[(8+subframe)%10].send_harq_status>0)  // n-6 // subframe 6 is to be ACK/NAKed
            harq_ack0 = ue->dlsch[ue->current_thread_id[proc->subframe_rx]][eNB_id][0]->harq_ack[(8+subframe)%10].ack;
927

928 929
          if (ue->dlsch[ue->current_thread_id[proc->subframe_rx]][eNB_id][0]->harq_ack[2+subframe].send_harq_status>0)  // n-6 // subframe 5 is to be ACK/NAKed
            harq_ack1 = ue->dlsch[ue->current_thread_id[proc->subframe_rx]][eNB_id][0]->harq_ack[2+subframe].ack;
930

931 932
          if (ue->dlsch[ue->current_thread_id[proc->subframe_rx]][eNB_id][0]->harq_ack[3+subframe].send_harq_status>0)  // n-6 // subframe 6 is to be ACK/NAKed
            harq_ack2 = ue->dlsch[ue->current_thread_id[proc->subframe_rx]][eNB_id][0]->harq_ack[3+subframe].ack;
933

934 935
          //if (ue->dlsch[ue->current_thread_id[proc->subframe_rx]][eNB_id][0]->harq_ack[(9+subframe)%10].send_harq_status>0)  // n-6 // subframe 5 is to be ACK/NAKed
            //harq_ack3 = ue->dlsch[ue->current_thread_id[proc->subframe_rx]][eNB_id][0]->harq_ack[(9+subframe)%10].ack;
936 937 938 939 940 941 942 943
          //LOG_I(PHY,"SFN/SF %d/%d calculating n1_pucch cce0=%d n1_pucch0=%d cce1=%d n1_pucch1=%d cce2=%d n1_pucch2=%d\n",
          //                      proc->frame_tx%1024,
          //                      proc->subframe_tx,
          //                      nCCE0,n1_pucch0,
          //                      nCCE1,n1_pucch1, nCCE2, n1_pucch2);
          }else if (subframe == 3) {
          // i=0

944
          nCCE0 = ue->pdcch_vars[ue->current_thread_id[proc->subframe_rx]][eNB_id]->nCCE[4+subframe];
945 946
          n1_pucch0 = 3*get_Np(frame_parms->N_RB_DL,nCCE0,0) + nCCE0+ frame_parms->pucch_config_common.n1PUCCH_AN;
          // i=1
947
          nCCE1 = ue->pdcch_vars[ue->current_thread_id[proc->subframe_rx]][eNB_id]->nCCE[5+subframe];
948 949
          n1_pucch1 = 2*get_Np(frame_parms->N_RB_DL,nCCE1,0) + get_Np(frame_parms->N_RB_DL,nCCE1,1) + nCCE1 + frame_parms->pucch_config_common.n1PUCCH_AN;
          // i=2
950
          nCCE2 = ue->pdcch_vars[ue->current_thread_id[proc->subframe_rx]][eNB_id]->nCCE[(6+subframe)];
951 952
          n1_pucch2 = get_Np(frame_parms->N_RB_DL,nCCE2,0) + 2*get_Np(frame_parms->N_RB_DL,nCCE2,1) + nCCE2+ frame_parms->pucch_config_common.n1PUCCH_AN;
          // i=3
953
          nCCE3 = ue->pdcch_vars[ue->current_thread_id[proc->subframe_rx]][eNB_id]->nCCE[(3+subframe)];
954 955 956
          n1_pucch3 = 3*get_Np(frame_parms->N_RB_DL,nCCE3,1) + nCCE3 + frame_parms->pucch_config_common.n1PUCCH_AN;

          // set ACK/NAK to values if not DTX
957 958
          if (ue->dlsch[ue->current_thread_id[proc->subframe_rx]][eNB_id][0]->harq_ack[4+subframe].send_harq_status>0)  // n-6 // subframe 6 is to be ACK/NAKed
          harq_ack0 = ue->dlsch[ue->current_thread_id[proc->subframe_rx]][eNB_id][0]->harq_ack[4+subframe].ack;
959

960 961
          if (ue->dlsch[ue->current_thread_id[proc->subframe_rx]][eNB_id][0]->harq_ack[5+subframe].send_harq_status>0)  // n-6 // subframe 5 is to be ACK/NAKed
          harq_ack1 = ue->dlsch[ue->current_thread_id[proc->subframe_rx]][eNB_id][0]->harq_ack[5+subframe].ack;
962

963 964
          if (ue->dlsch[ue->current_thread_id[proc->subframe_rx]][eNB_id][0]->harq_ack[(6+subframe)].send_harq_status>0)  // n-6 // subframe 6 is to be ACK/NAKed
          harq_ack2 = ue->dlsch[ue->current_thread_id[proc->subframe_rx]][eNB_id][0]->harq_ack[(6+subframe)].ack;
965

966 967
          if (ue->dlsch[ue->current_thread_id[proc->subframe_rx]][eNB_id][0]->harq_ack[(3+subframe)].send_harq_status>0)  // n-6 // subframe 5 is to be ACK/NAKed
          harq_ack3 = ue->dlsch[ue->current_thread_id[proc->subframe_rx]][eNB_id][0]->harq_ack[(3+subframe)].ack;
968 969 970 971 972 973 974 975 976 977
          }

          //LOG_I(PHY,"SFN/SF %d/%d calculating n1_pucch cce0=%d n1_pucch0=%d harq_ack0=%d cce1=%d n1_pucch1=%d harq_ack1=%d cce2=%d n1_pucch2=%d harq_ack2=%d cce3=%d n1_pucch3=%d harq_ack3=%d bundling_flag=%d\n",
          //                                proc->frame_tx%1024,
          //                                proc->subframe_tx,
          //                                nCCE0,n1_pucch0,harq_ack0,
          //                                nCCE1,n1_pucch1,harq_ack1, nCCE2, n1_pucch2, harq_ack2,
          //                                nCCE3, n1_pucch3, harq_ack3, bundling_flag);

          if ((bundling_flag==bundling)&&(SR == 0)) {  // This is for bundling without SR,
978 979 980 981 982 983 984 985
             b[0] = 1;
             ack_counter = 0;

             if ((harq_ack3!=2) ) {
                b[0] = b[0]&harq_ack3;
                n1_pucch_inter = n1_pucch3;
                ack_counter ++;
             }
986
             if ((harq_ack0!=2) ) {
987
                b[0] = b[0]&harq_ack0;
988
                n1_pucch_inter = n1_pucch0;
989
                ack_counter ++;
990 991 992 993
             }
             if ((harq_ack1!=2) ) {
                b[0] = b[0]&harq_ack1;
                n1_pucch_inter = n1_pucch1;
994
                ack_counter ++;
995 996 997 998
             }
             if ((harq_ack2!=2) ) {
                b[0] = b[0]&harq_ack2;
                n1_pucch_inter = n1_pucch2;
999
                ack_counter ++;
1000 1001
             }

1002 1003 1004 1005
             if (ack_counter == 0)
                 b[0] = 0;

             /*if (subframe == 3) {
1006 1007
                n1_pucch_inter = n1_pucch2;
             } else if (subframe == 2) {
1008 1009
                n1_pucch_inter = n1_pucch1;
             }*/
1010

gabrielC's avatar
gabrielC committed
1011
             //LOG_I(PHY,"SFN/SF %d/%d calculating n1_pucch n1_pucch_inter=%d  b[0]=%d b[1]=%d \n",
1012 1013
             //                                           proc->frame_tx%1024,
             //                                           proc->subframe_tx,n1_pucch_inter,
gabrielC's avatar
gabrielC committed
1014
             //                                           b[0],b[1]);
1015 1016 1017 1018 1019

              return(n1_pucch_inter);

            } else if ((bundling_flag==multiplexing)&&(SR==0)) { // Table 10.1

hbilel's avatar
hbilel committed
1020 1021
             if (subframe == 3) {
                 LOG_I(PHY, "sbuframe=%d \n",subframe);
1022 1023
              if ((harq_ack0 == 1) && (harq_ack1 == 1) && (harq_ack2 == 1) && (harq_ack3 == 1)) {
                b[0] = 1;
hbilel's avatar
hbilel committed
1024
                b[1] = 1;
1025 1026 1027 1028 1029 1030 1031
                return(n1_pucch1);
              } else if ((harq_ack0 == 1) && (harq_ack1 == 1) && (harq_ack2 == 1) && ((harq_ack3 == 2) || (harq_ack3 == 0))) {
                b[0] = 1;
                b[1] = 0;
                return(n1_pucch1);
              } else if (((harq_ack0 == 0) || (harq_ack0 == 2)) && ((harq_ack1 == 2) || (harq_ack1 == 0)) && (harq_ack2 == 0) && (harq_ack3 == 2)) {
                b[0] = 1;
hbilel's avatar
hbilel committed
1032
                b[1] = 1;
1033 1034
                return(n1_pucch2);
              } else if ((harq_ack0 == 1) && (harq_ack1 == 1) && ((harq_ack2 == 2) || (harq_ack2 == 0)) && (harq_ack3 == 1)) {
hbilel's avatar
hbilel committed
1035 1036
                b[0] = 1;
                b[1] = 0;
1037 1038
                return(n1_pucch1);
              } else if ((harq_ack0 == 0) && (harq_ack1 == 2) && (harq_ack2 == 2) && (harq_ack3 == 2)) {
hbilel's avatar
hbilel committed
1039 1040
                b[0] = 1;
                b[1] = 0;
1041 1042
                return(n1_pucch0);
              } else if ((harq_ack0 == 1) && (harq_ack1 == 1) && ((harq_ack2 == 2) || (harq_ack2 == 0)) && ((harq_ack3 == 2) || (harq_ack3 == 0))) {
hbilel's avatar
hbilel committed
1043 1044
                b[0] = 1;
                b[1] = 0;
1045 1046 1047 1048 1049 1050 1051
                return(n1_pucch1);
              } else if ((harq_ack0 == 1) && ((harq_ack1 == 2) || (harq_ack1 == 0)) && (harq_ack2 == 1) && (harq_ack3 == 1)) {
                b[0] = 0;
                b[1] = 1;
                return(n1_pucch3);
              } else if (((harq_ack0 == 0) || (harq_ack0 == 2)) && ((harq_ack1 == 2) || (harq_ack1 == 0)) && ((harq_ack2 == 2) || (harq_ack2 == 0)) && (harq_ack3 == 0)) {
                b[0] = 1;
hbilel's avatar
hbilel committed
1052
                b[1] = 1;
1053 1054 1055 1056 1057 1058 1059 1060 1061 1062 1063 1064 1065 1066 1067 1068 1069 1070 1071 1072 1073 1074 1075 1076 1077 1078 1079 1080 1081 1082 1083 1084 1085 1086 1087 1088 1089 1090 1091 1092 1093 1094 1095 1096 1097 1098
                return(n1_pucch3);
              } else if ((harq_ack0 == 1) && ((harq_ack1 == 2) || (harq_ack1 == 0)) && (harq_ack2 == 1) && ((harq_ack3 == 2) || (harq_ack3 == 0))) {
                b[0] = 0;
                b[1] = 1;
                return(n1_pucch2);
              } else if ((harq_ack0 == 1) && ((harq_ack1 == 2) || (harq_ack1 == 0)) && ((harq_ack2 == 2) || (harq_ack2 == 0)) && (harq_ack3 == 1)) {
                b[0] = 0;
                b[1] = 1;
                return(n1_pucch0);
              } else if ((harq_ack0 == 1) && ((harq_ack1 == 2) || (harq_ack1 == 0)) && ((harq_ack2 == 2) || (harq_ack2 == 0)) && ((harq_ack3 == 2) || (harq_ack3 == 0))) {
                b[0] = 0;
                b[1] = 1;
                return(n1_pucch0);
              } else if (((harq_ack0 == 2) || (harq_ack0 == 0)) && (harq_ack1 == 1) && (harq_ack2 == 1) && (harq_ack3 == 1)) {
                b[0] = 0;
                b[1] = 1;
                return(n1_pucch3);
              } else if (((harq_ack0 == 2) || (harq_ack0 == 0)) && (harq_ack1 == 0) && (harq_ack2 == 2) && (harq_ack3 == 2)) {
                b[0] = 0;
                b[1] = 0;
                return(n1_pucch1);
              } else if (((harq_ack0 == 2) || (harq_ack0 == 0)) && (harq_ack1 == 1) && (harq_ack2 == 1) && ((harq_ack3 == 2) || (harq_ack3 == 0))) {
                b[0] = 1;
                b[1] = 0;
                return(n1_pucch2);
              } else if (((harq_ack0 == 2) || (harq_ack0 == 0)) && (harq_ack1 == 1) && ((harq_ack2 == 2) || (harq_ack2 == 0)) && (harq_ack3 == 1)) {
                b[0] = 1;
                b[1] = 0;
                return(n1_pucch3);
              } else if (((harq_ack0 == 2) || (harq_ack0 == 0)) && (harq_ack1 == 1) && ((harq_ack2 == 2) || (harq_ack2 == 0)) && ((harq_ack3 == 2) || (harq_ack3 == 0))) {
                b[0] = 0;
                b[1] = 1;
                return(n1_pucch1);
              } else if (((harq_ack0 == 2) || (harq_ack0 == 0)) && ((harq_ack1 == 2) || (harq_ack1 == 0)) && (harq_ack2 == 1) && (harq_ack3 == 1)) {
                b[0] = 0;
                b[1] = 1;
                return(n1_pucch3);
              } else if (((harq_ack0 == 2) || (harq_ack0 == 0)) && ((harq_ack1 == 2) || (harq_ack1 == 0)) && (harq_ack2 == 1) && ((harq_ack3 == 2) || (harq_ack3 == 0))) {
                b[0] = 0;
                b[1] = 0;
                return(n1_pucch2);
              } else if (((harq_ack0 == 2) || (harq_ack0 == 0)) && ((harq_ack1 == 2) || (harq_ack1 == 0)) && (harq_ack3 == 1) && ((harq_ack2 == 2) || (harq_ack2 == 0))) {
                b[0] = 0;
                b[1] = 0;
                return(n1_pucch3);
                }
hbilel's avatar
hbilel committed
1099 1100 1101 1102 1103 1104 1105 1106 1107 1108 1109 1110 1111 1112 1113 1114 1115 1116 1117 1118 1119 1120 1121 1122 1123 1124 1125 1126 1127 1128 1129 1130 1131 1132 1133 1134 1135 1136 1137 1138 1139 1140
             } else if (subframe == 2) {
                if ((harq_ack0 == 1) && (harq_ack1 == 1) && (harq_ack2 == 1)) {
                 b[0] = 1;
                 b[1] = 1;
                 return(n1_pucch2);
               } else if ((harq_ack0 == 1) && (harq_ack1 == 1) && ((harq_ack2 == 2) || (harq_ack2 == 0))) {
                 b[0] = 1;
                 b[1] = 1;
                 return(n1_pucch1);
               } else if ((harq_ack0 == 1) && ((harq_ack1 == 2) || (harq_ack1 == 0)) && (harq_ack2 == 1)) {
                 b[0] = 1;
                 b[1] = 1;
                 return(n1_pucch0);
               } else if ((harq_ack0 == 1) && ((harq_ack1 == 2) || (harq_ack1 == 0)) && ((harq_ack2 == 2) || (harq_ack2 == 0))) {
                 b[0] = 0;
                 b[1] = 1;
                 return(n1_pucch0);
               } else if (((harq_ack0 == 2) || (harq_ack0 == 0)) && (harq_ack1 == 1) && (harq_ack2 == 1)) {
                 b[0] = 1;
                 b[1] = 0;
                 return(n1_pucch2);
               } else if (((harq_ack0 == 2) || (harq_ack0 == 0)) && (harq_ack1 == 1) && ((harq_ack2 == 2) || (harq_ack2 == 0))) {
                 b[1] = 0;
                 b[0] = 0;
                 return(n1_pucch1);
               } else if (((harq_ack0 == 2) || (harq_ack0 == 0)) && ((harq_ack1 == 2) || (harq_ack1 == 0)) && (harq_ack2 == 1)) {
                 b[0] = 0;
                 b[1] = 0;
                 return(n1_pucch2);
               } else if ((harq_ack0 == 2) && (harq_ack1 == 2) && (harq_ack2 == 0)) {
                 b[0] = 0;
                 b[1] = 1;
                 return(n1_pucch2);
               } else if ((harq_ack0 == 2) && (harq_ack1 == 0) && ((harq_ack2 == 2) || (harq_ack2 == 0))) {
                 b[0] = 1;
                 b[1] = 0;
                 return(n1_pucch1);
               } else if ((harq_ack0 == 0) && ((harq_ack1 == 2) || (harq_ack1 == 0)) && ((harq_ack2 == 2) || (harq_ack2 == 0))) {
                 b[0] = 1;
                 b[1] = 0;
                 return(n1_pucch0);
               }
1141

hbilel's avatar
hbilel committed
1142
             }
1143 1144
            } else if (SR==1) { // SR and 0,1,or 2 ACKS, (first 3 entries in Table 7.3-1 of 36.213)
              // this should be number of ACKs (including
1145
              ack_counter = 0;
1146 1147 1148 1149 1150 1151 1152 1153 1154 1155 1156 1157 1158 1159 1160 1161 1162 1163 1164 1165 1166 1167 1168 1169 1170 1171 1172 1173 1174 1175 1176 1177 1178 1179 1180 1181 1182 1183 1184 1185 1186 1187
              if (harq_ack0==1)
                 ack_counter ++;
              if (harq_ack1==1)
                 ack_counter ++;
              if (harq_ack2==1)
                 ack_counter ++;
              if (harq_ack3==1)
                 ack_counter ++;

            switch (ack_counter) {
               case 0:
                 b[0] = 0;
                 b[1] = 0;
               break;

               case 1:
                 b[0] = 1;
                 b[1] = 1;
               break;

               case 2:
                 b[0] = 1;
                 b[1] = 0;
               break;

               case 3:
                 b[0] = 0;
                 b[1] = 1;
               break;

               case 4:
                 b[0] = 1;
                 b[1] = 1;
               break;
            }

            ack_counter = 0;
            return(ue->scheduling_request_config[eNB_id].sr_PUCCH_ResourceIndex);
          }

          break;

1188
    }  // switch tdd_config
1189
  }
1190

Cedric Roux's avatar
Cedric Roux committed
1191
  LOG_E(PHY,"[UE%d] : Frame %d phy_procedures_lte.c: get_n1pucch, exit without proper return\n", ue->Mod_id, proc->frame_tx);
1192 1193 1194 1195 1196 1197
  return(-1);
}


#ifdef EMOS
/*
1198
  void phy_procedures_emos_UE_TX(uint8_t next_slot,uint8_t eNB_id) {
1199
  uint8_t harq_pid;
1200

1201 1202

  if (next_slot%2==0) {
1203 1204 1205 1206 1207 1208 1209
  // get harq_pid from subframe relationship
  harq_pid = subframe2harq_pid(&ue->frame_parms,ue->frame,(next_slot>>1));
  if (harq_pid==255) {
  LOG_E(PHY,"[UE%d] Frame %d : FATAL ERROR: illegal harq_pid, returning\n",
  0,ue->frame);
  return;
  }
1210

1211 1212 1213 1214 1215 1216 1217 1218 1219 1220 1221 1222 1223
  if (ulsch[eNB_id]->harq_processes[harq_pid]->subframe_scheduling_flag == 1) {
  emos_dump_UE.uci_cnt[next_slot>>1] = 1;
  memcpy(emos_dump_UE.UCI_data[0][next_slot>>1].o,ulsch[eNB_id]->o,MAX_CQI_BITS*sizeof(char));
  emos_dump_UE.UCI_data[0][next_slot>>1].O = ulsch[eNB_id]->O;
  memcpy(emos_dump_UE.UCI_data[0][next_slot>>1].o_RI,ulsch[eNB_id]->o_RI,2*sizeof(char));
  emos_dump_UE.UCI_data[0][next_slot>>1].O_RI = ulsch[eNB_id]->O_RI;
  memcpy(emos_dump_UE.UCI_data[0][next_slot>>1].o_ACK,ulsch[eNB_id]->o_ACK,4*sizeof(char));
  emos_dump_UE.UCI_data[0][next_slot>>1].O_ACK = ulsch[eNB_id]->harq_processes[harq_pid]->O_ACK;
  }
  else {
  emos_dump_UE.uci_cnt[next_slot>>1] = 0;
  }
  }
1224 1225 1226 1227
  }
*/
#endif

hbilel's avatar
hbilel committed
1228
void ulsch_common_procedures(PHY_VARS_UE *ue, UE_rxtx_proc_t *proc, uint8_t empty_subframe) {
1229

1230
  int aa;
1231
  LTE_DL_FRAME_PARMS *frame_parms=&ue->frame_parms;
1232

1233 1234 1235 1236
  int nsymb;
  int subframe_tx = proc->subframe_tx;
  int frame_tx = proc->frame_tx;
  int ulsch_start;
1237
  int overflow=0;
1238
#if defined(EXMIMO) || defined(OAI_USRP) || defined(OAI_BLADERF) || defined(OAI_LMSSDR)
1239
  int k,l;
1240
  int dummy_tx_buffer[frame_parms->samples_per_tti] __attribute__((aligned(16)));
1241 1242
#endif

1243
  VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME(VCD_SIGNAL_DUMPER_FUNCTIONS_PHY_PROCEDURES_UE_TX_ULSCH_COMMON,VCD_FUNCTION_IN);
gabrielC's avatar
gabrielC committed
1244
#if UE_TIMING_TRACE
1245
  start_meas(&ue->ofdm_mod_stats);
gabrielC's avatar
gabrielC committed
1246
#endif
1247
  nsymb = (frame_parms->Ncp == 0) ? 14 : 12;
1248

1249 1250
#if defined(EXMIMO) || defined(OAI_USRP) || defined(OAI_BLADERF) || defined(OAI_LMSSDR)//this is the EXPRESS MIMO case
  ulsch_start = (ue->rx_offset+subframe_tx*frame_parms->samples_per_tti-
1251 1252 1253 1254 1255 1256 1257 1258 1259 1260 1261 1262
         ue->hw_timing_advance-
         ue->timing_advance-
         ue->N_TA_offset+5);
  //LOG_E(PHY,"ul-signal [subframe: %d, ulsch_start %d]\n",subframe_tx, ulsch_start);

  if(ulsch_start < 0)
      ulsch_start = ulsch_start + (LTE_NUMBER_OF_SUBFRAMES_PER_FRAME*frame_parms->samples_per_tti);

  if (ulsch_start > (LTE_NUMBER_OF_SUBFRAMES_PER_FRAME*frame_parms->samples_per_tti))
      ulsch_start = ulsch_start % (LTE_NUMBER_OF_SUBFRAMES_PER_FRAME*frame_parms->samples_per_tti);

  //LOG_E(PHY,"ul-signal [subframe: %d, ulsch_start %d]\n",subframe_tx, ulsch_start);
1263 1264 1265
#else //this is the normal case
  ulsch_start = (frame_parms->samples_per_tti*subframe_tx)-ue->N_TA_offset; //-ue->timing_advance;
#endif //else EXMIMO
hbilel's avatar
hbilel committed
1266

1267
//#if defined(EXMIMO) || defined(OAI_USRP) || defined(OAI_BLADERF) || defined(OAI_LMSSDR)
hbilel's avatar
hbilel committed
1268 1269 1270 1271 1272 1273
  if (empty_subframe)
  {
//#if 1
      overflow = ulsch_start - 9*frame_parms->samples_per_tti;
      for (aa=0; aa<frame_parms->nb_antennas_tx; aa++) {

1274
          if (overflow > 0)
1275 1276 1277 1278 1279 1280 1281 1282
     {
       memset(&ue->common_vars.txdata[aa][ulsch_start],0,4*(frame_parms->samples_per_tti-overflow));
       memset(&ue->common_vars.txdata[aa][0],0,4*overflow);
     }
     else
     {
       memset(&ue->common_vars.txdata[aa][ulsch_start],0,4*frame_parms->samples_per_tti);
     }
hbilel's avatar
hbilel committed
1283 1284 1285 1286 1287 1288 1289 1290 1291 1292 1293 1294 1295 1296 1297 1298 1299
      }
/*#else
      overflow = ulsch_start - 9*frame_parms->samples_per_tti;
      for (aa=0; aa<frame_parms->nb_antennas_tx; aa++) {
          for (k=ulsch_start; k<cmin(frame_parms->samples_per_tti*LTE_NUMBER_OF_SUBFRAMES_PER_FRAME,ulsch_start+frame_parms->samples_per_tti); k++) {
              ((short*)ue->common_vars.txdata[aa])[2*k] = 0;
              ((short*)ue->common_vars.txdata[aa])[2*k+1] = 0;
          }

          for (k=0; k<overflow; k++) {
              ((short*)ue->common_vars.txdata[aa])[2*k] = 0;
              ((short*)ue->common_vars.txdata[aa])[2*k+1] = 0;
          }
      }
#endif*/
      return;
  }
1300
//#endif
hbilel's avatar
hbilel committed
1301

1302 1303
  if ((frame_tx%100) == 0)
    LOG_D(PHY,"[UE %d] Frame %d, subframe %d: ulsch_start = %d (rxoff %d, HW TA %d, timing advance %d, TA_offset %d\n",
1304 1305 1306 1307 1308 1309 1310 1311
    ue->Mod_id,frame_tx,subframe_tx,
    ulsch_start,
    ue->rx_offset,
    ue->hw_timing_advance,
    ue->timing_advance,
    ue->N_TA_offset);


1312 1313 1314 1315
  for (aa=0; aa<frame_parms->nb_antennas_tx; aa++) {
    if (frame_parms->Ncp == 1)
      PHY_ofdm_mod(&ue->common_vars.txdataF[aa][subframe_tx*nsymb*frame_parms->ofdm_symbol_size],
#if defined(EXMIMO) || defined(OAI_USRP) || defined(OAI_BLADERF) || defined(OAI_LMSSDR)
1316
       dummy_tx_buffer,
1317
#else
1318
       &ue->common_vars.txdata[aa][ulsch_start],
1319
#endif
1320 1321 1322 1323
       frame_parms->ofdm_symbol_size,
       nsymb,
       frame_parms->nb_prefix_samples,
       CYCLIC_PREFIX);
1324 1325 1326
    else
      normal_prefix_mod(&ue->common_vars.txdataF[aa][subframe_tx*nsymb*frame_parms->ofdm_symbol_size],
#if defined(EXMIMO) || defined(OAI_USRP) || defined(OAI_BLADERF) || defined(OAI_LMSSDR)
1327
      dummy_tx_buffer,
1328
#else
1329
      &ue->common_vars.txdata[aa][ulsch_start],
1330
#endif
1331 1332 1333 1334
      nsymb,
      &ue->frame_parms);


1335 1336 1337 1338 1339 1340 1341
#if defined(EXMIMO) || defined(OAI_USRP) || defined(OAI_BLADERF) || defined(OAI_LMSSDR)
    apply_7_5_kHz(ue,dummy_tx_buffer,0);
    apply_7_5_kHz(ue,dummy_tx_buffer,1);
#else
    apply_7_5_kHz(ue,&ue->common_vars.txdata[aa][ulsch_start],0);
    apply_7_5_kHz(ue,&ue->common_vars.txdata[aa][ulsch_start],1);
#endif
1342 1343


1344 1345
#if defined(EXMIMO) || defined(OAI_USRP) || defined(OAI_BLADERF) || defined(OAI_LMSSDR)
    overflow = ulsch_start - 9*frame_parms->samples_per_tti;
1346 1347


1348 1349 1350 1351
    for (k=ulsch_start,l=0; k<cmin(frame_parms->samples_per_tti*LTE_NUMBER_OF_SUBFRAMES_PER_FRAME,ulsch_start+frame_parms->samples_per_tti); k++,l++) {
      ((short*)ue->common_vars.txdata[aa])[2*k] = ((short*)dummy_tx_buffer)[2*l]<<4;
      ((short*)ue->common_vars.txdata[aa])[2*k+1] = ((short*)dummy_tx_buffer)[2*l+1]<<4;
    }
1352

1353 1354 1355 1356 1357 1358 1359 1360
    for (k=0; k<overflow; k++,l++) {
      ((short*)ue->common_vars.txdata[aa])[2*k] = ((short*)dummy_tx_buffer)[2*l]<<4;
      ((short*)ue->common_vars.txdata[aa])[2*k+1] = ((short*)dummy_tx_buffer)[2*l+1]<<4;
    }
#if defined(EXMIMO)
    // handle switch before 1st TX subframe, guarantee that the slot prior to transmission is switch on
    for (k=ulsch_start - (frame_parms->samples_per_tti>>1) ; k<ulsch_start ; k++) {
      if (k<0)
1361
  ue->common_vars.txdata[aa][k+frame_parms->samples_per_tti*LTE_NUMBER_OF_SUBFRAMES_PER_FRAME] &= 0xFFFEFFFE;
1362
      else if (k>(frame_parms->samples_per_tti*LTE_NUMBER_OF_SUBFRAMES_PER_FRAME))
1363
  ue->common_vars.txdata[aa][k-frame_parms->samples_per_tti*LTE_NUMBER_OF_SUBFRAMES_PER_FRAME] &= 0xFFFEFFFE;
1364
      else
1365
  ue->common_vars.txdata[aa][k] &= 0xFFFEFFFE;
1366
    }
1367
#endif
1368
#endif
1369 1370 1371 1372 1373 1374 1375 1376 1377
    /*
    only for debug
    LOG_I(PHY,"ul-signal [subframe: %d, ulsch_start %d, TA: %d, rxOffset: %d, timing_advance: %d, hw_timing_advance: %d]\n",subframe_tx, ulsch_start, ue->N_TA_offset, ue->rx_offset, ue->timing_advance, ue->hw_timing_advance);
    if( (crash == 1) && (subframe_tx == 0) )
    {
      LOG_E(PHY,"***** DUMP TX Signal [ulsch_start %d] *****\n",ulsch_start);
      write_output("txBuff.m","txSignal",&ue->common_vars.txdata[aa][ulsch_start],frame_parms->samples_per_tti,1,1);
    }
    */
1378

1379
  } //nb_antennas_tx
1380

gabrielC's avatar
gabrielC committed
1381 1382 1383
#if UE_TIMING_TRACE
      stop_meas(&ue->ofdm_mod_stats);
#endif
1384

1385
  VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME(VCD_SIGNAL_DUMPER_FUNCTIONS_PHY_PROCEDURES_UE_TX_ULSCH_COMMON,VCD_FUNCTION_OUT);
1386

1387
}
1388

1389
void ue_prach_procedures(PHY_VARS_UE *ue,UE_rxtx_proc_t *proc,uint8_t eNB_id,uint8_t abstraction_flag,runmode_t mode) {
1390

1391 1392 1393 1394
  int frame_tx = proc->frame_tx;
  int subframe_tx = proc->subframe_tx;
  int prach_power;
  PRACH_RESOURCES_t prach_resources_local;
1395

1396 1397
  VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME(VCD_SIGNAL_DUMPER_FUNCTIONS_PHY_PROCEDURES_UE_TX_PRACH, VCD_FUNCTION_IN);

1398
  ue->generate_prach=0;
1399

1400 1401 1402 1403 1404
  if (ue->mac_enabled==0){
    ue->prach_resources[eNB_id] = &prach_resources_local;
    prach_resources_local.ra_RNTI = 0xbeef;
    prach_resources_local.ra_PreambleIndex = 0;
  }
1405

1406 1407 1408
  if (ue->mac_enabled==1){
    // ask L2 for RACH transport
    if ((mode != rx_calib_ue) && (mode != rx_calib_ue_med) && (mode != rx_calib_ue_byp) && (mode != no_L2_connect) ) {
1409
      LOG_D(PHY,"Getting PRACH resources\n");
1410

1411 1412 1413 1414 1415
      ue->prach_resources[eNB_id] = ue_get_rach(ue->Mod_id,
						ue->CC_id,
						frame_tx,
						eNB_id,
						subframe_tx);
Cedric Roux's avatar
Cedric Roux committed
1416
      LOG_D(PHY,"Got prach_resources for eNB %d address %p, RRCCommon %p\n",eNB_id,ue->prach_resources[eNB_id],UE_mac_inst[ue->Mod_id].radioResourceConfigCommon);
1417
      LOG_D(PHY,"Prach resources %p\n",ue->prach_resources[eNB_id]);
1418 1419
    }
  }
1420

1421
  if (ue->prach_resources[eNB_id]!=NULL) {
1422

1423 1424 1425 1426 1427 1428 1429 1430
    ue->generate_prach=1;
    ue->prach_cnt=0;
#ifdef SMBV
    ue->prach_resources[eNB_id]->ra_PreambleIndex = 19;
#endif
#ifdef OAI_EMU
    ue->prach_PreambleIndex=ue->prach_resources[eNB_id]->ra_PreambleIndex;
#endif
1431 1432 1433 1434 1435 1436 1437
    LOG_I(PHY,"mode %d\n",mode);
    
    if ((ue->mac_enabled==1) && (mode != calib_prach_tx)) {
      ue->tx_power_dBm[subframe_tx] = ue->prach_resources[eNB_id]->ra_PREAMBLE_RECEIVED_TARGET_POWER+get_PL(ue->Mod_id,ue->CC_id,eNB_id);
    }
    else {
      ue->tx_power_dBm[subframe_tx] = ue->tx_power_max_dBm;
1438
      ue->prach_resources[eNB_id]->ra_PreambleIndex = 19;
1439 1440 1441 1442 1443 1444 1445 1446 1447 1448 1449 1450 1451 1452 1453
    }
    
    LOG_I(PHY,"[UE  %d][RAPROC] Frame %d, Subframe %d : Generating PRACH, preamble %d,PL %d,  P0_PRACH %d, TARGET_RECEIVED_POWER %d dBm, PRACH TDD Resource index %d, RA-RNTI %d\n",
	  ue->Mod_id,
	  frame_tx,
	  subframe_tx,
	  ue->prach_resources[eNB_id]->ra_PreambleIndex,
	  get_PL(ue->Mod_id,ue->CC_id,eNB_id),
	  ue->tx_power_dBm[subframe_tx],
	  ue->prach_resources[eNB_id]->ra_PREAMBLE_RECEIVED_TARGET_POWER,
	  ue->prach_resources[eNB_id]->ra_TDD_map_index,
	  ue->prach_resources[eNB_id]->ra_RNTI);
    
    ue->tx_total_RE[subframe_tx] = 96;
    
1454
#if defined(EXMIMO) || defined(OAI_USRP) || defined(OAI_BLADERF) || defined(OAI_LMSSDR)
1455 1456 1457 1458
    ue->prach_vars[eNB_id]->amp = get_tx_amp(ue->tx_power_dBm[subframe_tx],
					     ue->tx_power_max_dBm,
					     ue->frame_parms.N_RB_UL,
					     6);
1459

1460
#else
1461
    ue->prach_vars[eNB_id]->amp = AMP;
1462
#endif
1463

1464 1465
    if ((mode == calib_prach_tx) && (((proc->frame_tx&0xfffe)%100)==0))
      LOG_D(PHY,"[UE  %d][RAPROC] Frame %d, Subframe %d : PRACH TX power %d dBm, amp %d\n",
1466
	    ue->Mod_id,
1467 1468
	    proc->frame_rx,
	    proc->subframe_tx,
1469
	    ue->tx_power_dBm[subframe_tx],
1470 1471 1472
	    ue->prach_vars[eNB_id]->amp);
    
    
1473 1474 1475 1476 1477 1478 1479 1480 1481 1482 1483 1484 1485 1486 1487
    //      start_meas(&ue->tx_prach);
    VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME(VCD_SIGNAL_DUMPER_FUNCTIONS_UE_GENERATE_PRACH, VCD_FUNCTION_IN);
    prach_power = generate_prach(ue,eNB_id,subframe_tx,frame_tx);
    VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME(VCD_SIGNAL_DUMPER_FUNCTIONS_UE_GENERATE_PRACH, VCD_FUNCTION_OUT);
    //      stop_meas(&ue->tx_prach);
    LOG_D(PHY,"[UE  %d][RAPROC] PRACH PL %d dB, power %d dBm, digital power %d dB (amp %d)\n",
	  ue->Mod_id,
	  get_PL(ue->Mod_id,ue->CC_id,eNB_id),
	  ue->tx_power_dBm[subframe_tx],
	  dB_fixed(prach_power),
	  ue->prach_vars[eNB_id]->amp);
  } else {
    UE_transport_info[ue->Mod_id][ue->CC_id].cntl.prach_flag=1;
    UE_transport_info[ue->Mod_id][ue->CC_id].cntl.prach_id=ue->prach_resources[eNB_id]->ra_PreambleIndex;
  }
1488

1489
  if (ue->mac_enabled==1){
1490
	  // Panos: Substitute with fill_Tx_indication(ue->Mod_id, ue->CC_id, frame_tx, eNB_id, UE_MAC_Tx_IND_Msg1_TYPE)
1491 1492 1493 1494 1495
    Msg1_transmitted(ue->Mod_id,
		     ue->CC_id,
		     frame_tx,
		     eNB_id);
  }
1496

1497
  LOG_I(PHY,"[UE  %d][RAPROC] Frame %d, subframe %d: Generating PRACH (eNB %d) preamble index %d for UL, TX power %d dBm (PL %d dB), l3msg \n",
1498 1499 1500 1501 1502
	ue->Mod_id,frame_tx,subframe_tx,eNB_id,
	ue->prach_resources[eNB_id]->ra_PreambleIndex,
	ue->prach_resources[eNB_id]->ra_PREAMBLE_RECEIVED_TARGET_POWER+get_PL(ue->Mod_id,ue->CC_id,eNB_id),
	get_PL(ue->Mod_id,ue->CC_id,eNB_id));
  
1503

1504

1505 1506 1507
  // if we're calibrating the PRACH kill the pointer to its resources so that the RA protocol doesn't continue
  if (mode == calib_prach_tx)
    ue->prach_resources[eNB_id]=NULL;
1508

1509
  LOG_D(PHY,"[UE %d] frame %d subframe %d : generate_prach %d, prach_cnt %d\n",
1510 1511
  ue->Mod_id,frame_tx,subframe_tx,ue->generate_prach,ue->prach_cnt);

1512
  ue->prach_cnt++;
1513

1514 1515
  if (ue->prach_cnt==3)
    ue->generate_prach=0;
1516 1517

  VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME(VCD_SIGNAL_DUMPER_FUNCTIONS_PHY_PROCEDURES_UE_TX_PRACH, VCD_FUNCTION_OUT);
1518
}
1519

1520
void ue_ulsch_uespec_procedures(PHY_VARS_UE *ue,UE_rxtx_proc_t *proc,uint8_t eNB_id,uint8_t abstraction_flag) {
1521

1522 1523 1524 1525 1526 1527 1528 1529 1530 1531 1532
  int harq_pid;
  int frame_tx=proc->frame_tx;
  int subframe_tx=proc->subframe_tx;
  int Mod_id = ue->Mod_id;
  int CC_id = ue->CC_id;
  uint8_t Msg3_flag=0;
  uint16_t first_rb, nb_rb;
  unsigned int input_buffer_length;
  int i;
  int aa;
  int tx_amp;
1533
  uint8_t ulsch_input_buffer[5477] __attribute__ ((aligned(32)));
1534
  uint8_t access_mode;
1535
  uint8_t Nbundled=0;
hbilel's avatar
hbilel committed
1536
  uint8_t NbundledCw1=0;
hbilel's avatar
hbilel committed
1537 1538
  uint8_t ack_status_cw0=0;
  uint8_t ack_status_cw1=0;
hbilel's avatar
hbilel committed
1539 1540
  uint8_t cqi_status = 0;
  uint8_t ri_status  = 0;
1541 1542
  VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME(VCD_SIGNAL_DUMPER_FUNCTIONS_PHY_PROCEDURES_UE_TX_ULSCH_UESPEC,VCD_FUNCTION_IN);

1543 1544
  // get harq_pid from subframe relationship
  harq_pid = subframe2harq_pid(&ue->frame_parms,
1545 1546 1547 1548
             frame_tx,
             subframe_tx);


1549 1550
  if (ue->mac_enabled == 1) {
    if ((ue->ulsch_Msg3_active[eNB_id] == 1) &&
1551 1552 1553
  (ue->ulsch_Msg3_frame[eNB_id] == frame_tx) &&
  (ue->ulsch_Msg3_subframe[eNB_id] == subframe_tx)) { // Initial Transmission of Msg3

1554
      ue->ulsch[eNB_id]->harq_processes[harq_pid]->subframe_scheduling_flag = 1;
1555

1556
      if (ue->ulsch[eNB_id]->harq_processes[harq_pid]->round==0)
1557 1558 1559 1560
  generate_ue_ulsch_params_from_rar(ue,
            proc,
            eNB_id);

1561 1562
      ue->ulsch[eNB_id]->power_offset = 14;
      LOG_D(PHY,"[UE  %d][RAPROC] Frame %d: Setting Msg3_flag in subframe %d, for harq_pid %d\n",
1563 1564 1565 1566
      Mod_id,
      frame_tx,
      subframe_tx,
      harq_pid);
1567 1568
      Msg3_flag = 1;
    } else {
1569

1570
      
1571
      AssertFatal(harq_pid!=255,"[UE%d] Frame %d subframe %d ulsch_decoding.c: FATAL ERROR: illegal harq_pid, exiting\n",
1572
	      Mod_id,frame_tx, subframe_tx);
1573 1574 1575
      Msg3_flag=0;
    }
  }
1576

1577 1578 1579 1580 1581 1582 1583 1584 1585 1586 1587 1588 1589 1590 1591 1592 1593 1594 1595 1596 1597 1598 1599 1600 1601 1602 1603 1604 1605 1606 1607 1608 1609 1610 1611 1612 1613 1614 1615
  if (ue->ulsch[eNB_id]->harq_processes[harq_pid]->subframe_scheduling_flag == 1) {

    uint8_t isBad = 0;
    if (ue->frame_parms.N_RB_UL <= ue->ulsch[eNB_id]->harq_processes[harq_pid]->first_rb) {
      LOG_D(PHY,"Invalid PUSCH first_RB=%d for N_RB_UL=%d\n",
          ue->ulsch[eNB_id]->harq_processes[harq_pid]->first_rb,
          ue->frame_parms.N_RB_UL);
      isBad = 1;
    }
    if (ue->frame_parms.N_RB_UL < ue->ulsch[eNB_id]->harq_processes[harq_pid]->nb_rb) {
      LOG_D(PHY,"Invalid PUSCH num_RB=%d for N_RB_UL=%d\n",
          ue->ulsch[eNB_id]->harq_processes[harq_pid]->nb_rb,
          ue->frame_parms.N_RB_UL);
      isBad = 1;
    }
    if (0 > ue->ulsch[eNB_id]->harq_processes[harq_pid]->first_rb) {
      LOG_D(PHY,"Invalid PUSCH first_RB=%d\n",
          ue->ulsch[eNB_id]->harq_processes[harq_pid]->first_rb);
      isBad = 1;
    }
    if (0 >= ue->ulsch[eNB_id]->harq_processes[harq_pid]->nb_rb) {
      LOG_D(PHY,"Invalid PUSCH num_RB=%d\n",
          ue->ulsch[eNB_id]->harq_processes[harq_pid]->nb_rb);
      isBad = 1;
    }
    if (ue->frame_parms.N_RB_UL < (ue->ulsch[eNB_id]->harq_processes[harq_pid]->nb_rb + ue->ulsch[eNB_id]->harq_processes[harq_pid]->first_rb)) {
      LOG_D(PHY,"Invalid PUSCH num_RB=%d + first_RB=%d for N_RB_UL=%d\n",
          ue->ulsch[eNB_id]->harq_processes[harq_pid]->nb_rb,
          ue->ulsch[eNB_id]->harq_processes[harq_pid]->first_rb,
          ue->frame_parms.N_RB_UL);
      isBad = 1;
    }
    if ((0 > ue->ulsch[eNB_id]->harq_processes[harq_pid]->rvidx) ||
        (3 < ue->ulsch[eNB_id]->harq_processes[harq_pid]->rvidx)) {
      LOG_D(PHY,"Invalid PUSCH RV index=%d\n", ue->ulsch[eNB_id]->harq_processes[harq_pid]->rvidx);
      isBad = 1;
    }

    if (isBad) {
hbilel's avatar
hbilel committed
1616
      LOG_I(PHY,"Skip PUSCH generation!\n");
1617 1618 1619
      ue->ulsch[eNB_id]->harq_processes[harq_pid]->subframe_scheduling_flag = 0;
    }
  }
1620
  if (ue->ulsch[eNB_id]->harq_processes[harq_pid]->subframe_scheduling_flag == 1) {
1621

1622
    ue->generate_ul_signal[eNB_id] = 1;
1623

1624
    // deactivate service request
1625
    // ue->ulsch[eNB_id]->harq_processes[harq_pid]->subframe_scheduling_flag = 0;
1626
    LOG_D(PHY,"Generating PUSCH (Abssubframe: %d.%d): harq-Id: %d, round: %d, MaxReTrans: %d \n",frame_tx,subframe_tx,harq_pid,ue->ulsch[eNB_id]->harq_processes[harq_pid]->round,ue->ulsch[eNB_id]->Mlimit);
1627
    if (ue->ulsch[eNB_id]->harq_processes[harq_pid]->round >= (ue->ulsch[eNB_id]->Mlimit - 1))
1628
    {
Cedric Roux's avatar
Cedric Roux committed
1629
        LOG_D(PHY,"PUSCH MAX Retransmission achieved ==> send last pusch\n");
1630 1631 1632
        ue->ulsch[eNB_id]->harq_processes[harq_pid]->subframe_scheduling_flag = 0;
        ue->ulsch[eNB_id]->harq_processes[harq_pid]->round  = 0;
    }
1633

hbilel's avatar
hbilel committed
1634
    ack_status_cw0 = reset_ack(&ue->frame_parms,
1635
            ue->dlsch[ue->current_thread_id[proc->subframe_rx]][eNB_id][0]->harq_ack,
hbilel's avatar
hbilel committed
1636
            subframe_tx,
hbilel's avatar
hbilel committed
1637 1638 1639 1640
            proc->subframe_rx,
            ue->ulsch[eNB_id]->o_ACK,
            &Nbundled,
            0);
hbilel's avatar
hbilel committed
1641
    ack_status_cw1 = reset_ack(&ue->frame_parms,
1642
            ue->dlsch[ue->current_thread_id[proc->subframe_rx]][eNB_id][1]->harq_ack,
hbilel's avatar
hbilel committed
1643
            subframe_tx,
hbilel's avatar
hbilel committed
1644 1645 1646 1647 1648
            proc->subframe_rx,
            ue->ulsch[eNB_id]->o_ACK,
            &NbundledCw1,
            1);

1649
    //Nbundled = ue->dlsch[ue->current_thread_id[proc->subframe_rx]][eNB_id][0]->harq_ack;
hbilel's avatar
hbilel committed
1650
    //ue->ulsch[eNB_id]->bundling = Nbundled;
hbilel's avatar
hbilel committed
1651

1652 1653
    first_rb = ue->ulsch[eNB_id]->harq_processes[harq_pid]->first_rb;
    nb_rb = ue->ulsch[eNB_id]->harq_processes[harq_pid]->nb_rb;
1654

1655

hbilel's avatar
hbilel committed
1656 1657 1658 1659 1660 1661
    // check Periodic CQI/RI reporting
    cqi_status = ((ue->cqi_report_config[eNB_id].CQI_ReportPeriodic.cqi_PMI_ConfigIndex>0)&&
        (is_cqi_TXOp(ue,proc,eNB_id)==1));

    ri_status = ((ue->cqi_report_config[eNB_id].CQI_ReportPeriodic.ri_ConfigIndex>0) &&
             (is_ri_TXOp(ue,proc,eNB_id)==1));
1662

hbilel's avatar
hbilel committed
1663 1664 1665
    // compute CQI/RI resources
    compute_cqi_ri_resources(ue, ue->ulsch[eNB_id], eNB_id, ue->ulsch[eNB_id]->rnti, P_RNTI, CBA_RNTI, cqi_status, ri_status);

hbilel's avatar
hbilel committed
1666
    if (ack_status_cw0 > 0) {
1667 1668 1669

      // check if we received a PDSCH at subframe_tx - 4
      // ==> send ACK/NACK on PUSCH
1670 1671 1672 1673 1674
      if (ue->frame_parms.frame_type == FDD)
      {
        ue->ulsch[eNB_id]->harq_processes[harq_pid]->O_ACK = ack_status_cw0 + ack_status_cw1;
      }

1675 1676 1677 1678 1679

#if T_TRACER
    if(ue->ulsch[eNB_id]->o_ACK[0])
    {
    	LOG_I(PHY,"PUSCH ACK\n");
Cedric Roux's avatar
Cedric Roux committed
1680
        T(T_UE_PHY_DLSCH_UE_ACK, T_INT(eNB_id), T_INT(frame_tx%1024), T_INT(subframe_tx), T_INT(ue->dlsch[ue->current_thread_id[proc->subframe_rx]][eNB_id][0]->rnti),
1681
                      T_INT(ue->dlsch[ue->current_thread_id[proc->subframe_rx]][eNB_id][0]->current_harq_pid));
1682 1683 1684 1685
    }
    else
    {
    	LOG_I(PHY,"PUSCH NACK\n");
Cedric Roux's avatar
Cedric Roux committed
1686
        T(T_UE_PHY_DLSCH_UE_NACK, T_INT(eNB_id), T_INT(frame_tx%1024), T_INT(subframe_tx), T_INT(ue->dlsch[ue->current_thread_id[proc->subframe_rx]][eNB_id][0]->rnti),
1687
                      T_INT(ue->dlsch[ue->current_thread_id[proc->subframe_rx]][eNB_id][0]->current_harq_pid));
1688 1689
    }
#endif
gabrielC's avatar
gabrielC committed
1690 1691
#ifdef UE_DEBUG_TRACE
      LOG_I(PHY,"[UE  %d][PDSCH %x] AbsSubFrame %d.%d Generating ACK (%d,%d) for %d bits on PUSCH\n",
1692 1693
        Mod_id,
        ue->ulsch[eNB_id]->rnti,
1694
        frame_tx%1024,subframe_tx,
1695 1696
        ue->ulsch[eNB_id]->o_ACK[0],ue->ulsch[eNB_id]->o_ACK[1],
        ue->ulsch[eNB_id]->harq_processes[harq_pid]->O_ACK);
gabrielC's avatar
gabrielC committed
1697
#endif
1698 1699
    }

1700

gabrielC's avatar
gabrielC committed
1701
#ifdef UE_DEBUG_TRACE
1702
        LOG_I(PHY,
hbilel's avatar
hbilel committed
1703
              "[UE  %d][PUSCH %d] AbsSubframe %d.%d Generating PUSCH : first_rb %d, nb_rb %d, round %d, mcs %d, rv %d, "
1704
              "cyclic_shift %d (cyclic_shift_common %d,n_DMRS2 %d,n_PRS %d), ACK (%d,%d), O_ACK %d, ack_status_cw0 %d ack_status_cw1 %d bundling %d, Nbundled %d, CQI %d, RI %d\n",
1705
          Mod_id,harq_pid,frame_tx%1024,subframe_tx,
1706 1707 1708 1709 1710 1711 1712 1713 1714 1715 1716 1717
          first_rb,nb_rb,
          ue->ulsch[eNB_id]->harq_processes[harq_pid]->round,
          ue->ulsch[eNB_id]->harq_processes[harq_pid]->mcs,
          ue->ulsch[eNB_id]->harq_processes[harq_pid]->rvidx,
          (ue->frame_parms.pusch_config_common.ul_ReferenceSignalsPUSCH.cyclicShift+
           ue->ulsch[eNB_id]->harq_processes[harq_pid]->n_DMRS2+
           ue->frame_parms.pusch_config_common.ul_ReferenceSignalsPUSCH.nPRS[subframe_tx<<1])%12,
          ue->frame_parms.pusch_config_common.ul_ReferenceSignalsPUSCH.cyclicShift,
          ue->ulsch[eNB_id]->harq_processes[harq_pid]->n_DMRS2,
          ue->frame_parms.pusch_config_common.ul_ReferenceSignalsPUSCH.nPRS[subframe_tx<<1],
          ue->ulsch[eNB_id]->o_ACK[0],ue->ulsch[eNB_id]->o_ACK[1],
          ue->ulsch[eNB_id]->harq_processes[harq_pid]->O_ACK,
1718 1719 1720 1721 1722
          ack_status_cw0,
          ack_status_cw1,
          ue->ulsch[eNB_id]->bundling, Nbundled,
          cqi_status,
          ri_status);
1723
#endif
1724 1725 1726 1727 1728





1729 1730 1731 1732 1733 1734 1735 1736 1737 1738 1739 1740 1741 1742 1743 1744
    if (Msg3_flag == 1) {
      LOG_I(PHY,"[UE  %d][RAPROC] Frame %d, Subframe %d Generating (RRCConnectionRequest) Msg3 (nb_rb %d, first_rb %d, round %d, rvidx %d) Msg3: %x.%x.%x|%x.%x.%x.%x.%x.%x\n",Mod_id,frame_tx,
	    subframe_tx,
	    ue->ulsch[eNB_id]->harq_processes[harq_pid]->nb_rb,
	    ue->ulsch[eNB_id]->harq_processes[harq_pid]->first_rb,
	    ue->ulsch[eNB_id]->harq_processes[harq_pid]->round,
	    ue->ulsch[eNB_id]->harq_processes[harq_pid]->rvidx,
	    ue->prach_resources[eNB_id]->Msg3[0],
	    ue->prach_resources[eNB_id]->Msg3[1],
	    ue->prach_resources[eNB_id]->Msg3[2],
	    ue->prach_resources[eNB_id]->Msg3[3],
	    ue->prach_resources[eNB_id]->Msg3[4],
	    ue->prach_resources[eNB_id]->Msg3[5],
	    ue->prach_resources[eNB_id]->Msg3[6],
	    ue->prach_resources[eNB_id]->Msg3[7],
	    ue->prach_resources[eNB_id]->Msg3[8]);
gabrielC's avatar
gabrielC committed
1745
#if UE_TIMING_TRACE
1746
      start_meas(&ue->ulsch_encoding_stats);
gabrielC's avatar
gabrielC committed
1747
#endif
1748
      
1749 1750 1751 1752 1753 1754 1755
      AssertFatal(ulsch_encoding(ue->prach_resources[eNB_id]->Msg3,
				 ue,
				 harq_pid,
				 eNB_id,
				 proc->subframe_rx,
				 ue->transmission_mode[eNB_id],0,0)==0,
		  "ulsch_coding.c: FATAL ERROR: returning\n");
1756
      
gabrielC's avatar
gabrielC committed
1757
#if UE_TIMING_TRACE
1758 1759
      stop_meas(&ue->phy_proc_tx);
      printf("------FULL TX PROC : %5.2f ------\n",ue->phy_proc_tx.p_time/(cpuf*1000.0));
gabrielC's avatar
gabrielC committed
1760
#endif
1761
	  return;
1762

gabrielC's avatar
gabrielC committed
1763
#if UE_TIMING_TRACE
1764
      stop_meas(&ue->ulsch_encoding_stats);
gabrielC's avatar
gabrielC committed
1765
#endif
1766
      if (ue->mac_enabled == 1) {
1767

1768
	// signal MAC that Msg3 was sent
1769
    // Substitute call to this function by call to fill_Tx_indication (UE_MAC_Tx_IND_Msg3_TYPE)
1770 1771 1772 1773
	Msg3_transmitted(Mod_id,
			 CC_id,
			 frame_tx,
			 eNB_id);
1774
      }
1775
      LOG_I(PHY,"Done Msg3 encoding\n");
1776
    } // Msg3_flag==1
1777
    else {// Msg3_flag==0
1778
      input_buffer_length = ue->ulsch[eNB_id]->harq_processes[harq_pid]->TBS/8;
1779

1780
      if (ue->mac_enabled==1) {
1781

1782 1783 1784 1785
	//  LOG_D(PHY,"[UE  %d] ULSCH : Searching for MAC SDUs\n",Mod_id);
	if (ue->ulsch[eNB_id]->harq_processes[harq_pid]->round==0) {
	  //if (ue->ulsch[eNB_id]->harq_processes[harq_pid]->calibration_flag == 0) {
	  access_mode=SCHEDULED_ACCESS;
1786 1787 1788 1789

	  // Panos: Remove the call to ue_get_sdu here and use
	  // the corresponding Tx.request PDU, instead of ulsch_input_buffer, below.

1790 1791 1792 1793 1794 1795 1796 1797
	  ue_get_sdu(Mod_id,
		     CC_id,
		     frame_tx,
		     subframe_tx,
		     eNB_id,
		     ulsch_input_buffer,
		     input_buffer_length,
		     &access_mode);
1798 1799
	}
	
1800 1801 1802
      

	
1803 1804
#ifdef DEBUG_PHY_PROC
#ifdef DEBUG_ULSCH
1805 1806 1807 1808 1809 1810
	LOG_D(PHY,"[UE] Frame %d, subframe %d : ULSCH SDU (TX harq_pid %d)  (%d bytes) : \n",frame_tx,subframe_tx,harq_pid, ue->ulsch[eNB_id]->harq_processes[harq_pid]->TBS>>3);
	
	for (i=0; i<ue->ulsch[eNB_id]->harq_processes[harq_pid]->TBS>>3; i++)
	  LOG_T(PHY,"%x.",ulsch_input_buffer[i]);
	
	LOG_T(PHY,"\n");
1811 1812
#endif
#endif
1813 1814 1815 1816 1817 1818 1819 1820 1821
      }
      else {
	unsigned int taus(void);
	
	for (i=0; i<input_buffer_length; i++)
	  ulsch_input_buffer[i]= (uint8_t)(taus()&0xff);
	
      }
      
gabrielC's avatar
gabrielC committed
1822
#if UE_TIMING_TRACE
1823
      start_meas(&ue->ulsch_encoding_stats);
gabrielC's avatar
gabrielC committed
1824
#endif
1825
      if (abstraction_flag==0) {
1826
	
1827 1828 1829 1830
	if (ulsch_encoding(ulsch_input_buffer,
			   ue,
			   harq_pid,
			   eNB_id,
hbilel's avatar
hbilel committed
1831
			   proc->subframe_rx,
1832 1833
			   ue->transmission_mode[eNB_id],0,
			   Nbundled)!=0) {
1834 1835
	  LOG_E(PHY,"ulsch_coding.c: FATAL ERROR: returning\n");
	  VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME(VCD_SIGNAL_DUMPER_FUNCTIONS_PHY_PROCEDURES_UE_TX, VCD_FUNCTION_OUT);
gabrielC's avatar
gabrielC committed
1836
#if UE_TIMING_TRACE
1837
	  stop_meas(&ue->phy_proc_tx);
gabrielC's avatar
gabrielC committed
1838
#endif
1839
	  return;
Florian Kaltenberger's avatar
Florian Kaltenberger committed
1840
	}
1841 1842
      }
      
1843
#ifdef PHY_ABSTRACTION
1844
      else {
1845
        ulsch_encoding_emul(ulsch_input_buffer,ue,eNB_id,proc->subframe_rx,harq_pid,0);
1846
      }
1847
      
1848
#endif
gabrielC's avatar
gabrielC committed
1849
#if UE_TIMING_TRACE
1850
      stop_meas(&ue->ulsch_encoding_stats);
gabrielC's avatar
gabrielC committed
1851
#endif
1852
    }
1853
    
1854 1855
    if (abstraction_flag == 0) {
      if (ue->mac_enabled==1) {
1856 1857
	pusch_power_cntl(ue,proc,eNB_id,1, abstraction_flag);
	ue->tx_power_dBm[subframe_tx] = ue->ulsch[eNB_id]->Po_PUSCH;
1858 1859
      }
      else {
1860
	ue->tx_power_dBm[subframe_tx] = ue->tx_power_max_dBm;
1861
      }
1862
      ue->tx_total_RE[subframe_tx] = nb_rb*12;
1863
      
kaltenbe's avatar
kaltenbe committed
1864
#if defined(EXMIMO) || defined(OAI_USRP) || defined(OAI_BLADERF) || defined(OAI_LMSSDR)
1865
      tx_amp = get_tx_amp(ue->tx_power_dBm[subframe_tx],
1866 1867 1868
			  ue->tx_power_max_dBm,
			  ue->frame_parms.N_RB_UL,
			  nb_rb);
1869
#else
1870
    tx_amp = AMP;
1871
#endif
Cedric Roux's avatar
Cedric Roux committed
1872 1873

    T(T_UE_PHY_PUSCH_TX_POWER, T_INT(eNB_id), T_INT(frame_tx%1024), T_INT(subframe_tx),T_INT(ue->tx_power_dBm[subframe_tx]),
1874
      T_INT(tx_amp),T_INT(ue->ulsch[eNB_id]->f_pusch),T_INT(get_PL(Mod_id,0,eNB_id)),T_INT(nb_rb));
1875

gabrielC's avatar
gabrielC committed
1876
#ifdef UE_DEBUG_TRACE
1877
    LOG_I(PHY,"[UE  %d][PUSCH %d] AbsSubFrame %d.%d, generating PUSCH, Po_PUSCH: %d dBm (max %d dBm), amp %d\n",
1878
	  Mod_id,harq_pid,frame_tx%1024,subframe_tx,ue->tx_power_dBm[subframe_tx],ue->tx_power_max_dBm, tx_amp);
gabrielC's avatar
gabrielC committed
1879 1880
#endif
#if UE_TIMING_TRACE
1881
    
1882
    start_meas(&ue->ulsch_modulation_stats);
1883
#endif
1884 1885 1886 1887 1888 1889 1890 1891 1892 1893 1894 1895 1896 1897 1898
    ulsch_modulation(ue->common_vars.txdataF,
		     tx_amp,
		     frame_tx,
		     subframe_tx,
		     &ue->frame_parms,
		     ue->ulsch[eNB_id]);
    for (aa=0; aa<1/*frame_parms->nb_antennas_tx*/; aa++)
      generate_drs_pusch(ue,
			 proc,
			 eNB_id,
			 tx_amp,
			 subframe_tx,
			 first_rb,
			 nb_rb,
			 aa);
gabrielC's avatar
gabrielC committed
1899
#if UE_TIMING_TRACE
1900
    stop_meas(&ue->ulsch_modulation_stats);
gabrielC's avatar
gabrielC committed
1901
#endif
1902
    }
1903
    
1904 1905 1906 1907 1908
    if (abstraction_flag==1) {
      // clear SR
      ue->sr[subframe_tx]=0;
    }
  } // subframe_scheduling_flag==1
1909 1910 1911

  VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME(VCD_SIGNAL_DUMPER_FUNCTIONS_PHY_PROCEDURES_UE_TX_ULSCH_UESPEC,VCD_FUNCTION_OUT);

1912
}
1913

hbilel's avatar
hbilel committed
1914 1915 1916 1917 1918 1919 1920 1921 1922 1923 1924 1925 1926 1927 1928 1929 1930 1931 1932 1933 1934 1935 1936 1937 1938 1939 1940
void ue_srs_procedures(PHY_VARS_UE *ue,UE_rxtx_proc_t *proc,uint8_t eNB_id,uint8_t abstraction_flag)
{

  //LTE_DL_FRAME_PARMS *frame_parms = &ue->frame_parms;
  //int8_t  frame_tx    = proc->frame_tx;
  int8_t  subframe_tx = proc->subframe_tx;
  int16_t tx_amp;
  int16_t Po_SRS;
  uint8_t nb_rb_srs;

  SOUNDINGRS_UL_CONFIG_DEDICATED *pSoundingrs_ul_config_dedicated=&ue->soundingrs_ul_config_dedicated[eNB_id];
  uint8_t isSrsTxOccasion = pSoundingrs_ul_config_dedicated->srsUeSubframe;

  if(isSrsTxOccasion)
  {
    ue->generate_ul_signal[eNB_id] = 1;
    if (ue->mac_enabled==1)
    {
      srs_power_cntl(ue,proc,eNB_id, (uint8_t*)(&nb_rb_srs), abstraction_flag);
      Po_SRS = ue->ulsch[eNB_id]->Po_SRS;
    }
    else
    {
      Po_SRS = ue->tx_power_max_dBm;
    }

#if defined(EXMIMO) || defined(OAI_USRP) || defined(OAI_BLADERF) || defined(OAI_LMSSDR)
fnabet's avatar
fnabet committed
1941 1942
    if (ue->mac_enabled==1)
    {
hbilel's avatar
hbilel committed
1943 1944 1945 1946
    tx_amp = get_tx_amp(Po_SRS,
                        ue->tx_power_max_dBm,
                        ue->frame_parms.N_RB_UL,
                        nb_rb_srs);
fnabet's avatar
fnabet committed
1947 1948 1949 1950 1951
    }
    else
    {
        tx_amp = AMP;
    }
hbilel's avatar
hbilel committed
1952 1953 1954
#else
      tx_amp = AMP;
#endif
fnabet's avatar
fnabet committed
1955
    LOG_D(PHY,"SRS PROC; TX_MAX_POWER %d, Po_SRS %d, NB_RB_UL %d, NB_RB_SRS %d TX_AMPL %d\n",ue->tx_power_max_dBm,
hbilel's avatar
hbilel committed
1956 1957 1958 1959 1960
            Po_SRS,
            ue->frame_parms.N_RB_UL,
            nb_rb_srs,
            tx_amp);

1961 1962
    uint16_t nsymb = (ue->frame_parms.Ncp==0) ? 14:12;
    uint16_t symbol_offset = (int)ue->frame_parms.ofdm_symbol_size*((subframe_tx*nsymb)+(nsymb-1));
1963 1964 1965 1966 1967
    generate_srs(&ue->frame_parms,
     &ue->soundingrs_ul_config_dedicated[eNB_id],
     &ue->common_vars.txdataF[eNB_id][symbol_offset],
     tx_amp,
     subframe_tx);
hbilel's avatar
hbilel committed
1968 1969
  }
}
1970

Raymond Knopp's avatar
Raymond Knopp committed
1971 1972 1973 1974 1975
int16_t get_pucch2_cqi(PHY_VARS_UE *ue,int eNB_id,int *len) {

  if ((ue->transmission_mode[eNB_id]<4)||
      (ue->transmission_mode[eNB_id]==7)) { // Mode 1-0 feedback
    // 4-bit CQI message
1976 1977 1978 1979
          /*LOG_I(PHY,"compute CQI value, TM %d, length 4, Cqi Avg %d, value %d \n", ue->transmission_mode[eNB_id],
                          ue->measurements.wideband_cqi_avg[eNB_id],
                          sinr2cqi((double)ue->measurements.wideband_cqi_avg[eNB_id],
                                    ue->transmission_mode[eNB_id]));*/
Raymond Knopp's avatar
Raymond Knopp committed
1980 1981
    *len=4;
    return(sinr2cqi((double)ue->measurements.wideband_cqi_avg[eNB_id],
1982
        ue->transmission_mode[eNB_id]));
Raymond Knopp's avatar
Raymond Knopp committed
1983 1984
  }
  else { // Mode 1-1 feedback, later
1985
          //LOG_I(PHY,"compute CQI value, TM %d, length 0, Cqi Avg 0 \n", ue->transmission_mode[eNB_id]);
Raymond Knopp's avatar
Raymond Knopp committed
1986 1987 1988 1989 1990 1991 1992 1993 1994 1995 1996 1997 1998
    *len=0;
    // 2-antenna ports RI=1, 6 bits (2 PMI, 4 CQI)

    // 2-antenna ports RI=2, 8 bits (1 PMI, 7 CQI/DIFF CQI)
    return(0);
  }
}


int16_t get_pucch2_ri(PHY_VARS_UE *ue,int eNB_id) {

  return(1);
}
1999

2000 2001 2002 2003 2004 2005 2006 2007 2008 2009 2010 2011 2012 2013 2014 2015 2016 2017 2018 2019 2020 2021 2022 2023

void get_pucch_param(PHY_VARS_UE    *ue,
                     UE_rxtx_proc_t *proc,
                     uint8_t        *ack_payload,
                     PUCCH_FMT_t    format,
                     uint8_t        eNB_id,
                     uint8_t        SR,
                     uint8_t        cqi_report,
                     uint16_t       *pucch_resource,
                     uint8_t        *pucch_payload,
                     uint16_t       *plength)
{

    switch (format) {
    case pucch_format1:
    {
        pucch_resource[0] = ue->scheduling_request_config[eNB_id].sr_PUCCH_ResourceIndex;
        pucch_payload[0]  = 0; // payload is ignored in case of format1
        pucch_payload[1]  = 0; // payload is ignored in case of format1
    }
    break;

    case pucch_format1a:
    case pucch_format1b:
2024 2025 2026
    case pucch_format1b_csA2:
    case pucch_format1b_csA3:
    case pucch_format1b_csA4:
2027 2028 2029
    {
        pucch_resource[0] = get_n1_pucch(ue,
                                         proc,
2030
                                         ue->dlsch[ue->current_thread_id[proc->subframe_rx]][eNB_id][0]->harq_ack,
2031 2032 2033 2034
                                         eNB_id,
                                         ack_payload,
                                         SR);
        pucch_payload[0]  = ack_payload[0];
hbilel's avatar
hbilel committed
2035 2036
        pucch_payload[1]  = ack_payload[1];
        //pucch_payload[1]  = 1;
2037 2038 2039 2040 2041 2042 2043 2044
    }
    break;

    case pucch_format2:
    {
        pucch_resource[0]    = ue->cqi_report_config[eNB_id].CQI_ReportPeriodic.cqi_PUCCH_ResourceIndex;
        if(cqi_report)
        {
hbilel's avatar
hbilel committed
2045
            pucch_payload[0] = get_pucch2_cqi(ue,eNB_id,(int*)plength);
2046 2047 2048 2049 2050 2051 2052 2053 2054 2055 2056 2057 2058
        }
        else
        {
            *plength = 1;
            pucch_payload[0] = get_pucch2_ri(ue,eNB_id);
        }
    }
    break;

    case pucch_format2a:
    case pucch_format2b:
        LOG_E(PHY,"NO Resource available for PUCCH 2a/2b \n");
    break;
2059 2060 2061 2062

    case pucch_format3:
      fprintf(stderr, "PUCCH format 3 not handled\n");
      abort();
2063 2064 2065
    }
}

2066
void ue_pucch_procedures(PHY_VARS_UE *ue,UE_rxtx_proc_t *proc,uint8_t eNB_id,uint8_t abstraction_flag) {
2067 2068


2069 2070
  uint8_t  pucch_ack_payload[2];
  uint16_t pucch_resource;
2071 2072
  ANFBmode_t bundling_flag;
  PUCCH_FMT_t format;
Raymond Knopp's avatar
Raymond Knopp committed
2073

2074 2075 2076
  uint8_t  SR_payload;
  uint8_t  pucch_payload[2];
  uint16_t len;
Raymond Knopp's avatar
Raymond Knopp committed
2077

2078 2079 2080 2081 2082 2083
  LTE_DL_FRAME_PARMS *frame_parms = &ue->frame_parms;
  int frame_tx=proc->frame_tx;
  int subframe_tx=proc->subframe_tx;
  int Mod_id = ue->Mod_id;
  int CC_id = ue->CC_id;
  int tx_amp;
2084
  int16_t Po_PUCCH;
2085 2086 2087 2088 2089
  uint8_t ack_status_cw0=0;
  uint8_t ack_status_cw1=0;
  uint8_t nb_cw=0;
  uint8_t cqi_status=0;
  uint8_t ri_status=0;
2090

2091
  VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME(VCD_SIGNAL_DUMPER_FUNCTIONS_PHY_PROCEDURES_UE_TX_PUCCH,VCD_FUNCTION_IN);
2092

hbilel's avatar
hbilel committed
2093
  SOUNDINGRS_UL_CONFIG_DEDICATED *pSoundingrs_ul_config_dedicated=&ue->soundingrs_ul_config_dedicated[eNB_id];
2094 2095 2096 2097 2098 2099

  // 36.213 8.2
  /*if ackNackSRS_SimultaneousTransmission ==  TRUE and in the cell specific SRS subframes UE shall transmit
    ACK/NACK and SR using the shortened PUCCH format. This shortened PUCCH format shall be used in a cell
    specific SRS subframe even if the UE does not transmit SRS in that subframe
  */
2100 2101 2102 2103 2104 2105 2106 2107

  int harq_pid = subframe2harq_pid(&ue->frame_parms,
                                   frame_tx,
                                   subframe_tx);

  if(ue->ulsch[eNB_id]->harq_processes[harq_pid]->subframe_scheduling_flag)
  {
      LOG_D(PHY,"PUSCH is programmed on this subframe [pid %d] AbsSuframe %d.%d ==> Skip PUCCH transmission \n",harq_pid,frame_tx,subframe_tx);
2108
      VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME(VCD_SIGNAL_DUMPER_FUNCTIONS_PHY_PROCEDURES_UE_TX_PUCCH,VCD_FUNCTION_OUT);
2109 2110 2111
      return;
  }

fnabet's avatar
fnabet committed
2112
  uint8_t isShortenPucch = (pSoundingrs_ul_config_dedicated->srsCellSubframe && frame_parms->soundingrs_ul_config_common.ackNackSRS_SimultaneousTransmission);
hbilel's avatar
hbilel committed
2113

2114
  bundling_flag = ue->pucch_config_dedicated[eNB_id].tdd_AckNackFeedbackMode;
2115

2116 2117 2118 2119 2120 2121 2122 2123 2124
  if ((frame_parms->frame_type==FDD) ||
      (bundling_flag==bundling)    ||
      ((frame_parms->frame_type==TDD)&&(frame_parms->tdd_config==1)&&((subframe_tx!=2)||(subframe_tx!=7)))) {
    format = pucch_format1a;
    LOG_D(PHY,"[UE] PUCCH 1a\n");
  } else {
    format = pucch_format1b;
    LOG_D(PHY,"[UE] PUCCH 1b\n");
  }
2125

2126 2127 2128 2129 2130 2131 2132 2133 2134 2135 2136
  // Part - I
  // Collect feedback that should be transmitted at this subframe
  // - SR
  // - ACK/NACK
  // - CQI
  // - RI

  SR_payload = 0;
  if (is_SR_TXOp(ue,proc,eNB_id)==1)
  {
      if (ue->mac_enabled==1) {
2137 2138 2139 2140 2141 2142
	SR_payload = ue_get_SR(Mod_id,
			       CC_id,
			       frame_tx,
			       eNB_id,
			       ue->pdcch_vars[ue->current_thread_id[proc->subframe_rx]][eNB_id]->crnti,
			       subframe_tx); // subframe used for meas gap
2143 2144 2145 2146
      }
      else {
          SR_payload = 1;
      }
2147
  }
Raymond Knopp's avatar
Raymond Knopp committed
2148

2149
  ack_status_cw0 = get_ack(&ue->frame_parms,
2150
                       ue->dlsch[ue->current_thread_id[proc->subframe_rx]][eNB_id][0]->harq_ack,
2151
                       subframe_tx,
hbilel's avatar
hbilel committed
2152
                       proc->subframe_rx,
2153 2154
                       pucch_ack_payload,
                       0);
2155

2156
  ack_status_cw1 = get_ack(&ue->frame_parms,
2157
                       ue->dlsch[ue->current_thread_id[proc->subframe_rx]][eNB_id][1]->harq_ack,
2158
                       subframe_tx,
hbilel's avatar
hbilel committed
2159
                       proc->subframe_rx,
2160 2161
                       pucch_ack_payload,
                       1);
Raymond Knopp's avatar
Raymond Knopp committed
2162

gabrielC's avatar
gabrielC committed
2163
  nb_cw = ( (ack_status_cw0 != 0) ? 1:0) + ( (ack_status_cw1 != 0) ? 1:0);
Raymond Knopp's avatar
Raymond Knopp committed
2164

2165 2166
  cqi_status = ((ue->cqi_report_config[eNB_id].CQI_ReportPeriodic.cqi_PMI_ConfigIndex>0)&&
      (is_cqi_TXOp(ue,proc,eNB_id)==1));
Raymond Knopp's avatar
Raymond Knopp committed
2167

2168 2169
  ri_status = ((ue->cqi_report_config[eNB_id].CQI_ReportPeriodic.ri_ConfigIndex>0) &&
           (is_ri_TXOp(ue,proc,eNB_id)==1));
Raymond Knopp's avatar
Raymond Knopp committed
2170

2171 2172
  // Part - II
  // if nothing to report ==> exit function
hbilel's avatar
hbilel committed
2173
  if( (nb_cw==0) && (SR_payload==0) && (cqi_status==0) && (ri_status==0) )
2174
  {
2175
      LOG_D(PHY,"PUCCH No feedback AbsSubframe %d.%d SR_payload %d nb_cw %d pucch_ack_payload[0] %d pucch_ack_payload[1] %d cqi_status %d Return \n",
2176
            frame_tx%1024, subframe_tx, SR_payload, nb_cw, pucch_ack_payload[0], pucch_ack_payload[1], cqi_status);
2177 2178
      return;
  }
Raymond Knopp's avatar
Raymond Knopp committed
2179

2180 2181 2182 2183 2184 2185 2186
  // Part - III
  // Decide which PUCCH format should be used if needed
  format = get_pucch_format(frame_parms->frame_type,
                            frame_parms->Ncp,
                            SR_payload,
                            nb_cw,
                            cqi_status,
hbilel's avatar
hbilel committed
2187 2188
                            ri_status,
                            bundling_flag);
2189 2190 2191 2192 2193 2194 2195 2196 2197
  // Determine PUCCH resources and payload: mandatory for pucch encoding
  get_pucch_param(ue,
                  proc,
                  pucch_ack_payload,
                  format,
                  eNB_id,
                  SR_payload,
                  cqi_status,
                  &pucch_resource,
hbilel's avatar
hbilel committed
2198
                  (uint8_t *)&pucch_payload,
2199 2200 2201
                  &len);


2202 2203
  LOG_D(PHY,"PUCCH feedback AbsSubframe %d.%d SR %d NbCW %d (%d %d) AckNack %d.%d CQI %d RI %d format %d pucch_resource %d pucch_payload %d %d \n",
	frame_tx%1024, subframe_tx, SR_payload, nb_cw, ack_status_cw0, ack_status_cw1, pucch_ack_payload[0], pucch_ack_payload[1], cqi_status, ri_status, format, pucch_resource,pucch_payload[0],pucch_payload[1]);
2204 2205 2206 2207 2208 2209 2210 2211 2212 2213

  // Part - IV
  // Generate PUCCH signal
  ue->generate_ul_signal[eNB_id] = 1;

  switch (format) {
  case pucch_format1:
  case pucch_format1a:
  case pucch_format1b:
  {
Raymond Knopp's avatar
Raymond Knopp committed
2214
      if (ue->mac_enabled == 1) {
2215
          Po_PUCCH = pucch_power_cntl(ue,proc,subframe_tx,eNB_id,format);
Raymond Knopp's avatar
Raymond Knopp committed
2216 2217
      }
      else {
2218
          Po_PUCCH = ue->tx_power_max_dBm;
Raymond Knopp's avatar
Raymond Knopp committed
2219 2220 2221
      }
      ue->tx_power_dBm[subframe_tx] = Po_PUCCH;
      ue->tx_total_RE[subframe_tx] = 12;
2222

Raymond Knopp's avatar
Raymond Knopp committed
2223
#if defined(EXMIMO) || defined(OAI_USRP) || defined(OAI_BLADERF) || defined(OAI_LMSSDR)
2224 2225 2226 2227
      tx_amp = get_tx_amp(Po_PUCCH,
              ue->tx_power_max_dBm,
              ue->frame_parms.N_RB_UL,
              1);
Raymond Knopp's avatar
Raymond Knopp committed
2228 2229
#else
      tx_amp = AMP;
2230 2231
#endif
#if T_TRACER
Cedric Roux's avatar
Cedric Roux committed
2232
      T(T_UE_PHY_PUCCH_TX_POWER, T_INT(eNB_id), T_INT(frame_tx%1024), T_INT(subframe_tx),T_INT(ue->tx_power_dBm[subframe_tx]),
2233
              T_INT(tx_amp),T_INT(ue->dlsch[ue->current_thread_id[proc->subframe_rx]][eNB_id][0]->g_pucch),T_INT(get_PL(ue->Mod_id,ue->CC_id,eNB_id)));
Raymond Knopp's avatar
Raymond Knopp committed
2234
#endif
gabrielC's avatar
gabrielC committed
2235 2236

#ifdef UE_DEBUG_TRACE
2237 2238
      if(format == pucch_format1)
      {
gabrielC's avatar
gabrielC committed
2239
          LOG_I(PHY,"[UE  %d][SR %x] AbsSubframe %d.%d Generating PUCCH 1 (SR for PUSCH), an_srs_simultanous %d, shorten_pucch %d, n1_pucch %d, Po_PUCCH %d\n",
2240
                  Mod_id,
2241
                  ue->dlsch[ue->current_thread_id[proc->subframe_rx]][eNB_id][0]->rnti,
2242
                  frame_tx%1024, subframe_tx,
2243 2244 2245 2246 2247 2248 2249 2250
                  frame_parms->soundingrs_ul_config_common.ackNackSRS_SimultaneousTransmission,
                  isShortenPucch,
                  ue->scheduling_request_config[eNB_id].sr_PUCCH_ResourceIndex,
                  Po_PUCCH);
      }
      else
      {
          if (SR_payload>0) {
gabrielC's avatar
gabrielC committed
2251
              LOG_I(PHY,"[UE  %d][SR %x] AbsSubFrame %d.%d Generating PUCCH %s payload %d,%d (with SR for PUSCH), an_srs_simultanous %d, shorten_pucch %d, n1_pucch %d, Po_PUCCH %d, amp %d\n",
2252
                      Mod_id,
2253
                      ue->dlsch[ue->current_thread_id[proc->subframe_rx]][eNB_id][0]->rnti,
2254 2255 2256 2257 2258 2259 2260 2261 2262 2263
                      frame_tx % 1024, subframe_tx,
                      (format == pucch_format1a? "1a": (
                              format == pucch_format1b? "1b" : "??")),
                              pucch_ack_payload[0],pucch_ack_payload[1],
                              frame_parms->soundingrs_ul_config_common.ackNackSRS_SimultaneousTransmission,
                              isShortenPucch,
                              pucch_resource,
                              Po_PUCCH,
                              tx_amp);
          } else {
gabrielC's avatar
gabrielC committed
2264
              LOG_I(PHY,"[UE  %d][PDSCH %x] AbsSubFrame %d.%d rx_offset_diff: %d, Generating PUCCH %s, an_srs_simultanous %d, shorten_pucch %d, n1_pucch %d, b[0]=%d,b[1]=%d (SR_Payload %d), Po_PUCCH %d, amp %d\n",
2265
                      Mod_id,
2266
                      ue->dlsch[ue->current_thread_id[proc->subframe_rx]][eNB_id][0]->rnti,
2267 2268 2269 2270 2271 2272 2273 2274 2275 2276
                      frame_tx%1024, subframe_tx,ue->rx_offset_diff,
                      (format == pucch_format1a? "1a": (
                              format == pucch_format1b? "1b" : "??")),
                              frame_parms->soundingrs_ul_config_common.ackNackSRS_SimultaneousTransmission,
                              isShortenPucch,
                              pucch_resource,pucch_payload[0],pucch_payload[1],SR_payload,
                              Po_PUCCH,
                              tx_amp);
          }
      }
gabrielC's avatar
gabrielC committed
2277
#endif
2278

2279 2280 2281
#if T_TRACER
      if(pucch_payload[0])
      {
Cedric Roux's avatar
Cedric Roux committed
2282
          T(T_UE_PHY_DLSCH_UE_ACK, T_INT(eNB_id), T_INT(frame_tx%1024), T_INT(subframe_tx), T_INT(ue->dlsch[ue->current_thread_id[proc->subframe_rx]][eNB_id][0]->rnti),
2283
                  T_INT(ue->dlsch[ue->current_thread_id[proc->subframe_rx]][eNB_id][0]->current_harq_pid));
2284 2285 2286
      }
      else
      {
Cedric Roux's avatar
Cedric Roux committed
2287
          T(T_UE_PHY_DLSCH_UE_NACK, T_INT(eNB_id), T_INT(frame_tx%1024), T_INT(subframe_tx), T_INT(ue->dlsch[ue->current_thread_id[proc->subframe_rx]][eNB_id][0]->rnti),
2288
                  T_INT(ue->dlsch[ue->current_thread_id[proc->subframe_rx]][eNB_id][0]->current_harq_pid));
2289 2290
      }
#endif
2291

2292 2293 2294 2295 2296 2297 2298 2299 2300 2301 2302
      generate_pucch1x(ue->common_vars.txdataF,
		       &ue->frame_parms,
		       ue->ncs_cell,
		       format,
		       &ue->pucch_config_dedicated[eNB_id],
		       pucch_resource,
		       isShortenPucch,  // shortened format
		       pucch_payload,
		       tx_amp,
		       subframe_tx);
      
2303 2304
  }
  break;
2305

Raymond Knopp's avatar
Raymond Knopp committed
2306

2307 2308
  case pucch_format2:
  {
Raymond Knopp's avatar
Raymond Knopp committed
2309
      if (ue->mac_enabled == 1) {
2310
          Po_PUCCH = pucch_power_cntl(ue,proc,subframe_tx,eNB_id,format);
Raymond Knopp's avatar
Raymond Knopp committed
2311 2312
      }
      else {
2313
          Po_PUCCH = ue->tx_power_max_dBm;
Raymond Knopp's avatar
Raymond Knopp committed
2314 2315 2316
      }
      ue->tx_power_dBm[subframe_tx] = Po_PUCCH;
      ue->tx_total_RE[subframe_tx] = 12;
2317

Raymond Knopp's avatar
Raymond Knopp committed
2318 2319
#if defined(EXMIMO) || defined(OAI_USRP) || defined(OAI_BLADERF) || defined(OAI_LMSSDR)
      tx_amp =  get_tx_amp(Po_PUCCH,
2320 2321 2322
              ue->tx_power_max_dBm,
              ue->frame_parms.N_RB_UL,
              1);
Raymond Knopp's avatar
Raymond Knopp committed
2323 2324 2325
#else
      tx_amp = AMP;
#endif
2326
#if T_TRACER
Cedric Roux's avatar
Cedric Roux committed
2327
      T(T_UE_PHY_PUCCH_TX_POWER, T_INT(eNB_id), T_INT(frame_tx%1024), T_INT(subframe_tx),T_INT(ue->tx_power_dBm[subframe_tx]),
2328
              T_INT(tx_amp),T_INT(ue->dlsch[ue->current_thread_id[proc->subframe_rx]][eNB_id][0]->g_pucch),T_INT(get_PL(ue->Mod_id,ue->CC_id,eNB_id)));
2329
#endif
gabrielC's avatar
gabrielC committed
2330
#ifdef UE_DEBUG_TRACE
2331
      LOG_I(PHY,"[UE  %d][RNTI %x] AbsSubFrame %d.%d Generating PUCCH 2 (RI or CQI), Po_PUCCH %d, isShortenPucch %d, amp %d\n",
2332
              Mod_id,
2333
              ue->dlsch[ue->current_thread_id[proc->subframe_rx]][eNB_id][0]->rnti,
2334 2335 2336 2337
              frame_tx%1024, subframe_tx,
              Po_PUCCH,
              isShortenPucch,
              tx_amp);
gabrielC's avatar
gabrielC committed
2338
#endif
Raymond Knopp's avatar
Raymond Knopp committed
2339
      generate_pucch2x(ue->common_vars.txdataF,
2340 2341 2342 2343 2344 2345 2346 2347 2348 2349
              &ue->frame_parms,
              ue->ncs_cell,
              format,
              &ue->pucch_config_dedicated[eNB_id],
              pucch_resource,
              pucch_payload,
              len,          // A
              0,            // B2 not needed
              tx_amp,
              subframe_tx,
2350
              ue->pdcch_vars[ue->current_thread_id[proc->subframe_rx]][eNB_id]->crnti);
2351 2352 2353 2354
  }
  break;

  case pucch_format2a:
gabrielC's avatar
gabrielC committed
2355
      LOG_D(PHY,"[UE  %d][RNTI %x] AbsSubFrame %d.%d Generating PUCCH 2a (RI or CQI) Ack/Nack 1bit \n",
2356
              Mod_id,
2357
              ue->dlsch[ue->current_thread_id[proc->subframe_rx]][eNB_id][0]->rnti,
2358 2359 2360
              frame_tx%1024, subframe_tx);
      break;
  case pucch_format2b:
gabrielC's avatar
gabrielC committed
2361
      LOG_D(PHY,"[UE  %d][RNTI %x] AbsSubFrame %d.%d Generating PUCCH 2b (RI or CQI) Ack/Nack 2bits\n",
2362
              Mod_id,
2363
              ue->dlsch[ue->current_thread_id[proc->subframe_rx]][eNB_id][0]->rnti,
2364 2365 2366 2367
              frame_tx%1024, subframe_tx);
      break;
  default:
      break;
Raymond Knopp's avatar
Raymond Knopp committed
2368
  }
2369 2370 2371

  VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME(VCD_SIGNAL_DUMPER_FUNCTIONS_PHY_PROCEDURES_UE_TX_PUCCH,VCD_FUNCTION_OUT);

2372
}
2373

2374
void phy_procedures_UE_TX(PHY_VARS_UE *ue,UE_rxtx_proc_t *proc,uint8_t eNB_id,uint8_t abstraction_flag,runmode_t mode,relaying_type_t r_type) {
2375

2376

2377
  LTE_DL_FRAME_PARMS *frame_parms=&ue->frame_parms;
2378
  //int32_t ulsch_start=0;
2379 2380 2381
  int subframe_tx = proc->subframe_tx;
  int frame_tx = proc->frame_tx;
  unsigned int aa;
2382
  uint8_t isSubframeSRS;
2383

2384 2385
  uint8_t next1_thread_id = ue->current_thread_id[proc->subframe_rx]== (RX_NB_TH-1) ? 0:(ue->current_thread_id[proc->subframe_rx]+1);
  uint8_t next2_thread_id = next1_thread_id== (RX_NB_TH-1) ? 0:(next1_thread_id+1);
2386

2387
  VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME(VCD_SIGNAL_DUMPER_FUNCTIONS_PHY_PROCEDURES_UE_TX,VCD_FUNCTION_IN);
2388

2389
  LOG_D(PHY,"****** start TX-Chain for AbsSubframe %d.%d ******\n", frame_tx, subframe_tx);
2390
#if T_TRACER
hbilel's avatar
hbilel committed
2391
  T(T_UE_PHY_UL_TICK, T_INT(ue->Mod_id), T_INT(frame_tx%1024), T_INT(subframe_tx));
2392
#endif
2393

2394
  ue->generate_ul_signal[eNB_id] = 0;
gabrielC's avatar
gabrielC committed
2395
#if UE_TIMING_TRACE
2396
  start_meas(&ue->phy_proc_tx);
gabrielC's avatar
gabrielC committed
2397
#endif
2398

2399 2400
#ifdef EMOS
  //phy_procedures_emos_UE_TX(next_slot);
2401 2402
#endif

2403
  ue->tx_power_dBm[subframe_tx]=-127;
2404

2405
      
2406 2407 2408 2409
  for (aa=0; aa<frame_parms->nb_antennas_tx; aa++) {
    memset(&ue->common_vars.txdataF[aa][subframe_tx*frame_parms->ofdm_symbol_size*frame_parms->symbols_per_tti],
	   0,
	   frame_parms->ofdm_symbol_size*frame_parms->symbols_per_tti*sizeof(int32_t));
2410
  }
2411
  
2412 2413
      
  if (ue->UE_mode[eNB_id] != PRACH) {
fnabet's avatar
fnabet committed
2414
    // check cell srs subframe and ue srs subframe. This has an impact on pusch encoding
2415 2416 2417
    isSubframeSRS = is_srs_occasion_common(&ue->frame_parms,proc->frame_tx,proc->subframe_tx);

    ue_compute_srs_occasion(ue,proc,eNB_id,isSubframeSRS);
2418

2419
    ue_ulsch_uespec_procedures(ue,proc,eNB_id,abstraction_flag);
2420

2421
  }
2422

hbilel's avatar
hbilel committed
2423 2424 2425 2426 2427
  if (ue->UE_mode[eNB_id] == PUSCH) {
      // check if we need to use PUCCH 1a/1b
      ue_pucch_procedures(ue,proc,eNB_id,abstraction_flag);
      // check if we need to use SRS
      ue_srs_procedures(ue,proc,eNB_id,abstraction_flag);
2428
  } // UE_mode==PUSCH
2429

2430 2431
	
  	
2432

2433
  	
2434 2435
  ulsch_common_procedures(ue,proc, (ue->generate_ul_signal[eNB_id] == 0));
        
2436 2437
  if ((ue->UE_mode[eNB_id] == PRACH) && 
      (ue->frame_parms.prach_config_common.prach_Config_enabled==1)) {
2438

2439
    // check if we have PRACH opportunity
2440

2441
    if (is_prach_subframe(&ue->frame_parms,frame_tx,subframe_tx)) {
2442

2443
      ue_prach_procedures(ue,proc,eNB_id,abstraction_flag,mode);
2444
    }
2445 2446 2447 2448
  } // mode is PRACH
  else {
    ue->generate_prach=0;
  }
2449

2450
  // reset DL ACK/NACK status
hbilel's avatar
hbilel committed
2451
  uint8_t N_bundled = 0;
2452
  if (ue->dlsch[ue->current_thread_id[proc->subframe_rx]][eNB_id][0] != NULL)
hbilel's avatar
hbilel committed
2453
  {
2454
    reset_ack(&ue->frame_parms,
2455
               ue->dlsch[ue->current_thread_id[proc->subframe_rx]][eNB_id][0]->harq_ack,
2456
               subframe_tx,
hbilel's avatar
hbilel committed
2457 2458 2459 2460
               proc->subframe_rx,
               ue->ulsch[eNB_id]->o_ACK,
               &N_bundled,
               0);
hbilel's avatar
hbilel committed
2461
    reset_ack(&ue->frame_parms,
2462
               ue->dlsch[next1_thread_id][eNB_id][0]->harq_ack,
2463
               subframe_tx,
hbilel's avatar
hbilel committed
2464 2465 2466 2467
               proc->subframe_rx,
               ue->ulsch[eNB_id]->o_ACK,
               &N_bundled,
               0);
hbilel's avatar
hbilel committed
2468
    reset_ack(&ue->frame_parms,
2469
               ue->dlsch[next2_thread_id][eNB_id][0]->harq_ack,
hbilel's avatar
hbilel committed
2470
               subframe_tx,
hbilel's avatar
hbilel committed
2471 2472 2473 2474
               proc->subframe_rx,
               ue->ulsch[eNB_id]->o_ACK,
               &N_bundled,
               0);
hbilel's avatar
hbilel committed
2475
  }
2476

2477
  if (ue->dlsch_SI[eNB_id] != NULL)
2478
    reset_ack(&ue->frame_parms,
2479 2480
             ue->dlsch_SI[eNB_id]->harq_ack,
             subframe_tx,
hbilel's avatar
hbilel committed
2481 2482 2483 2484
             proc->subframe_rx,
             ue->ulsch[eNB_id]->o_ACK,
             &N_bundled,
             0);
2485

2486

2487 2488
  LOG_D(PHY,"****** end TX-Chain for AbsSubframe %d.%d ******\n", frame_tx, subframe_tx);

2489
  VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME(VCD_SIGNAL_DUMPER_FUNCTIONS_PHY_PROCEDURES_UE_TX, VCD_FUNCTION_OUT);
gabrielC's avatar
gabrielC committed
2490
#if UE_TIMING_TRACE
2491
  stop_meas(&ue->phy_proc_tx);
gabrielC's avatar
gabrielC committed
2492
#endif
2493 2494
}

2495
void phy_procedures_UE_S_TX(PHY_VARS_UE *ue,uint8_t eNB_id,uint8_t abstraction_flag,relaying_type_t r_type)
2496
{
2497
  int aa;//i,aa;
2498
  LTE_DL_FRAME_PARMS *frame_parms=&ue->frame_parms;
2499

2500
  
2501
  for (aa=0; aa<frame_parms->nb_antennas_tx; aa++) {
2502
#if defined(EXMIMO) //this is the EXPRESS MIMO case
2503 2504 2505 2506 2507
    int i;
    // set the whole tx buffer to RX
    for (i=0; i<LTE_NUMBER_OF_SUBFRAMES_PER_FRAME*frame_parms->samples_per_tti; i++)
      ue->common_vars.txdata[aa][i] = 0x00010001;
    
2508
#else //this is the normal case
2509 2510
    memset(&ue->common_vars.txdata[aa][0],0,
	   (LTE_NUMBER_OF_SUBFRAMES_PER_FRAME*frame_parms->samples_per_tti)*sizeof(int32_t));
2511
#endif //else EXMIMO
2512
    
2513
  }
2514
  
2515 2516
}

2517 2518 2519
void ue_measurement_procedures(
    uint16_t l,    // symbol index of each slot [0..6]
    PHY_VARS_UE *ue,UE_rxtx_proc_t *proc, uint8_t eNB_id,
2520
    uint16_t slot, // slot index of each radio frame [0..19]
2521
    uint8_t abstraction_flag,runmode_t mode)
2522
{
2523

hbilel's avatar
hbilel committed
2524
  //LOG_I(PHY,"ue_measurement_procedures l %d Ncp %d\n",l,ue->frame_parms.Ncp);
hbilel's avatar
hbilel committed
2525

2526
  LTE_DL_FRAME_PARMS *frame_parms=&ue->frame_parms;
Raymond Knopp's avatar
 
Raymond Knopp committed
2527

2528
  int subframe_rx = proc->subframe_rx;
2529

2530
  VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME(VCD_SIGNAL_DUMPER_FUNCTIONS_UE_MEASUREMENT_PROCEDURES, VCD_FUNCTION_IN);
2531 2532

  if (l==0) {
2533
    // UE measurements on symbol 0
2534

2535
    LOG_D(PHY,"Calling measurements subframe %d, rxdata %p\n",subframe_rx,ue->common_vars.rxdata);
2536
      LOG_D(PHY,"Calling measurements subframe %d, rxdata %p\n",subframe_rx,ue->common_vars.rxdata);
2537

2538
      lte_ue_measurements(ue,
2539 2540 2541 2542 2543 2544
			  (subframe_rx*frame_parms->samples_per_tti+ue->rx_offset)%(frame_parms->samples_per_tti*LTE_NUMBER_OF_SUBFRAMES_PER_FRAME),
			  (subframe_rx == 1) ? 1 : 0,
			  0,
			  0,
			  subframe_rx);
      
2545
#if T_TRACER
2546
      if(slot == 0)
Cedric Roux's avatar
Cedric Roux committed
2547
	T(T_UE_PHY_MEAS, T_INT(eNB_id), T_INT(proc->frame_rx%1024), T_INT(proc->subframe_rx),
2548 2549 2550 2551 2552 2553 2554
	  T_INT((int)(10*log10(ue->measurements.rsrp[0])-ue->rx_total_gain_dB)),
	  T_INT((int)ue->measurements.rx_rssi_dBm[0]),
	  T_INT((int)(ue->measurements.rx_power_avg_dB[0] - ue->measurements.n0_power_avg_dB)),
	  T_INT((int)ue->measurements.rx_power_avg_dB[0]),
	  T_INT((int)ue->measurements.n0_power_avg_dB),
	  T_INT((int)ue->measurements.wideband_cqi_avg[0]),
	  T_INT((int)ue->common_vars.freq_offset));
2555
#endif
2556 2557
  }

2558
  if (l==(6-ue->frame_parms.Ncp)) {
2559

2560
    // make sure we have signal from PSS/SSS for N0 measurement
2561
         // LOG_I(PHY," l==(6-ue->frame_parms.Ncp) ue_rrc_measurements\n");
2562

2563
    VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME(VCD_SIGNAL_DUMPER_FUNCTIONS_UE_RRC_MEASUREMENTS, VCD_FUNCTION_IN);
2564
    ue_rrc_measurements(ue,
2565 2566
      slot,
      abstraction_flag);
2567
    VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME(VCD_SIGNAL_DUMPER_FUNCTIONS_UE_RRC_MEASUREMENTS, VCD_FUNCTION_OUT);
2568

2569
  }
2570

2571 2572
  // accumulate and filter timing offset estimation every subframe (instead of every frame)
  if (( (slot%2) == 0) && (l==(4-frame_parms->Ncp))) {
2573

2574
    // AGC
Raymond Knopp's avatar
 
Raymond Knopp committed
2575

2576
    VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME(VCD_SIGNAL_DUMPER_FUNCTIONS_UE_GAIN_CONTROL, VCD_FUNCTION_IN);
Raymond Knopp's avatar
 
Raymond Knopp committed
2577

2578
#ifndef OAI_USRP
kaltenbe's avatar
kaltenbe committed
2579 2580
#ifndef OAI_BLADERF
#ifndef OAI_LMSSDR
2581
    phy_adjust_gain (ue,dB_fixed(ue->measurements.rssi),0);
kaltenbe's avatar
kaltenbe committed
2582 2583
#endif
#endif
Raymond Knopp's avatar
 
Raymond Knopp committed
2584
#endif
2585

2586
    VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME(VCD_SIGNAL_DUMPER_FUNCTIONS_UE_GAIN_CONTROL, VCD_FUNCTION_OUT);
2587

2588
    eNB_id = 0;
2589

2590
    
2591 2592 2593 2594 2595 2596 2597 2598
    if (ue->no_timing_correction==0)
      lte_adjust_synch(&ue->frame_parms,
		       ue,
		       eNB_id,
		       subframe_rx,
		       0,
		       16384);
 
2599
  }
2600

2601
  VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME(VCD_SIGNAL_DUMPER_FUNCTIONS_UE_MEASUREMENT_PROCEDURES, VCD_FUNCTION_OUT);
2602 2603 2604 2605
}



2606
void ue_pbch_procedures(uint8_t eNB_id,PHY_VARS_UE *ue,UE_rxtx_proc_t *proc, uint8_t abstraction_flag)
2607
{
2608 2609 2610

  //  int i;
  int pbch_tx_ant=0;
2611 2612 2613 2614
  uint8_t pbch_phase;
  uint16_t frame_tx;
  static uint8_t first_run = 1;
  uint8_t pbch_trials = 0;
2615

2616
  DevAssert(ue);
2617 2618 2619

  int frame_rx = proc->frame_rx;
  int subframe_rx = proc->subframe_rx;
2620

2621
  VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME(VCD_SIGNAL_DUMPER_FUNCTIONS_UE_PBCH_PROCEDURES, VCD_FUNCTION_IN);
2622

Raymond Knopp's avatar
 
Raymond Knopp committed
2623
  pbch_phase=(frame_rx%4);
2624

2625 2626
  if (pbch_phase>=4)
    pbch_phase=0;
2627 2628 2629

  for (pbch_trials=0; pbch_trials<4; pbch_trials++) {
    //for (pbch_phase=0;pbch_phase<4;pbch_phase++) {
2630
    //LOG_I(PHY,"[UE  %d] Frame %d, Trying PBCH %d (NidCell %d, eNB_id %d)\n",ue->Mod_id,frame_rx,pbch_phase,ue->frame_parms.Nid_cell,eNB_id);
2631

2632 2633 2634 2635 2636 2637 2638 2639
    pbch_tx_ant = rx_pbch(&ue->common_vars,
			  ue->pbch_vars[eNB_id],
			  &ue->frame_parms,
			  eNB_id,
			  ue->frame_parms.nb_antenna_ports_eNB==1?SISO:ALAMOUTI,
			  ue->high_speed_flag,
			  pbch_phase);
    
2640 2641 2642
    if ((pbch_tx_ant>0) && (pbch_tx_ant<=4)) {
      break;
    }
2643

2644
    pbch_phase++;
2645

2646 2647 2648 2649 2650 2651 2652 2653
    if (pbch_phase>=4)
      pbch_phase=0;
  }



  if ((pbch_tx_ant>0) && (pbch_tx_ant<=4)) {

2654 2655 2656 2657 2658 2659 2660 2661 2662 2663 2664
    if (opt_enabled) {
      static uint8_t dummy[3];
      dummy[0] = ue->pbch_vars[eNB_id]->decoded_output[2];
      dummy[1] = ue->pbch_vars[eNB_id]->decoded_output[1];
      dummy[2] = ue->pbch_vars[eNB_id]->decoded_output[0];
      trace_pdu(1, dummy, 3, ue->Mod_id, 0, 0,
          frame_rx, subframe_rx, 0, 0);
      LOG_D(OPT,"[UE %d][PBCH] Frame %d trace pdu for PBCH\n",
          ue->Mod_id, subframe_rx);
    }

2665
    if (pbch_tx_ant>2) {
2666
      LOG_W(PHY,"[openair][SCHED][SYNCH] PBCH decoding: pbch_tx_ant>2 not supported\n");
2667
      VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME(VCD_SIGNAL_DUMPER_FUNCTIONS_UE_PBCH_PROCEDURES, VCD_FUNCTION_OUT);
2668 2669 2670 2671
      return;
    }


2672 2673 2674
    ue->pbch_vars[eNB_id]->pdu_errors_conseq = 0;
    frame_tx = (((int)(ue->pbch_vars[eNB_id]->decoded_output[2]&0x03))<<8);
    frame_tx += ((int)(ue->pbch_vars[eNB_id]->decoded_output[1]&0xfc));
2675 2676
    frame_tx += pbch_phase;

2677
    if (ue->mac_enabled==1) {
2678

2679 2680
      dl_phy_sync_success(ue->Mod_id,frame_rx,eNB_id,
			  ue->UE_mode[eNB_id]==NOT_SYNCHED ? 1 : 0);
Florian Kaltenberger's avatar
Florian Kaltenberger committed
2681
    }
2682

2683 2684
#ifdef EMOS
    //emos_dump_UE.frame_tx = frame_tx;
2685
    //emos_dump_UE.mimo_mode = ue->pbch_vars[eNB_id]->decoded_output[1];
2686 2687 2688 2689
#endif

    if (first_run) {
      first_run = 0;
2690 2691 2692

      proc->frame_rx = (proc->frame_rx & 0xFFFFFC00) | (frame_tx & 0x000003FF);
      proc->frame_tx = proc->frame_rx;
2693

2694 2695 2696 2697
      for(int th_id=0; th_id<RX_NB_TH; th_id++)
      {
        ue->proc.proc_rxtx[th_id].frame_rx = proc->frame_rx;
        ue->proc.proc_rxtx[th_id].frame_tx = proc->frame_tx;
2698 2699 2700 2701 2702 2703 2704 2705 2706 2707

        printf("[UE %d] frame %d, subframe %d: Adjusting frame counter (PBCH ant_tx=%d, frame_tx=%d, phase %d, rx_offset %d) => new frame %d\n",
 	    ue->Mod_id,
 	    ue->proc.proc_rxtx[th_id].frame_rx,
 	    subframe_rx,
 	    pbch_tx_ant,
 	    frame_tx,
 	    pbch_phase,
 	    ue->rx_offset,
 	    proc->frame_rx);
2708
      }
2709

2710

2711
      frame_rx = proc->frame_rx;
2712

2713
    } else if (((frame_tx & 0x03FF) != (proc->frame_rx & 0x03FF))) {
2714
      //(pbch_tx_ant != ue->frame_parms.nb_antennas_tx)) {
Cedric Roux's avatar
Cedric Roux committed
2715
      LOG_D(PHY,"[UE %d] frame %d, subframe %d: Re-adjusting frame counter (PBCH ant_tx=%d, frame_rx=%d, frame%%1024=%d, phase %d).\n",
2716 2717 2718 2719 2720 2721 2722
      ue->Mod_id,
      proc->frame_rx,
      subframe_rx,
      pbch_tx_ant,
      frame_tx,
      frame_rx & 0x03FF,
      pbch_phase);
2723 2724 2725 2726 2727


      proc->frame_rx = (proc->frame_rx & 0xFFFFFC00) | (frame_tx & 0x000003FF);
      proc->frame_tx = proc->frame_rx;
      frame_rx = proc->frame_rx;
2728 2729 2730 2731 2732 2733
      
      for(int th_id=0; th_id<RX_NB_TH; th_id++)
      {
        ue->proc.proc_rxtx[th_id].frame_rx = (proc->frame_rx & 0xFFFFFC00) | (frame_tx & 0x000003FF);
        ue->proc.proc_rxtx[th_id].frame_tx = proc->frame_rx;
      }
2734

2735
    }
2736

2737
#ifdef DEBUG_PHY_PROC
2738

2739
    LOG_D(PHY,"[UE %d] frame %d, subframe %d, Received PBCH (MIB): nb_antenna_ports_eNB %d, tx_ant %d, frame_tx %d. N_RB_DL %d, phich_duration %d, phich_resource %d/6!\n",
2740 2741 2742
	  ue->Mod_id,
	  frame_rx,
	  subframe_rx,
2743
	  ue->frame_parms.nb_antenna_ports_eNB,
2744 2745 2746 2747 2748
	  pbch_tx_ant,
	  frame_tx,
	  ue->frame_parms.N_RB_DL,
	  ue->frame_parms.phich_config_common.phich_duration,
	  ue->frame_parms.phich_config_common.phich_resource);
2749
#endif
2750

2751
  } else { 
2752

2753
    /*
2754
    LOG_E(PHY,"[UE %d] frame %d, subframe %d, Error decoding PBCH!\n",
2755
    ue->Mod_id,frame_rx, subframe_rx);
2756

2757 2758 2759 2760 2761
    LOG_I(PHY,"[UE %d] rx_offset %d\n",ue->Mod_id,ue->rx_offset);


    write_output("rxsig0.m","rxs0", ue->common_vars.rxdata[0],ue->frame_parms.samples_per_tti,1,1);

2762 2763
    write_output("H00.m","h00",&(ue->common_vars.dl_ch_estimates[0][0][0]),((ue->frame_parms.Ncp==0)?7:6)*(ue->frame_parms.ofdm_symbol_size),1,1);
    write_output("H10.m","h10",&(ue->common_vars.dl_ch_estimates[0][2][0]),((ue->frame_parms.Ncp==0)?7:6)*(ue->frame_parms.ofdm_symbol_size),1,1);
2764

2765
    write_output("rxsigF0.m","rxsF0", ue->common_vars.rxdataF[0],8*ue->frame_parms.ofdm_symbol_size,1,1);
2766 2767 2768 2769 2770
    write_output("PBCH_rxF0_ext.m","pbch0_ext",ue->pbch_vars[0]->rxdataF_ext[0],12*4*6,1,1);
    write_output("PBCH_rxF0_comp.m","pbch0_comp",ue->pbch_vars[0]->rxdataF_comp[0],12*4*6,1,1);
    write_output("PBCH_rxF_llr.m","pbch_llr",ue->pbch_vars[0]->llr,(ue->frame_parms.Ncp==0) ? 1920 : 1728,1,4);
    exit(-1);
    */
2771

2772 2773
    ue->pbch_vars[eNB_id]->pdu_errors_conseq++;
    ue->pbch_vars[eNB_id]->pdu_errors++;
2774

matzakos's avatar
matzakos committed
2775
		// Panos: Substitute call to rrc_out_of_sync_ind() with fill_bch_incication(sync=0).
2776 2777 2778
    if (ue->mac_enabled == 1) rrc_out_of_sync_ind(ue->Mod_id,frame_rx,eNB_id);
    else AssertFatal(ue->pbch_vars[eNB_id]->pdu_errors_conseq<100,
		     "More that 100 consecutive PBCH errors! Exiting!\n");
2779
  }
2780
  
2781

Raymond Knopp's avatar
 
Raymond Knopp committed
2782
  if (frame_rx % 100 == 0) {
2783 2784
    ue->pbch_vars[eNB_id]->pdu_fer = ue->pbch_vars[eNB_id]->pdu_errors - ue->pbch_vars[eNB_id]->pdu_errors_last;
    ue->pbch_vars[eNB_id]->pdu_errors_last = ue->pbch_vars[eNB_id]->pdu_errors;
2785
  }
2786 2787

#ifdef DEBUG_PHY_PROC
2788
  LOG_D(PHY,"[UE %d] frame %d, slot %d, PBCH errors = %d, consecutive errors = %d!\n",
2789 2790 2791
  ue->Mod_id,frame_rx, subframe_rx,
  ue->pbch_vars[eNB_id]->pdu_errors,
  ue->pbch_vars[eNB_id]->pdu_errors_conseq);
2792
#endif
2793
  VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME(VCD_SIGNAL_DUMPER_FUNCTIONS_UE_PBCH_PROCEDURES, VCD_FUNCTION_OUT);
2794 2795
}

2796 2797 2798 2799 2800 2801 2802 2803 2804 2805 2806 2807 2808 2809 2810 2811 2812 2813 2814 2815 2816 2817 2818 2819 2820 2821 2822 2823 2824 2825 2826 2827 2828 2829 2830 2831 2832 2833 2834 2835 2836 2837 2838 2839 2840 2841 2842 2843 2844
// Panos: New function supporting the MAC interface
void fill_bch_indication(module_id_t   module_idP,
		frame_t frameP,
		unsigned char eNB_index,
		uint8_t first_sync,
		uint8_t sync)
{

}

// Panos: New function supporting the MAC interface
void fill_dlsch_indication(module_id_t module_idP,
	    uint8_t CC_id,
	    frame_t frameP,
        sub_frame_t subframeP,
	    uint8_t* sdu,
	    uint16_t sdu_len,
	    uint8_t eNB_index)
{

}

// Panos: New function supporting the MAC interface
void fill_dlsch_rar_indication(module_id_t module_idP,
		  int CC_id,
		  frame_t frameP,
		  rnti_t ra_rnti,
		  uint8_t* dlsch_buffer,
		  rnti_t* t_crnti,
		  uint8_t preamble_index,
		  uint8_t* selected_rar_buffer)
{

}

// PANOS: New function supporting the MAC interface

void fill_Tx_indication(module_id_t module_idP,uint8_t CC_id,frame_t frameP, uint8_t eNB_id, uint8_t Tx_ind_type)
{
	switch (Tx_ind_type)
	{
	case UE_MAC_Tx_IND_Msg1_TYPE:
		break;
	case UE_MAC_Tx_IND_Msg3_TYPE:
		break;
	}
}


2845
int ue_pdcch_procedures(uint8_t eNB_id,PHY_VARS_UE *ue,UE_rxtx_proc_t *proc,uint8_t abstraction_flag)
2846
{
2847 2848

  unsigned int dci_cnt=0, i;
2849

2850 2851
  int frame_rx = proc->frame_rx;
  int subframe_rx = proc->subframe_rx;
2852
  DCI_ALLOC_t dci_alloc_rx[8];
Raymond Knopp's avatar
 
Raymond Knopp committed
2853

2854 2855
  uint8_t next1_thread_id = ue->current_thread_id[subframe_rx]== (RX_NB_TH-1) ? 0:(ue->current_thread_id[subframe_rx]+1);
  uint8_t next2_thread_id = next1_thread_id== (RX_NB_TH-1) ? 0:(next1_thread_id+1);
2856

2857
  VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME(VCD_SIGNAL_DUMPER_FUNCTIONS_UE_PDCCH_PROCEDURES, VCD_FUNCTION_IN);
gabrielC's avatar
gabrielC committed
2858
#if UE_TIMING_TRACE
2859
  start_meas(&ue->dlsch_rx_pdcch_stats);
gabrielC's avatar
gabrielC committed
2860
#endif
2861

2862 2863 2864 2865 2866
  VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME(VCD_SIGNAL_DUMPER_FUNCTIONS_RX_PDCCH, VCD_FUNCTION_IN);
  rx_pdcch(ue,
	   proc->frame_rx,
	   subframe_rx,
	   eNB_id,
2867
	   ue->frame_parms.nb_antenna_ports_eNB==1?SISO:ALAMOUTI,
2868 2869 2870 2871 2872
	   ue->high_speed_flag,
	   ue->is_secondary_ue);
  
  VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME(VCD_SIGNAL_DUMPER_FUNCTIONS_RX_PDCCH, VCD_FUNCTION_OUT);
  VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME(VCD_SIGNAL_DUMPER_FUNCTIONS_DCI_DECODING, VCD_FUNCTION_IN);
2873 2874 2875 2876 2877 2878
  
  
  //printf("Decode SIB frame param agregation + DCI %d %d \n",agregationLevel,dciFormat);
  
  //agregation level == FF means no configuration on
  if(ue->pdcch_vars[ue->current_thread_id[subframe_rx]][eNB_id]->agregationLevel == 0xFF || ue->decode_SIB)
2879
    {
2880 2881 2882 2883 2884 2885
      // search all possible dcis
      dci_cnt = dci_decoding_procedure(ue,
				       dci_alloc_rx,
				       (ue->UE_mode[eNB_id] < PUSCH)? 1 : 0,  // if we're in PUSCH don't listen to common search space,
				       // later when we need paging or RA during connection, update this ...
				       eNB_id,subframe_rx);
2886
    }
2887
  else
2888
    {
2889 2890 2891 2892 2893 2894 2895 2896
      // search only preconfigured dcis
      // search C RNTI dci
      dci_cnt = dci_CRNTI_decoding_procedure(ue,
					     dci_alloc_rx,
					     ue->pdcch_vars[ue->current_thread_id[subframe_rx]][eNB_id]->dciFormat,
					     ue->pdcch_vars[ue->current_thread_id[subframe_rx]][eNB_id]->agregationLevel,
					     eNB_id,
					     subframe_rx);
2897
    }
2898
  
2899 2900 2901 2902 2903 2904 2905 2906
  VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME(VCD_SIGNAL_DUMPER_FUNCTIONS_DCI_DECODING, VCD_FUNCTION_OUT);
  //LOG_D(PHY,"[UE  %d][PUSCH] Frame %d subframe %d PHICH RX\n",ue->Mod_id,frame_rx,subframe_rx);
  
  if (is_phich_subframe(&ue->frame_parms,subframe_rx)) {
    VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME(VCD_SIGNAL_DUMPER_FUNCTIONS_RX_PHICH, VCD_FUNCTION_IN);
    rx_phich(ue,proc,
	     subframe_rx,eNB_id);
    VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME(VCD_SIGNAL_DUMPER_FUNCTIONS_RX_PHICH, VCD_FUNCTION_OUT);
2907
  }
2908
  
2909 2910 2911
  uint8_t *nCCE_current = &ue->pdcch_vars[ue->current_thread_id[subframe_rx]][eNB_id]->nCCE[subframe_rx];
  uint8_t *nCCE_dest = &ue->pdcch_vars[next1_thread_id][eNB_id]->nCCE[subframe_rx];
  uint8_t *nCCE_dest1 = &ue->pdcch_vars[next2_thread_id][eNB_id]->nCCE[subframe_rx];
2912
  memcpy(nCCE_dest, nCCE_current, sizeof(uint8_t));
2913
  memcpy(nCCE_dest1, nCCE_current, sizeof(uint8_t));
2914

2915
  LOG_D(PHY,"current_thread %d next1_thread %d next2_thread %d \n", ue->current_thread_id[subframe_rx], next1_thread_id, next2_thread_id);
2916

2917
  LOG_D(PHY,"[UE  %d] AbsSubFrame %d.%d, Mode %s: DCI found %i --> rnti %x / crnti %x : format %d\n",
hbilel's avatar
hbilel committed
2918 2919 2920
       ue->Mod_id,frame_rx%1024,subframe_rx,mode_string[ue->UE_mode[eNB_id]],
       dci_cnt,
       dci_alloc_rx[0].rnti,
2921
       ue->pdcch_vars[ue->current_thread_id[subframe_rx]][eNB_id]->crnti,
hbilel's avatar
hbilel committed
2922
       dci_alloc_rx[0].format );
2923

2924
  ue->pdcch_vars[ue->current_thread_id[subframe_rx]][eNB_id]->dci_received += dci_cnt;
2925

2926 2927 2928
  for (i=0; i<dci_cnt; i++) {


2929

2930
    if ((ue->UE_mode[eNB_id]>PRACH) &&
2931
	(dci_alloc_rx[i].rnti == ue->pdcch_vars[ue->current_thread_id[subframe_rx]][eNB_id]->crnti) &&
2932 2933
	(dci_alloc_rx[i].format != format0)) {
      
2934
      LOG_D(PHY,"[UE  %d][DCI][PDSCH %x] AbsSubframe %d.%d: format %d, num_pdcch_symbols %d, nCCE %d, total CCEs %d\n",
2935
	    ue->Mod_id,dci_alloc_rx[i].rnti,
2936
	    frame_rx%1024,subframe_rx,
2937
	    dci_alloc_rx[i].format,
2938 2939
	    ue->pdcch_vars[ue->current_thread_id[subframe_rx]][eNB_id]->num_pdcch_symbols,
	    ue->pdcch_vars[ue->current_thread_id[subframe_rx]][eNB_id]->nCCE[subframe_rx],
2940
	    get_nCCE(3,&ue->frame_parms,get_mi(&ue->frame_parms,0)));
2941
      
2942
      //dump_dci(&ue->frame_parms, &dci_alloc_rx[i]);
2943
      
2944
      if ((ue->UE_mode[eNB_id] > PRACH) &&
2945 2946
	  (generate_ue_dlsch_params_from_dci(frame_rx,
					     subframe_rx,
2947
					     (void *)&dci_alloc_rx[i].dci_pdu,
2948
					     ue->pdcch_vars[ue->current_thread_id[subframe_rx]][eNB_id]->crnti,
2949
					     dci_alloc_rx[i].format,
2950 2951 2952
					     ue->pdcch_vars[ue->current_thread_id[subframe_rx]][eNB_id],
					     ue->pdsch_vars[ue->current_thread_id[subframe_rx]][eNB_id],
					     ue->dlsch[ue->current_thread_id[subframe_rx]][eNB_id],
2953 2954
					     &ue->frame_parms,
					     ue->pdsch_config_dedicated,
2955 2956
					     SI_RNTI,
					     0,
2957
					     P_RNTI,
2958
					     ue->transmission_mode[eNB_id]<7?0:ue->transmission_mode[eNB_id],
2959
					     ue->pdcch_vars[0%RX_NB_TH][eNB_id]->crnti_is_temporary? ue->pdcch_vars[ue->current_thread_id[subframe_rx]][eNB_id]->crnti: 0)==0)) {
2960 2961 2962 2963 2964 2965 2966 2967
	
	// update TPC for PUCCH
	if((dci_alloc_rx[i].format == format1)   ||
	   (dci_alloc_rx[i].format == format1A) ||
	   (dci_alloc_rx[i].format == format1B) ||
	   (dci_alloc_rx[i].format == format2)  ||
	   (dci_alloc_rx[i].format == format2A) ||
	   (dci_alloc_rx[i].format == format2B))
hbilel's avatar
hbilel committed
2968
          {
2969 2970
            //ue->dlsch[ue->current_thread_id[subframe_rx]][eNB_id][0]->g_pucch += ue->dlsch[ue->current_thread_id[subframe_rx]][eNB_id][0]->harq_processes[ue->dlsch[ue->current_thread_id[subframe_rx]][eNB_id][0]->current_harq_pid]->delta_PUCCH;
            int32_t delta_pucch = ue->dlsch[ue->current_thread_id[subframe_rx]][eNB_id][0]->harq_processes[ue->dlsch[ue->current_thread_id[subframe_rx]][eNB_id][0]->current_harq_pid]->delta_PUCCH;
2971
            for(int th_id=0; th_id<RX_NB_TH; th_id++)
2972
	      {
2973
                ue->dlsch[th_id][eNB_id][0]->g_pucch += delta_pucch;
2974
	      }
2975
            LOG_D(PHY,"update TPC for PUCCH %d.%d / pid %d delta_PUCCH %d g_pucch %d %d \n",frame_rx, subframe_rx,ue->dlsch[ue->current_thread_id[subframe_rx]][eNB_id][0]->current_harq_pid,
2976 2977 2978 2979 2980
		  delta_pucch,
		  ue->dlsch[0][eNB_id][0]->g_pucch,
		  ue->dlsch[1][eNB_id][0]->g_pucch
		  //ue->dlsch[2][eNB_id][0]->g_pucch
		  );
hbilel's avatar
hbilel committed
2981
          }
2982
	
2983
	ue->dlsch_received[eNB_id]++;
2984
	
2985
#ifdef DEBUG_PHY_PROC
2986 2987
	LOG_D(PHY,"[UE  %d] Generated UE DLSCH C_RNTI format %d\n",ue->Mod_id,dci_alloc_rx[i].format);
	dump_dci(&ue->frame_parms, &dci_alloc_rx[i]);
2988
	LOG_D(PHY,"[UE %d] *********** dlsch->active in subframe %d=> %d\n",ue->Mod_id,subframe_rx,ue->dlsch[ue->current_thread_id[subframe_rx]][eNB_id][0]->active);
2989
#endif
2990
	
2991 2992
	// we received a CRNTI, so we're in PUSCH
	if (ue->UE_mode[eNB_id] != PUSCH) {
2993
#ifdef DEBUG_PHY_PROC
2994
	  LOG_I(PHY,"[UE  %d] Frame %d, subframe %d: Received DCI with CRNTI %x => Mode PUSCH\n",ue->Mod_id,frame_rx,subframe_rx,ue->pdcch_vars[subframe_rx&1][eNB_id]->crnti);
2995
#endif
2996
	  
2997 2998
	  //dump_dci(&ue->frame_parms, &dci_alloc_rx[i]);
	  ue->UE_mode[eNB_id] = PUSCH;
2999 3000 3001 3002
	  
	} else {
	  LOG_E(PHY,"[UE  %d] Frame %d, subframe %d: Problem in DCI!\n",ue->Mod_id,frame_rx,subframe_rx);
	  dump_dci(&ue->frame_parms, &dci_alloc_rx[i]);
3003
	}
3004
      }
3005 3006 3007
      
      else if ((dci_alloc_rx[i].rnti == SI_RNTI) &&
	       ((dci_alloc_rx[i].format == format1A) || (dci_alloc_rx[i].format == format1C))) {
3008

3009

3010
#ifdef DEBUG_PHY_PROC
3011
	LOG_I(PHY,"[UE  %d] subframe %d: Found rnti %x, format 1%s, dci_cnt %d\n",ue->Mod_id,subframe_rx,dci_alloc_rx[i].rnti,dci_alloc_rx[i].format==format1A?"A":"C",i);
3012
#endif
3013 3014 3015 3016 3017 3018 3019 3020 3021 3022 3023 3024 3025 3026 3027 3028 3029 3030 3031 3032 3033 3034 3035
	
	if (generate_ue_dlsch_params_from_dci(frame_rx,
					      subframe_rx,
					      (void *)&dci_alloc_rx[i].dci_pdu,
					      SI_RNTI,
					      dci_alloc_rx[i].format,
					      ue->pdcch_vars[ue->current_thread_id[subframe_rx]][eNB_id],
					      ue->pdsch_vars_SI[eNB_id],
					      &ue->dlsch_SI[eNB_id],
					      &ue->frame_parms,
					      ue->pdsch_config_dedicated,
					      SI_RNTI,
					      0,
					      P_RNTI,
					      ue->transmission_mode[eNB_id]<7?0:ue->transmission_mode[eNB_id],
					      0)==0) {
	  
	  ue->dlsch_SI_received[eNB_id]++;
	  
	  LOG_I(PHY,"[UE  %d] Frame %d, subframe %d : Generate UE DLSCH SI_RNTI format 1%s\n",ue->Mod_id,frame_rx,subframe_rx,dci_alloc_rx[i].format==format1A?"A":"C");
	  //dump_dci(&ue->frame_parms, &dci_alloc_rx[i]);
	
	}
3036 3037
      }
    }
3038

3039
    else if ((dci_alloc_rx[i].rnti == P_RNTI) &&
3040
       ((dci_alloc_rx[i].format == format1A) || (dci_alloc_rx[i].format == format1C))) {
3041 3042

#ifdef DEBUG_PHY_PROC
3043
      LOG_I(PHY,"[UE  %d] subframe %d: Found rnti %x, format 1%s, dci_cnt %d\n",ue->Mod_id,subframe_rx,dci_alloc_rx[i].rnti,dci_alloc_rx[i].format==format1A?"A":"C",i);
3044 3045 3046 3047 3048 3049
#endif


      if (generate_ue_dlsch_params_from_dci(frame_rx,
					    subframe_rx,
					    (void *)&dci_alloc_rx[i].dci_pdu,
3050
					    P_RNTI,
3051
					    dci_alloc_rx[i].format,
3052
					    ue->pdcch_vars[ue->current_thread_id[subframe_rx]][eNB_id],
3053
					    ue->pdsch_vars_p[eNB_id],
3054 3055 3056 3057 3058
					    &ue->dlsch_SI[eNB_id],
					    &ue->frame_parms,
					    ue->pdsch_config_dedicated,
					    SI_RNTI,
					    0,
3059
					    P_RNTI,
3060 3061
					    ue->transmission_mode[eNB_id]<7?0:ue->transmission_mode[eNB_id],
                                            0)==0) {
3062 3063 3064 3065

	ue->dlsch_p_received[eNB_id]++;
	LOG_D(PHY,"[UE  %d] Frame %d, subframe %d : Generate UE DLSCH P_RNTI format 1%s\n",ue->Mod_id,frame_rx,subframe_rx,dci_alloc_rx[i].format==format1A?"A":"C");
	//dump_dci(&ue->frame_parms, &dci_alloc_rx[i]);
3066
	
3067 3068 3069
      }
    }

3070
    else if ((ue->prach_resources[eNB_id]) &&
3071 3072
       (dci_alloc_rx[i].rnti == ue->prach_resources[eNB_id]->ra_RNTI) &&
       (dci_alloc_rx[i].format == format1A)) {
Raymond Knopp's avatar
 
Raymond Knopp committed
3073

3074
#ifdef DEBUG_PHY_PROC
3075
      LOG_I(PHY,"[UE  %d][RAPROC] subframe %d: Found RA rnti %x, format 1A, dci_cnt %d\n",ue->Mod_id,subframe_rx,dci_alloc_rx[i].rnti,i);
3076 3077 3078
#endif


3079 3080
      if (generate_ue_dlsch_params_from_dci(frame_rx,
					    subframe_rx,
3081 3082 3083
					    (DCI1A_5MHz_TDD_1_6_t *)&dci_alloc_rx[i].dci_pdu,
					    ue->prach_resources[eNB_id]->ra_RNTI,
					    format1A,
3084
					    ue->pdcch_vars[ue->current_thread_id[subframe_rx]][eNB_id],
3085
					    ue->pdsch_vars_ra[eNB_id],
3086 3087 3088 3089 3090
					    &ue->dlsch_ra[eNB_id],
					    &ue->frame_parms,
					    ue->pdsch_config_dedicated,
					    SI_RNTI,
					    ue->prach_resources[eNB_id]->ra_RNTI,
3091
					    P_RNTI,
3092 3093
					    ue->transmission_mode[eNB_id]<7?0:ue->transmission_mode[eNB_id],
                                            0)==0) {
3094
	
3095
  ue->dlsch_ra_received[eNB_id]++;
3096

3097
#ifdef DEBUG_PHY_PROC
3098 3099
  LOG_D(PHY,"[UE  %d] Generate UE DLSCH RA_RNTI format 1A, rb_alloc %x, dlsch_ra[eNB_id] %p\n",
        ue->Mod_id,ue->dlsch_ra[eNB_id]->harq_processes[0]->rb_alloc_even[0],ue->dlsch_ra[eNB_id]);
3100
#endif
3101
      }
3102
    } else if( (dci_alloc_rx[i].rnti == ue->pdcch_vars[ue->current_thread_id[subframe_rx]][eNB_id]->crnti) &&
3103
	       (dci_alloc_rx[i].format == format0)) {
3104

3105
#ifdef DEBUG_PHY_PROC
3106
      LOG_D(PHY,"[UE  %d][PUSCH] Frame %d subframe %d: Found rnti %x, format 0, dci_cnt %d\n",
3107
      ue->Mod_id,frame_rx,subframe_rx,dci_alloc_rx[i].rnti,i);
3108 3109
#endif

3110 3111
      ue->ulsch_no_allocation_counter[eNB_id] = 0;
      //dump_dci(&ue->frame_parms,&dci_alloc_rx[i]);
3112
      
3113
      if ((ue->UE_mode[eNB_id] > PRACH) &&
3114
	  (generate_ue_ulsch_params_from_dci((void *)&dci_alloc_rx[i].dci_pdu,
3115
					     ue->pdcch_vars[ue->current_thread_id[subframe_rx]][eNB_id]->crnti,
3116 3117
					     subframe_rx,
					     format0,
3118
					     ue,
3119
					     proc,
3120 3121 3122 3123 3124 3125
					     SI_RNTI,
					     0,
					     P_RNTI,
					     CBA_RNTI,
					     eNB_id,
					     0)==0)) {
3126 3127
#if T_TRACER
    LTE_DL_FRAME_PARMS *frame_parms = &ue->frame_parms;
3128 3129 3130 3131
    uint8_t harq_pid = subframe2harq_pid(frame_parms,
                                 pdcch_alloc2ul_frame(frame_parms,proc->frame_rx,proc->subframe_rx),
                                 pdcch_alloc2ul_subframe(frame_parms,proc->subframe_rx));

Cedric Roux's avatar
Cedric Roux committed
3132
    T(T_UE_PHY_ULSCH_UE_DCI, T_INT(eNB_id), T_INT(proc->frame_rx%1024), T_INT(proc->subframe_rx),
3133 3134 3135 3136 3137 3138
      T_INT(dci_alloc_rx[i].rnti), T_INT(harq_pid),
      T_INT(ue->ulsch[eNB_id]->harq_processes[harq_pid]->mcs),
      T_INT(ue->ulsch[eNB_id]->harq_processes[harq_pid]->round),
      T_INT(ue->ulsch[eNB_id]->harq_processes[harq_pid]->first_rb),
      T_INT(ue->ulsch[eNB_id]->harq_processes[harq_pid]->nb_rb),
      T_INT(ue->ulsch[eNB_id]->harq_processes[harq_pid]->TBS));
3139
#endif
3140
#ifdef DEBUG_PHY_PROC
3141
  LOG_D(PHY,"[UE  %d] Generate UE ULSCH C_RNTI format 0 (subframe %d)\n",ue->Mod_id,subframe_rx);
3142 3143
#endif

3144
      }
3145
    } else if( (dci_alloc_rx[i].rnti == ue->ulsch[eNB_id]->cba_rnti[0]) &&
3146
         (dci_alloc_rx[i].format == format0)) {
3147
      // UE could belong to more than one CBA group
3148
      // ue->Mod_id%ue->ulsch[eNB_id]->num_active_cba_groups]
3149
#ifdef DEBUG_PHY_PROC
3150
      LOG_D(PHY,"[UE  %d][PUSCH] Frame %d subframe %d: Found cba rnti %x, format 0, dci_cnt %d\n",
3151
      ue->Mod_id,frame_rx,subframe_rx,dci_alloc_rx[i].rnti,i);
3152
      /*
3153 3154
  if (((frame_rx%100) == 0) || (frame_rx < 20))
  dump_dci(&ue->frame_parms, &dci_alloc_rx[i]);
3155
      */
3156 3157
#endif

3158 3159
      ue->ulsch_no_allocation_counter[eNB_id] = 0;
      //dump_dci(&ue->frame_parms,&dci_alloc_rx[i]);
3160

3161
      if ((ue->UE_mode[eNB_id] > PRACH) &&
3162 3163 3164 3165 3166 3167 3168 3169 3170 3171 3172 3173
    (generate_ue_ulsch_params_from_dci((void *)&dci_alloc_rx[i].dci_pdu,
               ue->ulsch[eNB_id]->cba_rnti[0],
               subframe_rx,
               format0,
               ue,
               proc,
               SI_RNTI,
               0,
               P_RNTI,
               CBA_RNTI,
               eNB_id,
               0)==0)) {
3174

3175
#ifdef DEBUG_PHY_PROC
3176
  LOG_D(PHY,"[UE  %d] Generate UE ULSCH CBA_RNTI format 0 (subframe %d)\n",ue->Mod_id,subframe_rx);
3177
#endif
3178
  ue->ulsch[eNB_id]->num_cba_dci[(subframe_rx+4)%10]++;
3179 3180 3181
      }
    }

3182 3183
    else {
#ifdef DEBUG_PHY_PROC
3184 3185
      LOG_I(PHY,"[UE  %d] frame %d, subframe %d: received DCI %d with RNTI=%x (C-RNTI:%x, CBA_RNTI %x) and format %d!\n",ue->Mod_id,frame_rx,subframe_rx,i,dci_alloc_rx[i].rnti,
	    ue->pdcch_vars[ue->current_thread_id[subframe_rx]][eNB_id]->crnti,
3186 3187
	    ue->ulsch[eNB_id]->cba_rnti[0],
	    dci_alloc_rx[i].format);
3188

3189
      //      dump_dci(&ue->frame_parms, &dci_alloc_rx[i]);
3190 3191
#endif
    }
3192

3193
  }
gabrielC's avatar
gabrielC committed
3194
#if UE_TIMING_TRACE
3195
  stop_meas(&ue->dlsch_rx_pdcch_stats);
gabrielC's avatar
gabrielC committed
3196
#endif
3197
  VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME(VCD_SIGNAL_DUMPER_FUNCTIONS_UE_PDCCH_PROCEDURES, VCD_FUNCTION_OUT);
3198 3199 3200
  return(0);
}

3201

3202
void ue_pmch_procedures(PHY_VARS_UE *ue, UE_rxtx_proc_t *proc,int eNB_id,int abstraction_flag) {
3203

3204
  int subframe_rx = proc->subframe_rx;
3205
  int frame_rx = proc->frame_rx;
3206
  int pmch_mcs=-1;
Cedric Roux's avatar
Cedric Roux committed
3207
#if defined(Rel10) || defined(Rel14)
3208
  int CC_id = ue->CC_id;
Cedric Roux's avatar
Cedric Roux committed
3209
#endif
3210 3211 3212 3213
  uint8_t sync_area=255;
  uint8_t mcch_active;
  int l;
  int ret=0;
Raymond Knopp's avatar
 
Raymond Knopp committed
3214

3215 3216
  if (is_pmch_subframe(frame_rx,subframe_rx,&ue->frame_parms)) {
    LOG_D(PHY,"ue calling pmch subframe ..\n ");
3217

3218
    LOG_D(PHY,"[UE %d] Frame %d, subframe %d: Querying for PMCH demodulation\n",
3219
    ue->Mod_id,(subframe_rx==9?-1:0)+frame_rx,subframe_rx);
Cedric Roux's avatar
Cedric Roux committed
3220
#if defined(Rel10) || defined(Rel14)
3221

3222 3223 3224 3225 3226 3227 3228
    pmch_mcs = ue_query_mch(ue->Mod_id,
			    CC_id,
			    frame_rx,
			    subframe_rx,
			    eNB_id,
			    &sync_area,
			    &mcch_active);
3229 3230 3231
    
#else
    pmch_mcs=-1;
3232
#endif
3233

3234 3235 3236
    if (pmch_mcs>=0) {
      LOG_D(PHY,"[UE %d] Frame %d, subframe %d: Programming PMCH demodulation for mcs %d\n",ue->Mod_id,frame_rx,subframe_rx,pmch_mcs);
      fill_UE_dlsch_MCH(ue,pmch_mcs,1,0,0);
3237

3238
      
3239
      for (l=2; l<12; l++) {
3240
	
3241 3242 3243 3244 3245 3246 3247 3248 3249 3250 3251
	slot_fep_mbsfn(ue,
		       l,
		       subframe_rx,
		       0,0);//ue->rx_offset,0);
      }
      
      for (l=2; l<12; l++) {
	rx_pmch(ue,
		0,
		subframe_rx,
		l);
3252 3253
      }
      
3254 3255 3256 3257 3258 3259 3260 3261 3262 3263 3264 3265 3266 3267 3268 3269 3270 3271 3272 3273 3274 3275 3276 3277
      
      ue->dlsch_MCH[0]->harq_processes[0]->G = get_G(&ue->frame_parms,
						     ue->dlsch_MCH[0]->harq_processes[0]->nb_rb,
						     ue->dlsch_MCH[0]->harq_processes[0]->rb_alloc_even,
						     ue->dlsch_MCH[0]->harq_processes[0]->Qm,
						     1,
						     2,
						     frame_rx,
						     subframe_rx,
						     0);
      
      dlsch_unscrambling(&ue->frame_parms,1,ue->dlsch_MCH[0],
			 ue->dlsch_MCH[0]->harq_processes[0]->G,
			 ue->pdsch_vars_MCH[0]->llr[0],0,subframe_rx<<1);
      
      ret = dlsch_decoding(ue,
			   ue->pdsch_vars_MCH[0]->llr[0],
			   &ue->frame_parms,
			   ue->dlsch_MCH[0],
			   ue->dlsch_MCH[0]->harq_processes[0],
			   frame_rx,
			   subframe_rx,
			   0,
			   0,1);
3278 3279 3280 3281 3282 3283 3284 3285 3286 3287 3288 3289
      if (mcch_active == 1)
	ue->dlsch_mcch_trials[sync_area][0]++;
      else
	ue->dlsch_mtch_trials[sync_area][0]++;
      
      if (ret == (1+ue->dlsch_MCH[0]->max_turbo_iterations)) {
	if (mcch_active == 1)
	  ue->dlsch_mcch_errors[sync_area][0]++;
	else
	  ue->dlsch_mtch_errors[sync_area][0]++;
	
	LOG_D(PHY,"[UE %d] Frame %d, subframe %d: PMCH in error (%d,%d), not passing to L2 (TBS %d, iter %d,G %d)\n",
Cedric Roux's avatar
Cedric Roux committed
3290 3291
	      ue->Mod_id,
              frame_rx,subframe_rx,
3292 3293 3294 3295 3296 3297
	      ue->dlsch_mcch_errors[sync_area][0],
	      ue->dlsch_mtch_errors[sync_area][0],
	      ue->dlsch_MCH[0]->harq_processes[0]->TBS>>3,
	      ue->dlsch_MCH[0]->max_turbo_iterations,
	      ue->dlsch_MCH[0]->harq_processes[0]->G);
	dump_mch(ue,0,ue->dlsch_MCH[0]->harq_processes[0]->G,subframe_rx);
3298
#ifdef DEBUG_DLSCH
3299 3300 3301
	
	for (int i=0; i<ue->dlsch_MCH[0]->harq_processes[0]->TBS>>3; i++) {
	  LOG_T(PHY,"%02x.",ue->dlsch_MCH[0]->harq_processes[0]->c[0][i]);
3302
	}
3303 3304
	
	LOG_T(PHY,"\n");
3305
#endif
3306
	
3307
	
3308 3309
	//	if (subframe_rx==9)
	//  mac_xface->macphy_exit("Why are we exiting here?");
3310
      } else { // decoding successful
Cedric Roux's avatar
Cedric Roux committed
3311
#if defined(Rel10) || defined(Rel14)
3312 3313
	
	if (mcch_active == 1) {
3314 3315 3316 3317 3318 3319 3320
	  ue_send_mch_sdu(ue->Mod_id,
			  CC_id,
			  frame_rx,
			  ue->dlsch_MCH[0]->harq_processes[0]->b,
			  ue->dlsch_MCH[0]->harq_processes[0]->TBS>>3,
			  eNB_id,// not relevant in eMBMS context
			  sync_area);
3321 3322 3323 3324 3325 3326 3327 3328
	  ue->dlsch_mcch_received[sync_area][0]++;
	  
	  
	  if (ue->dlsch_mch_received_sf[subframe_rx%5][0] == 1 ) {
	    ue->dlsch_mch_received_sf[subframe_rx%5][0]=0;
	  } else {
	    ue->dlsch_mch_received[0]+=1;
	    ue->dlsch_mch_received_sf[subframe_rx][0]=1;
3329
	  }
3330 3331 3332
	  
	  
	}
3333

Cedric Roux's avatar
Cedric Roux committed
3334
#endif // Rel10 || Rel14
3335 3336 3337 3338
      } // decoding sucessful
    } // pmch_mcs>=0
  } // is_pmch_subframe=true
}
3339

3340 3341 3342 3343 3344 3345 3346 3347 3348 3349 3350 3351 3352 3353 3354 3355 3356 3357 3358 3359 3360 3361 3362 3363 3364 3365 3366 3367 3368 3369 3370 3371 3372 3373 3374 3375 3376 3377 3378 3379 3380 3381
void copy_harq_proc_struct(LTE_DL_UE_HARQ_t *harq_processes_dest, LTE_DL_UE_HARQ_t *current_harq_processes)
{
      harq_processes_dest->B              = current_harq_processes->B              ;
      harq_processes_dest->C              = current_harq_processes->C              ;
      harq_processes_dest->Cminus         = current_harq_processes->Cminus         ;
      harq_processes_dest->Cplus          = current_harq_processes->Cplus          ;
      harq_processes_dest->DCINdi         = current_harq_processes->DCINdi         ;
      harq_processes_dest->F              = current_harq_processes->F              ;
      harq_processes_dest->G              = current_harq_processes->G              ;
      harq_processes_dest->Kminus         = current_harq_processes->Kminus         ;
      harq_processes_dest->Kplus          = current_harq_processes->Kplus          ;
      harq_processes_dest->Nl             = current_harq_processes->Nl             ;
      harq_processes_dest->Qm             = current_harq_processes->Qm             ;
      harq_processes_dest->TBS            = current_harq_processes->TBS            ;
      harq_processes_dest->b              = current_harq_processes->b              ;
      harq_processes_dest->codeword       = current_harq_processes->codeword       ;
      harq_processes_dest->delta_PUCCH    = current_harq_processes->delta_PUCCH    ;
      harq_processes_dest->dl_power_off   = current_harq_processes->dl_power_off   ;
      harq_processes_dest->first_tx       = current_harq_processes->first_tx       ;
      harq_processes_dest->mcs            = current_harq_processes->mcs            ;
      harq_processes_dest->mimo_mode      = current_harq_processes->mimo_mode      ;
      harq_processes_dest->nb_rb          = current_harq_processes->nb_rb          ;
      harq_processes_dest->pmi_alloc      = current_harq_processes->pmi_alloc      ;
      harq_processes_dest->rb_alloc_even[0]  = current_harq_processes->rb_alloc_even[0] ;
      harq_processes_dest->rb_alloc_even[1]  = current_harq_processes->rb_alloc_even[1] ;
      harq_processes_dest->rb_alloc_even[2]  = current_harq_processes->rb_alloc_even[2] ;
      harq_processes_dest->rb_alloc_even[3]  = current_harq_processes->rb_alloc_even[3] ;
      harq_processes_dest->rb_alloc_odd[0]  = current_harq_processes->rb_alloc_odd[0]  ;
      harq_processes_dest->rb_alloc_odd[1]  = current_harq_processes->rb_alloc_odd[1]  ;
      harq_processes_dest->rb_alloc_odd[2]  = current_harq_processes->rb_alloc_odd[2]  ;
      harq_processes_dest->rb_alloc_odd[3]  = current_harq_processes->rb_alloc_odd[3]  ;
      harq_processes_dest->round          = current_harq_processes->round          ;
      harq_processes_dest->rvidx          = current_harq_processes->rvidx          ;
      harq_processes_dest->status         = current_harq_processes->status         ;
      harq_processes_dest->vrb_type       = current_harq_processes->vrb_type       ;
}

void copy_ack_struct(harq_status_t *harq_ack_dest, harq_status_t *current_harq_ack)
{
    memcpy(harq_ack_dest, current_harq_ack, sizeof(harq_status_t));
}

3382
void ue_pdsch_procedures(PHY_VARS_UE *ue, UE_rxtx_proc_t *proc, int eNB_id, PDSCH_t pdsch, LTE_UE_DLSCH_t *dlsch0, LTE_UE_DLSCH_t *dlsch1, int s0, int s1, int abstraction_flag) {
3383

3384 3385 3386 3387 3388
  int subframe_rx = proc->subframe_rx;
  int m;
  int harq_pid;
  int i_mod,eNB_id_i,dual_stream_UE;
  int first_symbol_flag=0;
3389

3390 3391
  if (dlsch0->active == 0)
    return;
3392

3393
  for (m=s0;m<=s1;m++) {
3394

3395 3396
    if (dlsch0 && (!dlsch1))  {
      harq_pid = dlsch0->current_harq_pid;
hbilel's avatar
hbilel committed
3397
      LOG_D(PHY,"[UE %d] PDSCH active in subframe %d, harq_pid %d Symbol %d\n",ue->Mod_id,subframe_rx,harq_pid,m);
3398

3399 3400 3401 3402 3403 3404 3405
      if ((pdsch==PDSCH) &&
          (ue->transmission_mode[eNB_id] == 5) &&
          (dlsch0->harq_processes[harq_pid]->dl_power_off==0) &&
          (ue->use_ia_receiver ==1)) {
        dual_stream_UE = 1;
        eNB_id_i = ue->n_connected_eNB;
        i_mod =  dlsch0->harq_processes[harq_pid]->Qm;
3406

hbilel's avatar
hbilel committed
3407 3408 3409 3410 3411 3412 3413 3414
      }
      else if((pdsch==PDSCH) && (ue->transmission_mode[eNB_id]==3))
      {
          dual_stream_UE = rx_IC_dual_stream;
          eNB_id_i       = eNB_id;
          i_mod          = 0;
      }
      else {
3415 3416 3417
        dual_stream_UE = 0;
        eNB_id_i = eNB_id+1;
        i_mod = 0;
3418
      }
3419

3420 3421 3422
      //TM7 UE specific channel estimation here!!!
      if (ue->transmission_mode[eNB_id]==7) {
        if (ue->frame_parms.Ncp==0) {
Xiwen JIANG's avatar
Xiwen JIANG committed
3423
          if ((m==3) || (m==6) || (m==9) || (m==12))
3424 3425
            //LOG_D(PHY,"[UE %d] dlsch->active in subframe %d => %d, l=%d\n",phy_vars_ue->Mod_id,subframe_rx,phy_vars_ue->dlsch_ue[eNB_id][0]->active, l);
            lte_dl_bf_channel_estimation(ue,eNB_id,0,subframe_rx*2+(m>6?1:0),5,m);
3426
        } else {
3427
          LOG_E(PHY,"[UE %d]Beamforming channel estimation not supported yet for TM7 extented CP.\n",ue->Mod_id);
3428
        }
3429
      }
3430

3431
      if ((m==s0) && (m<4))
3432
          first_symbol_flag = 1;
3433
      else
3434
          first_symbol_flag = 0;
gabrielC's avatar
gabrielC committed
3435
#if UE_TIMING_TRACE
3436 3437 3438
      uint8_t slot = 0;
      if(m >= ue->frame_parms.symbols_per_tti>>1)
        slot = 1;
tct-labo4's avatar
tct-labo4 committed
3439
      start_meas(&ue->dlsch_llr_stats_parallelization[ue->current_thread_id[subframe_rx]][slot]);
gabrielC's avatar
gabrielC committed
3440
#endif
3441 3442 3443 3444 3445
      // process DLSCH received in first slot
      rx_pdsch(ue,
	       pdsch,
	       eNB_id,
	       eNB_id_i,
3446
	       proc->frame_rx,
3447 3448 3449 3450 3451 3452
	       subframe_rx,  // subframe,
	       m,
	       first_symbol_flag,
	       dual_stream_UE,
	       i_mod,
	       dlsch0->current_harq_pid);
gabrielC's avatar
gabrielC committed
3453
#if UE_TIMING_TRACE
tct-labo4's avatar
tct-labo4 committed
3454
      stop_meas(&ue->dlsch_llr_stats_parallelization[ue->current_thread_id[subframe_rx]][slot]);
3455
#if DISABLE_LOG_X
tct-labo4's avatar
tct-labo4 committed
3456
    printf("[AbsSFN %d.%d] LLR Computation Symbol %d %5.2f \n",proc->frame_rx,subframe_rx,m,ue->dlsch_llr_stats_parallelization[ue->current_thread_id[subframe_rx]][slot].p_time/(cpuf*1000.0));
3457
#else
tct-labo4's avatar
tct-labo4 committed
3458
    LOG_D(PHY, "[AbsSFN %d.%d] LLR Computation Symbol %d %5.2f \n",proc->frame_rx,subframe_rx,m,ue->dlsch_llr_stats_parallelization[ue->current_thread_id[subframe_rx]][slot].p_time/(cpuf*1000.0));
gabrielC's avatar
gabrielC committed
3459
#endif
3460 3461
#endif

3462

3463 3464 3465 3466
      if(first_symbol_flag)
      {
          proc->first_symbol_available = 1;
      }
3467
    } // CRNTI active
3468
  }
3469
}
3470

3471
void process_rar(PHY_VARS_UE *ue, UE_rxtx_proc_t *proc, int eNB_id, runmode_t mode, int abstraction_flag) {
3472

3473 3474 3475 3476 3477 3478
  int frame_rx = proc->frame_rx;
  int subframe_rx = proc->subframe_rx;
  int timing_advance;
  LTE_UE_DLSCH_t *dlsch0 = ue->dlsch_ra[eNB_id];
  int harq_pid = 0;
  uint8_t *rar;
3479 3480
  uint8_t next1_thread_id = ue->current_thread_id[subframe_rx]== (RX_NB_TH-1) ? 0:(ue->current_thread_id[subframe_rx]+1);
  uint8_t next2_thread_id = next1_thread_id== (RX_NB_TH-1) ? 0:(next1_thread_id+1);
3481

3482
  LOG_D(PHY,"[UE  %d][RAPROC] Frame %d subframe %d Received RAR  mode %d\n",
3483 3484 3485 3486 3487
  ue->Mod_id,
  frame_rx,
  subframe_rx, ue->UE_mode[eNB_id]);


3488
  if (ue->mac_enabled == 1) {
3489 3490
    if ((ue->UE_mode[eNB_id] != PUSCH) &&
  (ue->prach_resources[eNB_id]->Msg3!=NULL)) {
3491 3492 3493 3494 3495
      LOG_D(PHY,"[UE  %d][RAPROC] Frame %d subframe %d Invoking MAC for RAR (current preamble %d)\n",
	    ue->Mod_id,frame_rx,
	    subframe_rx,
	    ue->prach_resources[eNB_id]->ra_PreambleIndex);
      
3496
      // Panos: Substitute call to ue_process_rar() with call to fill_dlsch_rar_indication()
3497 3498 3499 3500 3501
      timing_advance = ue_process_rar(ue->Mod_id,
				      ue->CC_id,
				      frame_rx,
				      ue->prach_resources[eNB_id]->ra_RNTI,
				      dlsch0->harq_processes[0]->b,
3502
				      &ue->pdcch_vars[ue->current_thread_id[subframe_rx]][eNB_id]->crnti,
3503 3504 3505
				      ue->prach_resources[eNB_id]->ra_PreambleIndex,
				      dlsch0->harq_processes[0]->b); // alter the 'b' buffer so it contains only the selected RAR header and RAR payload
      
3506 3507
      ue->pdcch_vars[next1_thread_id][eNB_id]->crnti = ue->pdcch_vars[ue->current_thread_id[subframe_rx]][eNB_id]->crnti;
      ue->pdcch_vars[next2_thread_id][eNB_id]->crnti = ue->pdcch_vars[ue->current_thread_id[subframe_rx]][eNB_id]->crnti;
3508

3509 3510
      
      if (timing_advance!=0xffff) {
3511

3512
              LOG_D(PHY,"[UE  %d][RAPROC] Frame %d subframe %d Got rnti %x and timing advance %d from RAR\n",
3513 3514 3515
              ue->Mod_id,
              frame_rx,
              subframe_rx,
3516
              ue->pdcch_vars[ue->current_thread_id[subframe_rx]][eNB_id]->crnti,
3517
              timing_advance);
3518

3519
	      // remember this c-rnti is still a tc-rnti
3520
	      
3521
	      ue->pdcch_vars[ue->current_thread_id[subframe_rx]][eNB_id]->crnti_is_temporary = 1;
3522
	      
3523 3524
	      //timing_advance = 0;
	      process_timing_advance_rar(ue,proc,timing_advance);
3525
	      
3526 3527 3528 3529 3530 3531 3532 3533 3534 3535 3536 3537 3538 3539 3540 3541 3542 3543 3544 3545 3546 3547 3548 3549
	      if (mode!=debug_prach) {
		ue->ulsch_Msg3_active[eNB_id]=1;
		get_Msg3_alloc(&ue->frame_parms,
			       subframe_rx,
			       frame_rx,
			       &ue->ulsch_Msg3_frame[eNB_id],
			       &ue->ulsch_Msg3_subframe[eNB_id]);
		
		LOG_D(PHY,"[UE  %d][RAPROC] Got Msg3_alloc Frame %d subframe %d: Msg3_frame %d, Msg3_subframe %d\n",
		      ue->Mod_id,
		      frame_rx,
		      subframe_rx,
		      ue->ulsch_Msg3_frame[eNB_id],
		      ue->ulsch_Msg3_subframe[eNB_id]);
		harq_pid = subframe2harq_pid(&ue->frame_parms,
					     ue->ulsch_Msg3_frame[eNB_id],
					     ue->ulsch_Msg3_subframe[eNB_id]);
		ue->ulsch[eNB_id]->harq_processes[harq_pid]->round = 0;
		
		ue->UE_mode[eNB_id] = RA_RESPONSE;
		//      ue->Msg3_timer[eNB_id] = 10;
		ue->ulsch[eNB_id]->power_offset = 6;
		ue->ulsch_no_allocation_counter[eNB_id] = 0;
	      }
3550 3551 3552 3553
      } else { // PRACH preamble doesn't match RAR
	LOG_W(PHY,"[UE  %d][RAPROC] Received RAR preamble (%d) doesn't match !!!\n",
	      ue->Mod_id,
	      ue->prach_resources[eNB_id]->ra_PreambleIndex);
3554
      }
3555 3556 3557 3558 3559 3560 3561 3562 3563
    } // mode != PUSCH
  }
  else {
    rar = dlsch0->harq_processes[0]->b+1;
    timing_advance = ((((uint16_t)(rar[0]&0x7f))<<4) + (rar[1]>>4));
    process_timing_advance_rar(ue,proc,timing_advance);
  }
  
}
3564

3565 3566 3567 3568 3569 3570 3571 3572 3573
void ue_dlsch_procedures(PHY_VARS_UE *ue,
       UE_rxtx_proc_t *proc,
       int eNB_id,
       PDSCH_t pdsch,
       LTE_UE_DLSCH_t *dlsch0,
       LTE_UE_DLSCH_t *dlsch1,
       int *dlsch_errors,
       runmode_t mode,
       int abstraction_flag) {
3574

3575 3576 3577
  int harq_pid;
  int frame_rx = proc->frame_rx;
  int subframe_rx = proc->subframe_rx;
hbilel's avatar
hbilel committed
3578
  int ret=0, ret1=0;
3579 3580
  int CC_id = ue->CC_id;
  LTE_UE_PDSCH *pdsch_vars;
hbilel's avatar
hbilel committed
3581 3582 3583 3584 3585
  uint8_t is_cw0_active = 0;
  uint8_t is_cw1_active = 0;

  if (dlsch0==NULL)
      AssertFatal(0,"dlsch0 should be defined at this level \n");
3586

hbilel's avatar
hbilel committed
3587 3588 3589 3590 3591 3592 3593 3594
  harq_pid = dlsch0->current_harq_pid;
  is_cw0_active = dlsch0->harq_processes[harq_pid]->status;

  if(dlsch1)
    is_cw1_active = dlsch1->harq_processes[harq_pid]->status;

  LOG_D(PHY,"AbsSubframe %d.%d Start Turbo Decoder for CW0 [harq_pid %d] ? %d \n", frame_rx%1024, subframe_rx, harq_pid, is_cw0_active);
  LOG_D(PHY,"AbsSubframe %d.%d Start Turbo Decoder for CW1 [harq_pid %d] ? %d \n", frame_rx%1024, subframe_rx, harq_pid, is_cw1_active);
3595

hbilel's avatar
hbilel committed
3596 3597 3598 3599 3600 3601 3602 3603 3604 3605
  if(is_cw0_active && is_cw1_active)
  {
      dlsch0->Kmimo = 2;
      dlsch1->Kmimo = 2;
  }
  else
  {
      dlsch0->Kmimo = 1;
  }
  if (1) {
3606 3607 3608 3609 3610 3611 3612
    switch (pdsch) {
    case SI_PDSCH:
      pdsch_vars = ue->pdsch_vars_SI[eNB_id];
      break;
    case RA_PDSCH:
      pdsch_vars = ue->pdsch_vars_ra[eNB_id];
      break;
3613 3614 3615
    case P_PDSCH:
      pdsch_vars = ue->pdsch_vars_p[eNB_id];
      break;
3616
    case PDSCH:
3617
      pdsch_vars = ue->pdsch_vars[ue->current_thread_id[subframe_rx]][eNB_id];
3618 3619 3620 3621 3622 3623 3624
      break;
    case PMCH:
    case PDSCH1:
      LOG_E(PHY,"Illegal PDSCH %d for ue_pdsch_procedures\n",pdsch);
      pdsch_vars = NULL;
      return;
      break;
3625 3626 3627 3628 3629
    default:
      pdsch_vars = NULL;
      return;
      break;

3630 3631 3632
    }
    if (frame_rx < *dlsch_errors)
      *dlsch_errors=0;
3633

3634
    if (pdsch==RA_PDSCH) {
3635
      
3636
      if (ue->prach_resources[eNB_id]!=NULL)
3637
	dlsch0->rnti = ue->prach_resources[eNB_id]->ra_RNTI;
3638
      else {
3639 3640
	LOG_E(PHY,"[UE %d] Frame %d, subframe %d: FATAL, prach_resources is NULL\n",ue->Mod_id,frame_rx,subframe_rx);
	AssertFatal(1==0,"prach_resources is NULL");
3641 3642
      }
    }
3643
    
3644
    if (abstraction_flag == 0) {
3645
      
hbilel's avatar
hbilel committed
3646
      // start turbo decode for CW 0
3647 3648 3649 3650 3651
      dlsch0->harq_processes[harq_pid]->G = get_G(&ue->frame_parms,
						  dlsch0->harq_processes[harq_pid]->nb_rb,
						  dlsch0->harq_processes[harq_pid]->rb_alloc_even,
						  dlsch0->harq_processes[harq_pid]->Qm,
						  dlsch0->harq_processes[harq_pid]->Nl,
3652
						  ue->pdcch_vars[ue->current_thread_id[subframe_rx]][eNB_id]->num_pdcch_symbols,
3653 3654 3655
						  frame_rx,
						  subframe_rx,
						  ue->transmission_mode[eNB_id]<7?0:ue->transmission_mode[eNB_id]);
gabrielC's avatar
gabrielC committed
3656
#if UE_TIMING_TRACE
3657
      start_meas(&ue->dlsch_unscrambling_stats);
hbilel's avatar
hbilel committed
3658
#endif
3659 3660
      dlsch_unscrambling(&ue->frame_parms,
			 0,
3661
			 dlsch0,
3662 3663 3664 3665
			 dlsch0->harq_processes[harq_pid]->G,
			 pdsch_vars->llr[0],
			 0,
			 subframe_rx<<1);
gabrielC's avatar
gabrielC committed
3666
#if UE_TIMING_TRACE
3667
      stop_meas(&ue->dlsch_unscrambling_stats);
gabrielC's avatar
gabrielC committed
3668
#endif
3669
      
hbilel's avatar
hbilel committed
3670 3671 3672 3673 3674 3675 3676 3677
#if 0
      LOG_I(PHY," ------ start turbo decoder for AbsSubframe %d.%d / %d  ------  \n", frame_rx, subframe_rx, harq_pid);
      LOG_I(PHY,"start turbo decode for CW 0 for AbsSubframe %d.%d / %d --> nb_rb %d \n", frame_rx, subframe_rx, harq_pid, dlsch0->harq_processes[harq_pid]->nb_rb);
      LOG_I(PHY,"start turbo decode for CW 0 for AbsSubframe %d.%d / %d  --> rb_alloc_even %x \n", frame_rx, subframe_rx, harq_pid, dlsch0->harq_processes[harq_pid]->rb_alloc_even);
      LOG_I(PHY,"start turbo decode for CW 0 for AbsSubframe %d.%d / %d  --> Qm %d \n", frame_rx, subframe_rx, harq_pid, dlsch0->harq_processes[harq_pid]->Qm);
      LOG_I(PHY,"start turbo decode for CW 0 for AbsSubframe %d.%d / %d  --> Nl %d \n", frame_rx, subframe_rx, harq_pid, dlsch0->harq_processes[harq_pid]->Nl);
      LOG_I(PHY,"start turbo decode for CW 0 for AbsSubframe %d.%d / %d  --> G  %d \n", frame_rx, subframe_rx, harq_pid, dlsch0->harq_processes[harq_pid]->G);
      LOG_I(PHY,"start turbo decode for CW 0 for AbsSubframe %d.%d / %d  --> Kmimo  %d \n", frame_rx, subframe_rx, harq_pid, dlsch0->Kmimo);
3678
      LOG_I(PHY,"start turbo decode for CW 0 for AbsSubframe %d.%d / %d  --> Pdcch Sym  %d \n", frame_rx, subframe_rx, harq_pid, ue->pdcch_vars[ue->current_thread_id[subframe_rx]][eNB_id]->num_pdcch_symbols);
hbilel's avatar
hbilel committed
3679
#endif
3680
      
gabrielC's avatar
gabrielC committed
3681
#if UE_TIMING_TRACE
3682
      start_meas(&ue->dlsch_decoding_stats[ue->current_thread_id[subframe_rx]]);
gabrielC's avatar
gabrielC committed
3683
#endif
3684 3685 3686 3687 3688
      ret = dlsch_decoding(ue,
			   pdsch_vars->llr[0],
			   &ue->frame_parms,
			   dlsch0,
			   dlsch0->harq_processes[harq_pid],
3689
			   frame_rx,
3690 3691 3692
			   subframe_rx,
			   harq_pid,
			   pdsch==PDSCH?1:0,
3693
			   dlsch0->harq_processes[harq_pid]->TBS>256?1:0);
3694
      
3695
#if UE_TIMING_TRACE
3696
      stop_meas(&ue->dlsch_decoding_stats[ue->current_thread_id[subframe_rx]]);
Cedric Roux's avatar
Cedric Roux committed
3697
#if DISABLE_LOG_X
gabrielC's avatar
gabrielC committed
3698
      printf(" --> Unscrambling for CW0 %5.3f\n",
3699
	     (ue->dlsch_unscrambling_stats.p_time)/(cpuf*1000.0));
gabrielC's avatar
gabrielC committed
3700
      printf("AbsSubframe %d.%d --> Turbo Decoding for CW0 %5.3f\n",
3701
	     frame_rx%1024, subframe_rx,(ue->dlsch_decoding_stats[ue->current_thread_id[subframe_rx]].p_time)/(cpuf*1000.0));
Cedric Roux's avatar
Cedric Roux committed
3702 3703
#else
      LOG_D(PHY, " --> Unscrambling for CW0 %5.3f\n",
3704
	    (ue->dlsch_unscrambling_stats.p_time)/(cpuf*1000.0));
Cedric Roux's avatar
Cedric Roux committed
3705
      LOG_D(PHY, "AbsSubframe %d.%d --> Turbo Decoding for CW0 %5.3f\n",
3706
	    frame_rx%1024, subframe_rx,(ue->dlsch_decoding_stats[ue->current_thread_id[subframe_rx]].p_time)/(cpuf*1000.0));
Cedric Roux's avatar
Cedric Roux committed
3707
#endif
3708
      
gabrielC's avatar
gabrielC committed
3709
#endif
hbilel's avatar
hbilel committed
3710
      if(is_cw1_active)
3711
	{
hbilel's avatar
hbilel committed
3712 3713
          // start turbo decode for CW 1
          dlsch1->harq_processes[harq_pid]->G = get_G(&ue->frame_parms,
3714 3715 3716 3717 3718 3719 3720 3721
						      dlsch1->harq_processes[harq_pid]->nb_rb,
						      dlsch1->harq_processes[harq_pid]->rb_alloc_even,
						      dlsch1->harq_processes[harq_pid]->Qm,
						      dlsch1->harq_processes[harq_pid]->Nl,
						      ue->pdcch_vars[ue->current_thread_id[subframe_rx]][eNB_id]->num_pdcch_symbols,
						      frame_rx,
						      subframe_rx,
						      ue->transmission_mode[eNB_id]<7?0:ue->transmission_mode[eNB_id]);
gabrielC's avatar
gabrielC committed
3722
#if UE_TIMING_TRACE
hbilel's avatar
hbilel committed
3723
          start_meas(&ue->dlsch_unscrambling_stats);
gabrielC's avatar
gabrielC committed
3724
#endif
hbilel's avatar
hbilel committed
3725
          dlsch_unscrambling(&ue->frame_parms,
3726 3727 3728 3729 3730 3731
			     0,
			     dlsch1,
			     dlsch1->harq_processes[harq_pid]->G,
			     pdsch_vars->llr[1],
			     1,
			     subframe_rx<<1);
gabrielC's avatar
gabrielC committed
3732
#if UE_TIMING_TRACE
hbilel's avatar
hbilel committed
3733
          stop_meas(&ue->dlsch_unscrambling_stats);
gabrielC's avatar
gabrielC committed
3734
#endif
3735
	  
hbilel's avatar
hbilel committed
3736 3737 3738 3739 3740 3741 3742
#if 0
          LOG_I(PHY,"start turbo decode for CW 1 for AbsSubframe %d.%d / %d --> nb_rb %d \n", frame_rx, subframe_rx, harq_pid, dlsch1->harq_processes[harq_pid]->nb_rb);
          LOG_I(PHY,"start turbo decode for CW 1 for AbsSubframe %d.%d / %d  --> rb_alloc_even %x \n", frame_rx, subframe_rx, harq_pid, dlsch1->harq_processes[harq_pid]->rb_alloc_even);
          LOG_I(PHY,"start turbo decode for CW 1 for AbsSubframe %d.%d / %d  --> Qm %d \n", frame_rx, subframe_rx, harq_pid, dlsch1->harq_processes[harq_pid]->Qm);
          LOG_I(PHY,"start turbo decode for CW 1 for AbsSubframe %d.%d / %d  --> Nl %d \n", frame_rx, subframe_rx, harq_pid, dlsch1->harq_processes[harq_pid]->Nl);
          LOG_I(PHY,"start turbo decode for CW 1 for AbsSubframe %d.%d / %d  --> G  %d \n", frame_rx, subframe_rx, harq_pid, dlsch1->harq_processes[harq_pid]->G);
          LOG_I(PHY,"start turbo decode for CW 1 for AbsSubframe %d.%d / %d  --> Kmimo  %d \n", frame_rx, subframe_rx, harq_pid, dlsch1->Kmimo);
3743
          LOG_I(PHY,"start turbo decode for CW 1 for AbsSubframe %d.%d / %d  --> Pdcch Sym  %d \n", frame_rx, subframe_rx, harq_pid, ue->pdcch_vars[ue->current_thread_id[subframe_rx]][eNB_id]->num_pdcch_symbols);
hbilel's avatar
hbilel committed
3744
#endif
3745
	  
gabrielC's avatar
gabrielC committed
3746
#if UE_TIMING_TRACE
3747
          start_meas(&ue->dlsch_decoding_stats[ue->current_thread_id[subframe_rx]]);
gabrielC's avatar
gabrielC committed
3748
#endif
3749
	  
hbilel's avatar
hbilel committed
3750
          ret1 = dlsch_decoding(ue,
3751 3752 3753 3754 3755 3756 3757 3758 3759 3760
				pdsch_vars->llr[1],
				&ue->frame_parms,
				dlsch1,
				dlsch1->harq_processes[harq_pid],
				frame_rx,
				subframe_rx,
				harq_pid,
				pdsch==PDSCH?1:0,
				dlsch1->harq_processes[harq_pid]->TBS>256?1:0);
	  
3761
#if UE_TIMING_TRACE
3762
          stop_meas(&ue->dlsch_decoding_stats[ue->current_thread_id[subframe_rx]]);
Cedric Roux's avatar
Cedric Roux committed
3763
#if DISABLE_LOG_X
gabrielC's avatar
gabrielC committed
3764
          printf(" --> Unscrambling for CW1 %5.3f\n",
3765
		 (ue->dlsch_unscrambling_stats.p_time)/(cpuf*1000.0));
gabrielC's avatar
gabrielC committed
3766
          printf("AbsSubframe %d.%d --> Turbo Decoding for CW1 %5.3f\n",
3767
		 frame_rx%1024, subframe_rx,(ue->dlsch_decoding_stats[ue->current_thread_id[subframe_rx]].p_time)/(cpuf*1000.0));
Cedric Roux's avatar
Cedric Roux committed
3768 3769
#else
          LOG_D(PHY, " --> Unscrambling for CW1 %5.3f\n",
3770
		(ue->dlsch_unscrambling_stats.p_time)/(cpuf*1000.0));
Cedric Roux's avatar
Cedric Roux committed
3771
          LOG_D(PHY, "AbsSubframe %d.%d --> Turbo Decoding for CW1 %5.3f\n",
3772
		frame_rx%1024, subframe_rx,(ue->dlsch_decoding_stats[ue->current_thread_id[subframe_rx]].p_time)/(cpuf*1000.0));
Cedric Roux's avatar
Cedric Roux committed
3773
#endif
3774
	  
gabrielC's avatar
gabrielC committed
3775
#endif
3776
          LOG_D(PHY,"AbsSubframe %d.%d --> Turbo Decoding for CW1 %5.3f\n",
3777 3778 3779
		frame_rx%1024, subframe_rx,(ue->dlsch_decoding_stats[ue->current_thread_id[subframe_rx]].p_time)/(cpuf*1000.0));
	}
      
3780
      LOG_D(PHY," ------ end turbo decoder for AbsSubframe %d.%d ------  \n", frame_rx, subframe_rx);
3781
    }
3782
    
3783 3784
    else {
      LOG_D(PHY,"Calling dlsch_decoding_emul ...\n");
3785
#ifdef PHY_ABSTRACTION
3786
      ret = dlsch_decoding_emul(ue,
3787 3788 3789
				subframe_rx,
				pdsch,
				eNB_id);
3790
#endif
3791
    }
3792
    
3793

hbilel's avatar
hbilel committed
3794
    // Check CRC for CW 0
3795 3796
    if (ret == (1+dlsch0->max_turbo_iterations)) {
      *dlsch_errors=*dlsch_errors+1;
3797

3798 3799
      if(dlsch0->rnti != 0xffff)
      {
3800

3801 3802 3803 3804 3805 3806 3807
	LOG_D(PHY,"[UE  %d][PDSCH %x/%d] AbsSubframe %d.%d : DLSCH CW0 in error (rv %d,round %d, mcs %d,TBS %d)\n",
	      ue->Mod_id,dlsch0->rnti,
	      harq_pid,frame_rx,subframe_rx,
	      dlsch0->harq_processes[harq_pid]->rvidx,
	      dlsch0->harq_processes[harq_pid]->round,
	      dlsch0->harq_processes[harq_pid]->mcs,
	      dlsch0->harq_processes[harq_pid]->TBS);
3808
      }
3809

3810

3811
    } else {
3812 3813
        if(dlsch0->rnti != 0xffff)
        {
3814
      LOG_D(PHY,"[UE  %d][PDSCH %x/%d] AbsSubframe %d.%d : Received DLSCH CW0 (rv %d,round %d, mcs %d,TBS %d)\n",
3815 3816 3817
            ue->Mod_id,dlsch0->rnti,
            harq_pid,frame_rx,subframe_rx,
            dlsch0->harq_processes[harq_pid]->rvidx,
3818
            dlsch0->harq_processes[harq_pid]->round,
3819 3820
            dlsch0->harq_processes[harq_pid]->mcs,
            dlsch0->harq_processes[harq_pid]->TBS);
3821
        }
3822

3823 3824 3825
#ifdef DEBUG_DLSCH
      int j;
      LOG_D(PHY,"dlsch harq_pid %d (rx): \n",dlsch0->current_harq_pid);
3826

3827
      for (j=0; j<dlsch0->harq_processes[dlsch0->current_harq_pid]->TBS>>3; j++)
3828 3829
  LOG_T(PHY,"%x.",dlsch0->harq_processes[dlsch0->current_harq_pid]->b[j]);

3830
      LOG_T(PHY,"\n");
3831
#endif
3832

3833

3834
      if (ue->mac_enabled == 1) {
3835
	
3836 3837
	switch (pdsch) {
	case PDSCH:
3838
		// Panos: Substitute call to ue_send_sdu() with call to fill_dlsch_indication()
3839 3840 3841 3842 3843 3844 3845
	  ue_send_sdu(ue->Mod_id,
		      CC_id,
		      frame_rx,
		      subframe_rx,
		      dlsch0->harq_processes[dlsch0->current_harq_pid]->b,
		      dlsch0->harq_processes[dlsch0->current_harq_pid]->TBS>>3,
		      eNB_id);
3846 3847
	  break;
	case SI_PDSCH:
3848
		// Panos: Substitute call with call to fill_dlsch_indication()
3849 3850 3851 3852 3853 3854
	  ue_decode_si(ue->Mod_id,
		       CC_id,
		       frame_rx,
		       eNB_id,
		       ue->dlsch_SI[eNB_id]->harq_processes[0]->b,
		       ue->dlsch_SI[eNB_id]->harq_processes[0]->TBS>>3);
3855
	  break;
3856
	case P_PDSCH:
3857 3858
		// Panos: Substitute call with call to fill_dlsch_indication()
		ue_decode_p(ue->Mod_id,
3859 3860 3861 3862 3863
		      CC_id,
		      frame_rx,
		      eNB_id,
		      ue->dlsch_SI[eNB_id]->harq_processes[0]->b,
		      ue->dlsch_SI[eNB_id]->harq_processes[0]->TBS>>3);
3864
	  break;
3865
	case RA_PDSCH:
3866
		// Panos: Substitute with call to fill_dlsch_rar_indication()
3867 3868 3869 3870 3871 3872 3873 3874 3875 3876 3877
	  process_rar(ue,proc,eNB_id,mode,abstraction_flag);
	  break;
	case PDSCH1:
	  LOG_E(PHY,"Shouldn't have PDSCH1 yet, come back later\n");
	  AssertFatal(1==0,"exiting");
	  break;
	case PMCH:
	  LOG_E(PHY,"Shouldn't have PMCH here\n");
	  AssertFatal(1==0,"exiting");
	  break;
	}
3878
      }
3879 3880 3881 3882 3883
      ue->total_TBS[eNB_id] =  ue->total_TBS[eNB_id] +
	dlsch0->harq_processes[dlsch0->current_harq_pid]->TBS;
      ue->total_received_bits[eNB_id] = ue->total_TBS[eNB_id] +
	dlsch0->harq_processes[dlsch0->current_harq_pid]->TBS;
    }
hbilel's avatar
hbilel committed
3884 3885
    // Check CRC for CW 1
    if(is_cw1_active)
3886
      {
hbilel's avatar
hbilel committed
3887
        if (ret1 == (1+dlsch0->max_turbo_iterations)) {
3888 3889 3890 3891 3892 3893 3894
	  LOG_I(PHY,"[UE  %d][PDSCH %x/%d] Frame %d subframe %d DLSCH CW1 in error (rv %d,mcs %d,TBS %d)\n",
		ue->Mod_id,dlsch0->rnti,
		harq_pid,frame_rx,subframe_rx,
		dlsch0->harq_processes[harq_pid]->rvidx,
		dlsch0->harq_processes[harq_pid]->mcs,
		dlsch0->harq_processes[harq_pid]->TBS);
	  
hbilel's avatar
hbilel committed
3895
        } else {
3896 3897 3898 3899 3900 3901 3902 3903 3904 3905 3906 3907 3908 3909 3910 3911 3912 3913 3914 3915 3916 3917 3918 3919 3920 3921 3922 3923 3924
	  LOG_I(PHY,"[UE  %d][PDSCH %x/%d] Frame %d subframe %d: Received DLSCH CW1 (rv %d,mcs %d,TBS %d)\n",
		ue->Mod_id,dlsch0->rnti,
		harq_pid,frame_rx,subframe_rx,
		dlsch0->harq_processes[harq_pid]->rvidx,
		dlsch0->harq_processes[harq_pid]->mcs,
		dlsch0->harq_processes[harq_pid]->TBS);
	  
	  
	  if (ue->mac_enabled == 1) {
	    switch (pdsch) {
	    case PDSCH:
	      if(is_cw1_active)
		ue_send_sdu(ue->Mod_id,
			    CC_id,
			    frame_rx,
			    subframe_rx,
			    dlsch1->harq_processes[dlsch1->current_harq_pid]->b,
			    dlsch1->harq_processes[dlsch1->current_harq_pid]->TBS>>3,
			    eNB_id);
	      break;
	    case SI_PDSCH:
	    case P_PDSCH:
	    case RA_PDSCH:
	    case PDSCH1:
	    case PMCH:
	      AssertFatal(0,"exiting");
	      break;
	    }
	  }
hbilel's avatar
hbilel committed
3925
        }
3926 3927
      }
    
3928
#ifdef DEBUG_PHY_PROC
3929 3930 3931 3932 3933 3934 3935 3936 3937 3938 3939 3940 3941 3942 3943 3944 3945
    LOG_D(PHY,"[UE  %d][PDSCH %x/%d] Frame %d subframe %d: PDSCH/DLSCH decoding iter %d (mcs %d, rv %d, TBS %d)\n",
	  ue->Mod_id,
	  dlsch0->rnti,harq_pid,
	  frame_rx,subframe_rx,ret,
	  dlsch0->harq_processes[harq_pid]->mcs,
	  dlsch0->harq_processes[harq_pid]->rvidx,
	  dlsch0->harq_processes[harq_pid]->TBS);
    
    if (frame_rx%100==0) {
      LOG_D(PHY,"[UE  %d][PDSCH %x] Frame %d subframe %d dlsch_errors %d, dlsch_received %d, dlsch_fer %d, current_dlsch_cqi %d\n",
	    ue->Mod_id,dlsch0->rnti,
	    frame_rx,subframe_rx,
	    ue->dlsch_errors[eNB_id],
	    ue->dlsch_received[eNB_id],
	    ue->dlsch_fer[eNB_id],
	    ue->measurements.wideband_cqi_tot[eNB_id]);
    }
3946
    
3947
#endif
3948
    
3949
  }
3950
  
3951
  
3952
}
3953

3954 3955 3956 3957 3958 3959
/*!
 * \brief This is the UE synchronize thread.
 * It performs band scanning and synchonization.
 * \param arg is a pointer to a \ref PHY_VARS_UE structure.
 * \returns a pointer to an int. The storage is not on the heap and must not be freed.
 */
3960
#ifdef UE_SLOT_PARALLELISATION
3961
#define FIFO_PRIORITY   40
3962
void *UE_thread_slot1_dl_processing(void *arg) {
3963

3964 3965 3966 3967 3968 3969 3970 3971 3972 3973 3974 3975 3976 3977 3978 3979 3980 3981 3982 3983 3984 3985 3986 3987 3988 3989 3990 3991 3992 3993 3994 3995 3996 3997 3998 3999 4000 4001 4002 4003 4004 4005 4006 4007 4008 4009 4010 4011 4012 4013 4014 4015 4016 4017 4018 4019 4020 4021 4022 4023
    static __thread int UE_dl_slot1_processing_retval;
    struct rx_tx_thread_data *rtd = arg;
    UE_rxtx_proc_t *proc = rtd->proc;
    PHY_VARS_UE    *ue   = rtd->UE;

    int frame_rx;
    uint8_t subframe_rx;
    uint8_t pilot0;
    uint8_t pilot1;
    uint8_t slot1;

    uint8_t next_subframe_rx;
    uint8_t next_subframe_slot0;

    proc->instance_cnt_slot1_dl_processing=-1;
    proc->subframe_rx=proc->sub_frame_start;

    char threadname[256];
    sprintf(threadname,"UE_thread_slot1_dl_processing_%d", proc->sub_frame_start);

    cpu_set_t cpuset;
    CPU_ZERO(&cpuset);
    if ( (proc->sub_frame_start+1)%RX_NB_TH == 0 && threads.slot1_proc_one != -1 )
        CPU_SET(threads.slot1_proc_one, &cpuset);
    if ( (proc->sub_frame_start+1)%RX_NB_TH == 1 && threads.slot1_proc_two != -1 )
        CPU_SET(threads.slot1_proc_two, &cpuset);
    if ( (proc->sub_frame_start+1)%RX_NB_TH == 2 && threads.slot1_proc_three != -1 )
        CPU_SET(threads.slot1_proc_three, &cpuset);

    init_thread(900000,1000000 , FIFO_PRIORITY-1, &cpuset,
                threadname);

    while (!oai_exit) {
        if (pthread_mutex_lock(&proc->mutex_slot1_dl_processing) != 0) {
            LOG_E( PHY, "[SCHED][UE] error locking mutex for UE slot1 dl processing\n" );
            exit_fun("nothing to add");
        }
        while (proc->instance_cnt_slot1_dl_processing < 0) {
            // most of the time, the thread is waiting here
            pthread_cond_wait( &proc->cond_slot1_dl_processing, &proc->mutex_slot1_dl_processing );
        }
        if (pthread_mutex_unlock(&proc->mutex_slot1_dl_processing) != 0) {
            LOG_E( PHY, "[SCHED][UE] error unlocking mutex for UE slot1 dl processing \n" );
            exit_fun("nothing to add");
        }

        /*for(int th_idx=0; th_idx< RX_NB_TH; th_idx++)
        {
        frame_rx    = ue->proc.proc_rxtx[0].frame_rx;
        subframe_rx = ue->proc.proc_rxtx[0].subframe_rx;
        printf("AbsSubframe %d.%d execute dl slot1 processing \n", frame_rx, subframe_rx);
        }*/
        frame_rx    = proc->frame_rx;
        subframe_rx = proc->subframe_rx;
        next_subframe_rx    = (1+subframe_rx)%10;
        next_subframe_slot0 = next_subframe_rx<<1;

        slot1  = (subframe_rx<<1) + 1;
        pilot0 = 0;

4024
        //printf("AbsSubframe %d.%d execute dl slot1 processing \n", frame_rx, subframe_rx);
4025 4026 4027 4028 4029 4030 4031 4032 4033

        if (ue->frame_parms.Ncp == 0) {  // normal prefix
            pilot1 = 4;
        } else { // extended prefix
            pilot1 = 3;
        }

        /**** Slot1 FE Processing ****/
#if UE_TIMING_TRACE
4034
        start_meas(&ue->ue_front_end_per_slot_stat[ue->current_thread_id[subframe_rx]][1]);
4035 4036 4037 4038 4039 4040 4041 4042 4043 4044 4045 4046 4047 4048 4049 4050 4051 4052 4053 4054 4055 4056 4057 4058 4059 4060 4061 4062 4063 4064 4065 4066 4067 4068 4069 4070 4071 4072
#endif
        // I- start dl slot1 processing
        // do first symbol of next downlink subframe for channel estimation
        /*
        // 1- perform FFT for pilot ofdm symbols first (ofdmSym0 next subframe ofdmSym11)
        if (subframe_select(&ue->frame_parms,next_subframe_rx) != SF_UL)
        {
            front_end_fft(ue,
                    pilot0,
                    next_subframe_slot0,
                    0,
                    0);
        }

        front_end_fft(ue,
                pilot1,
                slot1,
                0,
                0);
         */
        // 1- perform FFT
        for (int l=1; l<ue->frame_parms.symbols_per_tti>>1; l++)
        {
            //if( (l != pilot0) && (l != pilot1))
            {
#if UE_TIMING_TRACE
                start_meas(&ue->ofdm_demod_stats);
#endif
                VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME(VCD_SIGNAL_DUMPER_FUNCTIONS_UE_SLOT_FEP, VCD_FUNCTION_IN);
                //printf("AbsSubframe %d.%d FFT slot %d, symbol %d\n", frame_rx,subframe_rx,slot1,l);
                front_end_fft(ue,
                        l,
                        slot1,
                        0,
                        0);
                VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME(VCD_SIGNAL_DUMPER_FUNCTIONS_UE_SLOT_FEP, VCD_FUNCTION_OUT);
#if UE_TIMING_TRACE
                stop_meas(&ue->ofdm_demod_stats);
4073
#endif
4074 4075
            }
        } // for l=1..l2
4076

4077 4078 4079 4080 4081 4082 4083 4084 4085 4086 4087 4088 4089 4090 4091 4092 4093 4094 4095 4096 4097 4098
        if (subframe_select(&ue->frame_parms,next_subframe_rx) != SF_UL)
        {
            //printf("AbsSubframe %d.%d FFT slot %d, symbol %d\n", frame_rx,subframe_rx,next_subframe_slot0,pilot0);
            front_end_fft(ue,
                    pilot0,
                    next_subframe_slot0,
                    0,
                    0);
        }

        // 2- perform Channel Estimation for slot1
        for (int l=1; l<ue->frame_parms.symbols_per_tti>>1; l++)
        {
            if(l == pilot1)
            {
                //wait until channel estimation for pilot0/slot1 is available
                uint32_t wait = 0;
                while(proc->chan_est_pilot0_slot1_available == 0)
                {
                    usleep(1);
                    wait++;
                }
4099
                //printf("[slot1 dl processing] ChanEst symbol %d slot %d wait%d\n",l,slot1,wait);
4100 4101 4102 4103 4104 4105 4106 4107 4108 4109 4110 4111 4112 4113 4114 4115 4116 4117 4118 4119
            }
            //printf("AbsSubframe %d.%d ChanEst slot %d, symbol %d\n", frame_rx,subframe_rx,slot1,l);
            front_end_chanEst(ue,
                    l,
                    slot1,
                    0);
            ue_measurement_procedures(l-1,ue,proc,0,1+(subframe_rx<<1),0,ue->mode);
        }
        //printf("AbsSubframe %d.%d ChanEst slot %d, symbol %d\n", frame_rx,subframe_rx,next_subframe_slot0,pilot0);
        front_end_chanEst(ue,
                pilot0,
                next_subframe_slot0,
                0);

        if ( (subframe_rx == 0) && (ue->decode_MIB == 1))
        {
            ue_pbch_procedures(0,ue,proc,0);
        }

        proc->chan_est_slot1_available = 1;
4120 4121
        //printf("Set available slot 1channelEst to 1 AbsSubframe %d.%d \n",frame_rx,subframe_rx);
        //printf(" [slot1 dl processing] ==> FFT/CHanEst Done for AbsSubframe %d.%d \n", proc->frame_rx, proc->subframe_rx);
4122 4123 4124 4125 4126

        //printf(" [slot1 dl processing] ==> Start LLR Comuptation slot1 for AbsSubframe %d.%d \n", proc->frame_rx, proc->subframe_rx);


#if UE_TIMING_TRACE
4127
        stop_meas(&ue->ue_front_end_per_slot_stat[ue->current_thread_id[subframe_rx]][1]);
4128
#if DISABLE_LOG_X
4129
        printf("[AbsSFN %d.%d] Slot1: FFT + Channel Estimate + Pdsch Proc Slot0 %5.2f \n",frame_rx,subframe_rx,ue->ue_front_end_per_slot_stat[ue->current_thread_id[subframe_rx]][1].p_time/(cpuf*1000.0));
4130
#else
4131
        LOG_D(PHY, "[AbsSFN %d.%d] Slot1: FFT + Channel Estimate + Pdsch Proc Slot0 %5.2f \n",frame_rx,subframe_rx,ue->ue_front_end_per_slot_stat[ue->current_thread_id[subframe_rx]][1].p_time/(cpuf*1000.0));
4132
#endif
4133

4134 4135 4136 4137 4138 4139 4140 4141 4142 4143
#endif


    //wait until pdcch is decoded
    uint32_t wait = 0;
    while(proc->dci_slot0_available == 0)
    {
        usleep(1);
        wait++;
    }
4144
    //printf("[slot1 dl processing] AbsSubframe %d.%d LLR Computation Start wait DCI %d\n",frame_rx,subframe_rx,wait);
4145 4146 4147 4148 4149


    /**** Pdsch Procedure Slot1 ****/
    // start slot1 thread for Pdsch Procedure (slot1)
    // do procedures for C-RNTI
4150
    //printf("AbsSubframe %d.%d Pdsch Procedure (slot1)\n",frame_rx,subframe_rx);
4151 4152 4153


#if UE_TIMING_TRACE
4154
    start_meas(&ue->pdsch_procedures_per_slot_stat[ue->current_thread_id[subframe_rx]][1]);
4155 4156 4157 4158 4159
#endif
    // start slave thread for Pdsch Procedure (slot1)
    // do procedures for C-RNTI
    uint8_t eNB_id = 0;
    uint8_t abstraction_flag = 0;
4160
    if (ue->dlsch[ue->current_thread_id[subframe_rx]][eNB_id][0]->active == 1) {
4161 4162 4163 4164 4165 4166 4167 4168 4169 4170 4171 4172 4173 4174
        //wait until first ofdm symbol is processed
        //wait = 0;
        //while(proc->first_symbol_available == 0)
        //{
        //    usleep(1);
        //    wait++;
        //}
        //printf("[slot1 dl processing] AbsSubframe %d.%d LLR Computation Start wait First Ofdm Sym %d\n",frame_rx,subframe_rx,wait);

        //VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME(VCD_SIGNAL_DUMPER_FUNCTIONS_PDSCH_PROC, VCD_FUNCTION_IN);
        ue_pdsch_procedures(ue,
                proc,
                eNB_id,
                PDSCH,
4175
                ue->dlsch[ue->current_thread_id[subframe_rx]][eNB_id][0],
4176 4177 4178 4179 4180 4181 4182 4183 4184 4185 4186 4187 4188 4189 4190 4191 4192 4193 4194 4195 4196 4197 4198 4199 4200 4201 4202 4203 4204 4205 4206 4207 4208 4209 4210 4211 4212 4213 4214 4215 4216 4217 4218 4219 4220 4221 4222
                NULL,
                (ue->frame_parms.symbols_per_tti>>1),
                ue->frame_parms.symbols_per_tti-1,
                abstraction_flag);
        LOG_D(PHY," ------ end PDSCH ChannelComp/LLR slot 0: AbsSubframe %d.%d ------  \n", frame_rx%1024, subframe_rx);
        LOG_D(PHY," ------ --> PDSCH Turbo Decoder slot 0/1: AbsSubframe %d.%d ------  \n", frame_rx%1024, subframe_rx);
    }

    // do procedures for SI-RNTI
    if ((ue->dlsch_SI[eNB_id]) && (ue->dlsch_SI[eNB_id]->active == 1)) {
        ue_pdsch_procedures(ue,
                proc,
                eNB_id,
                SI_PDSCH,
                ue->dlsch_SI[eNB_id],
                NULL,
                (ue->frame_parms.symbols_per_tti>>1),
                ue->frame_parms.symbols_per_tti-1,
                abstraction_flag);
    }

    // do procedures for P-RNTI
    if ((ue->dlsch_p[eNB_id]) && (ue->dlsch_p[eNB_id]->active == 1)) {
        ue_pdsch_procedures(ue,
                proc,
                eNB_id,
                P_PDSCH,
                ue->dlsch_p[eNB_id],
                NULL,
                (ue->frame_parms.symbols_per_tti>>1),
                ue->frame_parms.symbols_per_tti-1,
                abstraction_flag);
    }
    // do procedures for RA-RNTI
    if ((ue->dlsch_ra[eNB_id]) && (ue->dlsch_ra[eNB_id]->active == 1)) {
        ue_pdsch_procedures(ue,
                proc,
                eNB_id,
                RA_PDSCH,
                ue->dlsch_ra[eNB_id],
                NULL,
                (ue->frame_parms.symbols_per_tti>>1),
                ue->frame_parms.symbols_per_tti-1,
                abstraction_flag);
    }

    proc->llr_slot1_available=1;
4223
    //printf("Set available LLR slot1 to 1 AbsSubframe %d.%d \n",frame_rx,subframe_rx);
4224 4225

#if UE_TIMING_TRACE
4226
    stop_meas(&ue->pdsch_procedures_per_slot_stat[ue->current_thread_id[subframe_rx]][1]);
4227
#if DISABLE_LOG_X
4228
    printf("[AbsSFN %d.%d] Slot1: LLR Computation %5.2f \n",frame_rx,subframe_rx,ue->pdsch_procedures_per_slot_stat[ue->current_thread_id[subframe_rx]][1].p_time/(cpuf*1000.0));
4229
#else
4230
    LOG_D(PHY, "[AbsSFN %d.%d] Slot1: LLR Computation %5.2f \n",frame_rx,subframe_rx,ue->pdsch_procedures_per_slot_stat[ue->current_thread_id[subframe_rx]][1].p_time/(cpuf*1000.0));
4231 4232 4233 4234 4235 4236 4237 4238 4239 4240 4241 4242 4243 4244 4245 4246 4247 4248
#endif
#endif


        if (pthread_mutex_lock(&proc->mutex_slot1_dl_processing) != 0) {
            LOG_E( PHY, "[SCHED][UE] error locking mutex for UE RXTX\n" );
            exit_fun("noting to add");
        }
        proc->instance_cnt_slot1_dl_processing--;
        if (pthread_mutex_unlock(&proc->mutex_slot1_dl_processing) != 0) {
            LOG_E( PHY, "[SCHED][UE] error unlocking mutex for UE FEP Slo1\n" );
            exit_fun("noting to add");
        }
    }
    // thread finished
        free(arg);
        return &UE_dl_slot1_processing_retval;
}
4249
#endif
4250

4251
#ifdef UE_SLOT_PARALLELISATION
4252 4253 4254
int phy_procedures_slot_parallelization_UE_RX(PHY_VARS_UE *ue,UE_rxtx_proc_t *proc,uint8_t eNB_id,
        uint8_t abstraction_flag,uint8_t do_pdcch_flag,runmode_t mode,
        relaying_type_t r_type,PHY_VARS_RN *phy_vars_rn)  {
4255 4256 4257 4258 4259 4260 4261 4262 4263 4264 4265 4266

    int l,l2;
    int pmch_flag=0;
    int frame_rx = proc->frame_rx;
    int subframe_rx = proc->subframe_rx;
    uint8_t pilot0;
    uint8_t pilot1;
    uint8_t slot0;
    uint8_t slot1;
    uint8_t first_ofdm_sym;

    VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME(VCD_SIGNAL_DUMPER_FUNCTIONS_PHY_PROCEDURES_UE_RX, VCD_FUNCTION_IN);
4267

4268
#if T_TRACER
4269 4270 4271
    T(T_UE_PHY_DL_TICK, T_INT(ue->Mod_id), T_INT(frame_rx%1024), T_INT(subframe_rx));

    T(T_UE_PHY_INPUT_SIGNAL, T_INT(ue->Mod_id), T_INT(frame_rx%1024), T_INT(subframe_rx), T_INT(0),
fnabet's avatar
fnabet committed
4272 4273 4274
            T_BUFFER(&ue->common_vars.rxdata[0][subframe_rx*ue->frame_parms.samples_per_tti],
                    ue->frame_parms.samples_per_tti * 4));
#endif
4275 4276

    // start timers
fnabet's avatar
fnabet committed
4277
#ifdef UE_DEBUG_TRACE
4278
    LOG_I(PHY," ****** start RX-Chain for AbsSubframe %d.%d ******  \n", frame_rx%1024, subframe_rx);
fnabet's avatar
fnabet committed
4279 4280 4281
#endif

#if UE_TIMING_TRACE
4282 4283
    start_meas(&ue->phy_proc_rx[ue->current_thread_id[subframe_rx]]);
    start_meas(&ue->ue_front_end_stat[ue->current_thread_id[subframe_rx]]);
fnabet's avatar
fnabet committed
4284
#endif
4285 4286 4287

    pmch_flag = is_pmch_subframe(frame_rx,subframe_rx,&ue->frame_parms) ? 1 : 0;

fnabet's avatar
fnabet committed
4288 4289
    if (do_pdcch_flag) {
        // deactivate reception until we scan pdcch
4290 4291 4292 4293
        if (ue->dlsch[ue->current_thread_id[subframe_rx]][eNB_id][0])
            ue->dlsch[ue->current_thread_id[subframe_rx]][eNB_id][0]->active = 0;
        if (ue->dlsch[ue->current_thread_id[subframe_rx]][eNB_id][1])
            ue->dlsch[ue->current_thread_id[subframe_rx]][eNB_id][1]->active = 0;
fnabet's avatar
fnabet committed
4294 4295 4296 4297 4298 4299 4300 4301 4302 4303 4304 4305 4306 4307

        if (ue->dlsch_SI[eNB_id])
            ue->dlsch_SI[eNB_id]->active = 0;
        if (ue->dlsch_p[eNB_id])
            ue->dlsch_p[eNB_id]->active = 0;
        if (ue->dlsch_ra[eNB_id])
            ue->dlsch_ra[eNB_id]->active = 0;
    }

#ifdef DEBUG_PHY_PROC
    LOG_D(PHY,"[%s %d] Frame %d subframe %d: Doing phy_procedures_UE_RX\n",
            (r_type == multicast_relay) ? "RN/UE" : "UE",
                    ue->Mod_id,frame_rx, subframe_rx);
#endif
4308 4309 4310



fnabet's avatar
fnabet committed
4311 4312 4313 4314 4315 4316 4317 4318 4319

    if (subframe_select(&ue->frame_parms,subframe_rx) == SF_S) { // S-subframe, do first 5 symbols only
        l2 = 5;
    } else if (pmch_flag == 1) { // do first 2 symbols only
        l2 = 1;
    } else { // normal subframe, last symbol to be processed is the first of the second slot
        l2 = (ue->frame_parms.symbols_per_tti/2)-1;
    }

4320 4321
    int prev_subframe_rx = (subframe_rx - 1)<0? 9: (subframe_rx - 1);
    if (subframe_select(&ue->frame_parms,prev_subframe_rx) != SF_DL) {
fnabet's avatar
fnabet committed
4322 4323 4324 4325
        //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
        // RX processing of symbols l=0...l2
        //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
        first_ofdm_sym = 0;
4326
    } else {
fnabet's avatar
fnabet committed
4327 4328 4329 4330
        //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
        // RX processing of symbols l=1...l2 (l=0 is done in last scheduling epoch)
        //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
        first_ofdm_sym = 1;
4331 4332 4333 4334 4335
    }
    slot0  = (subframe_rx<<1);
    slot1  = (subframe_rx<<1) + 1;
    pilot0 = 0;
    if (ue->frame_parms.Ncp == 0) {  // normal prefix
fnabet's avatar
fnabet committed
4336
        pilot1 = 4;
4337
    } else { // extended prefix
fnabet's avatar
fnabet committed
4338
        pilot1 = 3;
4339
    }
Cedric Roux's avatar
Cedric Roux committed
4340

4341 4342 4343 4344 4345 4346 4347
    //LOG_I(PHY,"Set available channelEst to 0 AbsSubframe %d.%d \n",frame_rx,subframe_rx);
    //LOG_I(PHY,"Set available llrs slot1 to 0 AbsSubframe %d.%d \n",frame_rx,subframe_rx);
    //LOG_I(PHY,"Set available dci info slot0 to 0 AbsSubframe %d.%d \n",frame_rx,subframe_rx);
    proc->chan_est_pilot0_slot1_available=0;
    proc->llr_slot1_available=0;
    proc->dci_slot0_available=0;
    proc->first_symbol_available=0;
4348
    proc->chan_est_slot1_available=0;
tct-labo4's avatar
tct-labo4 committed
4349
    //proc->channel_level=0;
4350

4351 4352 4353 4354 4355 4356 4357 4358
    if (pthread_mutex_lock(&proc->mutex_slot1_dl_processing) != 0) {
        LOG_E( PHY, "[SCHED][UE %d][Slot0] error locking mutex for UE slot1 dl processing\n",ue->Mod_id );
        exit_fun("nothing to add");
    }

    proc->instance_cnt_slot1_dl_processing++;
    if (proc->instance_cnt_slot1_dl_processing == 0)
    {
4359
    LOG_D(PHY,"unblock slot1 dl processing thread blocked on instance_cnt_slot1_dl_processing : %d \n", proc->instance_cnt_slot1_dl_processing );
4360 4361
        if (pthread_cond_signal(&proc->cond_slot1_dl_processing) != 0) {
            LOG_E( PHY, "[SCHED][UE %d][Slot0] ERROR pthread_cond_signal for UE slot1 processing thread\n", ue->Mod_id);
fnabet's avatar
fnabet committed
4362 4363
            exit_fun("nothing to add");
        }
4364 4365 4366 4367 4368 4369 4370 4371 4372 4373
        if (pthread_mutex_unlock(&proc->mutex_slot1_dl_processing) != 0) {
            LOG_E( PHY, "[SCHED][UE %d][Slot0] error unlocking mutex for UE slot1 dl processing \n",ue->Mod_id );
            exit_fun("nothing to add");
        }

    } else
    {
        LOG_E( PHY, "[SCHED][UE %d] UE RX thread busy (IC %d)!!\n", ue->Mod_id, proc->instance_cnt_slot1_dl_processing);
        if (proc->instance_cnt_slot1_dl_processing > 2)
            exit_fun("instance_cnt_slot1_dl_processing > 2");
4374
    }
4375 4376
    //AssertFatal(pthread_cond_signal(&proc->cond_slot1_dl_processing) ==0 ,"");
    AssertFatal(pthread_mutex_unlock(&proc->mutex_slot1_dl_processing) ==0,"");
4377

4378 4379

    /**** Slot0 FE Processing ****/
4380
    // I- start main thread for FFT/ChanEst symbol: 0/1 --> 7
fnabet's avatar
fnabet committed
4381
#if UE_TIMING_TRACE
4382
    start_meas(&ue->ue_front_end_per_slot_stat[ue->current_thread_id[subframe_rx]][0]);
fnabet's avatar
fnabet committed
4383
#endif
4384
    // 1- perform FFT for pilot ofdm symbols first (ofdmSym7 ofdmSym4 or (ofdmSym6 ofdmSym3))
4385
    //printf("AbsSubframe %d.%d FFT slot %d, symbol %d\n", frame_rx,subframe_rx,slot1,pilot0);
4386 4387 4388 4389 4390
    front_end_fft(ue,
            pilot0,
            slot1,
            0,
            0);
4391
    //printf("AbsSubframe %d.%d FFT slot %d, symbol %d\n", frame_rx,subframe_rx,slot0,pilot1);
4392 4393 4394 4395 4396
    front_end_fft(ue,
            pilot1,
            slot0,
            0,
            0);
4397
    //printf("AbsSubframe %d.%d ChanEst slot %d, symbol %d\n", frame_rx,subframe_rx,slot0,pilot1);
4398 4399 4400 4401
    front_end_chanEst(ue,
            pilot1,
            slot0,
            0);
4402
    //printf("AbsSubframe %d.%d ChanEst slot %d, symbol %d\n", frame_rx,subframe_rx,slot1,pilot0);
4403 4404 4405 4406 4407
    front_end_chanEst(ue,
            pilot0,
            slot1,
            0);
    proc->chan_est_pilot0_slot1_available = 1;
4408
    //printf("Set available channelEst to 1 AbsSubframe %d.%d \n",frame_rx,subframe_rx);
fnabet's avatar
fnabet committed
4409

4410 4411 4412 4413 4414
    // 2- perform FFT for other ofdm symbols other than pilots
    for (l=first_ofdm_sym; l<=l2; l++)
    {
        if( (l != pilot0) && (l != pilot1))
        {
4415
            //printf("AbsSubframe %d.%d FFT slot %d, symbol %d\n", frame_rx,subframe_rx,slot0,l);
fnabet's avatar
fnabet committed
4416
#if UE_TIMING_TRACE
4417
            start_meas(&ue->ofdm_demod_stats);
fnabet's avatar
fnabet committed
4418
#endif
4419 4420 4421 4422 4423 4424 4425
            VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME(VCD_SIGNAL_DUMPER_FUNCTIONS_UE_SLOT_FEP, VCD_FUNCTION_IN);
            front_end_fft(ue,
                    l,
                    slot0,
                    0,
                    0);
            VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME(VCD_SIGNAL_DUMPER_FUNCTIONS_UE_SLOT_FEP, VCD_FUNCTION_OUT);
fnabet's avatar
fnabet committed
4426
#if UE_TIMING_TRACE
4427
            stop_meas(&ue->ofdm_demod_stats);
fnabet's avatar
fnabet committed
4428
#endif
4429 4430
        }
    } // for l=1..l2
hbilel's avatar
hbilel committed
4431

4432 4433 4434 4435 4436
    // 3- perform Channel Estimation for slot0
    for (l=first_ofdm_sym; l<=l2; l++)
    {
        if( (l != pilot0) && (l != pilot1))
        {
4437
            //printf("AbsSubframe %d.%d ChanEst slot %d, symbol %d\n", frame_rx,subframe_rx,slot0,l);
fnabet's avatar
fnabet committed
4438 4439 4440 4441
            front_end_chanEst(ue,
                    l,
                    slot0,
                    0);
4442 4443 4444
        }
        ue_measurement_procedures(l-1,ue,proc,eNB_id,(subframe_rx<<1),abstraction_flag,mode);
    }
hbilel's avatar
hbilel committed
4445

fnabet's avatar
fnabet committed
4446
    if (do_pdcch_flag) {
4447
#if UE_TIMING_TRACE
4448
        start_meas(&ue->pdcch_procedures_stat[ue->current_thread_id[subframe_rx]]);
4449
#endif
fnabet's avatar
fnabet committed
4450 4451
        if (ue_pdcch_procedures(eNB_id,ue,proc,abstraction_flag) == -1) {
            LOG_E(PHY,"[UE  %d] Frame %d, subframe %d: Error in pdcch procedures\n",ue->Mod_id,frame_rx,subframe_rx);
4452
#if UE_TIMING_TRACE
4453
            stop_meas(&ue->pdcch_procedures_stat[ue->current_thread_id[subframe_rx]]);
4454
#if DISABLE_LOG_X
4455
            printf("[AbsSFN %d.%d] Slot0: PDCCH %5.2f \n",frame_rx,subframe_rx,ue->pdcch_procedures_stat[ue->current_thread_id[subframe_rx]].p_time/(cpuf*1000.0));
4456
#else
4457
            LOG_D(PHY, "[AbsSFN %d.%d] Slot0: PDCCH %5.2f \n",frame_rx,subframe_rx,ue->pdcch_procedures_stat[ue->current_thread_id[subframe_rx]].p_time/(cpuf*1000.0));
4458 4459
#endif
#endif
4460
            //proc->dci_slot0_available = 1;
fnabet's avatar
fnabet committed
4461 4462
            return(-1);
        }
4463
        //proc->dci_slot0_available=1;
4464
#if UE_TIMING_TRACE
4465
        stop_meas(&ue->pdcch_procedures_stat[ue->current_thread_id[subframe_rx]]);
4466
#if DISABLE_LOG_X
4467
        printf("[AbsSFN %d.%d] Slot0: PDCCH %5.2f \n",frame_rx,subframe_rx,ue->pdcch_procedures_stat[ue->current_thread_id[subframe_rx]].p_time/(cpuf*1000.0));
4468
#else
4469
        LOG_D(PHY, "[AbsSFN %d.%d] Slot0: PDCCH %5.2f \n",frame_rx,subframe_rx,ue->pdcch_procedures_stat[ue->current_thread_id[subframe_rx]].p_time/(cpuf*1000.0));
4470 4471
#endif
#endif
4472
    }
4473

4474
    //printf("num_pdcch_symbols %d\n",ue->pdcch_vars[ue->current_thread_id[subframe_rx]][eNB_id]->num_pdcch_symbols);
4475

fnabet's avatar
fnabet committed
4476 4477
    // first slot has been processed (FFTs + Channel Estimation, PCFICH/PHICH/PDCCH)
#if UE_TIMING_TRACE
4478
    stop_meas(&ue->ue_front_end_per_slot_stat[ue->current_thread_id[subframe_rx]][0]);
fnabet's avatar
fnabet committed
4479
#if DISABLE_LOG_X
4480
    printf("[AbsSFN %d.%d] Slot0: FFT + Channel Estimate + PCFICH/PHICH/PDCCH %5.2f \n",frame_rx,subframe_rx,ue->ue_front_end_per_slot_stat[ue->current_thread_id[subframe_rx]][0].p_time/(cpuf*1000.0));
fnabet's avatar
fnabet committed
4481
#else
4482
    LOG_D(PHY, "[AbsSFN %d.%d] Slot0: FFT + Channel Estimate + PCFICH/PHICH/PDCCH %5.2f \n",frame_rx,subframe_rx,ue->ue_front_end_per_slot_stat[ue->current_thread_id[subframe_rx]][0].p_time/(cpuf*1000.0));
fnabet's avatar
fnabet committed
4483 4484 4485
#endif
#endif

4486 4487 4488
    //wait until slot1 FE is done
    uint32_t wait = 0;
    while(proc->chan_est_slot1_available == 0)
4489
    {
4490 4491
        usleep(1);
        wait++;
4492
    }
hbilel's avatar
hbilel committed
4493

fnabet's avatar
fnabet committed
4494
#if UE_TIMING_TRACE
4495
    stop_meas(&ue->ue_front_end_stat[ue->current_thread_id[subframe_rx]]);
fnabet's avatar
fnabet committed
4496
#if DISABLE_LOG_X
4497
    printf("[AbsSFN %d.%d] FULL FE Processing %5.2f \n",frame_rx,subframe_rx,ue->ue_front_end_per_slot_stat[ue->current_thread_id[subframe_rx]][0].p_time/(cpuf*1000.0));
fnabet's avatar
fnabet committed
4498
#else
4499
    LOG_D(PHY, "[AbsSFN %d.%d] FULL FE Processing %5.2f \n",frame_rx,subframe_rx,ue->ue_front_end_per_slot_stat[ue->current_thread_id[subframe_rx]][0].p_time/(cpuf*1000.0));
fnabet's avatar
fnabet committed
4500 4501
#endif
#endif
4502
    /**** End Subframe FE Processing ****/
fnabet's avatar
fnabet committed
4503

4504

4505 4506 4507 4508
#if 0
    //Trigger LLR parallelized for Slot 1
    proc->dci_slot0_available=1;
    printf("Set available dci slot0 to 1 AbsSubframe %d.%d \n",frame_rx%1024,subframe_rx);
fnabet's avatar
fnabet committed
4509
#endif
4510

4511
    /**** Pdsch Procedure Slot0 ****/
4512 4513
    // start main thread for Pdsch Procedure (slot0)
    // do procedures for C-RNTI
4514 4515
    //printf("AbsSubframe %d.%d Pdsch Procedure (slot0)\n",frame_rx%1024,subframe_rx);
    //printf("AbsSubframe %d.%d Pdsch Procedure PDSCH Active %d \n",frame_rx%1024,subframe_rx, ue->dlsch[ue->current_thread_id[subframe_rx]][0][0]->active);
4516

fnabet's avatar
fnabet committed
4517
#if UE_TIMING_TRACE
4518
    start_meas(&ue->pdsch_procedures_stat[ue->current_thread_id[subframe_rx]]);
4519 4520 4521
#endif

#if UE_TIMING_TRACE
4522
    start_meas(&ue->pdsch_procedures_per_slot_stat[ue->current_thread_id[subframe_rx]][0]);
fnabet's avatar
fnabet committed
4523
#endif
4524
    if (ue->dlsch[ue->current_thread_id[subframe_rx]][eNB_id][0]->active == 1) {
fnabet's avatar
fnabet committed
4525 4526 4527 4528 4529
        VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME(VCD_SIGNAL_DUMPER_FUNCTIONS_PDSCH_PROC, VCD_FUNCTION_IN);
        ue_pdsch_procedures(ue,
                proc,
                eNB_id,
                PDSCH,
4530
                ue->dlsch[ue->current_thread_id[subframe_rx]][eNB_id][0],
fnabet's avatar
fnabet committed
4531
                NULL,
4532
                ue->pdcch_vars[ue->current_thread_id[subframe_rx]][eNB_id]->num_pdcch_symbols,
4533
                (ue->frame_parms.symbols_per_tti>>1)-1,
fnabet's avatar
fnabet committed
4534 4535 4536
                abstraction_flag);

        VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME(VCD_SIGNAL_DUMPER_FUNCTIONS_PDSCH_PROC, VCD_FUNCTION_OUT);
4537
    }
fnabet's avatar
fnabet committed
4538

4539 4540
    // do procedures for SI-RNTI
    if ((ue->dlsch_SI[eNB_id]) && (ue->dlsch_SI[eNB_id]->active == 1)) {
fnabet's avatar
fnabet committed
4541 4542 4543 4544 4545 4546 4547
        VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME(VCD_SIGNAL_DUMPER_FUNCTIONS_PDSCH_PROC_SI, VCD_FUNCTION_IN);
        ue_pdsch_procedures(ue,
                proc,
                eNB_id,
                SI_PDSCH,
                ue->dlsch_SI[eNB_id],
                NULL,
4548
                ue->pdcch_vars[ue->current_thread_id[subframe_rx]][eNB_id]->num_pdcch_symbols,
4549
                (ue->frame_parms.symbols_per_tti>>1)-1,
fnabet's avatar
fnabet committed
4550 4551
                abstraction_flag);
        VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME(VCD_SIGNAL_DUMPER_FUNCTIONS_PDSCH_PROC_SI, VCD_FUNCTION_OUT);
4552
    }
fnabet's avatar
fnabet committed
4553

4554 4555
    // do procedures for SI-RNTI
    if ((ue->dlsch_p[eNB_id]) && (ue->dlsch_p[eNB_id]->active == 1)) {
fnabet's avatar
fnabet committed
4556 4557 4558 4559 4560 4561 4562
        VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME(VCD_SIGNAL_DUMPER_FUNCTIONS_PDSCH_PROC_P, VCD_FUNCTION_IN);
        ue_pdsch_procedures(ue,
                proc,
                eNB_id,
                P_PDSCH,
                ue->dlsch_p[eNB_id],
                NULL,
4563
                ue->pdcch_vars[ue->current_thread_id[subframe_rx]][eNB_id]->num_pdcch_symbols,
4564
                (ue->frame_parms.symbols_per_tti>>1)-1,
fnabet's avatar
fnabet committed
4565 4566
                abstraction_flag);
        VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME(VCD_SIGNAL_DUMPER_FUNCTIONS_PDSCH_PROC_P, VCD_FUNCTION_OUT);
4567
    }
hbilel's avatar
hbilel committed
4568

4569 4570
    // do procedures for RA-RNTI
    if ((ue->dlsch_ra[eNB_id]) && (ue->dlsch_ra[eNB_id]->active == 1)) {
fnabet's avatar
fnabet committed
4571 4572 4573 4574 4575 4576 4577
        VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME(VCD_SIGNAL_DUMPER_FUNCTIONS_PDSCH_PROC_RA, VCD_FUNCTION_IN);
        ue_pdsch_procedures(ue,
                proc,
                eNB_id,
                RA_PDSCH,
                ue->dlsch_ra[eNB_id],
                NULL,
4578
                ue->pdcch_vars[ue->current_thread_id[subframe_rx]][eNB_id]->num_pdcch_symbols,
4579
                (ue->frame_parms.symbols_per_tti>>1)-1,
fnabet's avatar
fnabet committed
4580 4581
                abstraction_flag);
        VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME(VCD_SIGNAL_DUMPER_FUNCTIONS_PDSCH_PROC_RA, VCD_FUNCTION_OUT);
4582
    }
hbilel's avatar
hbilel committed
4583

4584 4585 4586
#if 1
    // LLR linear
    proc->dci_slot0_available=1;
4587
    //printf("Set available dci slot0 to 1 AbsSubframe %d.%d \n",frame_rx%1024,subframe_rx);
4588 4589
#endif

fnabet's avatar
fnabet committed
4590
#if UE_TIMING_TRACE
4591
    stop_meas(&ue->pdsch_procedures_per_slot_stat[ue->current_thread_id[subframe_rx]][0]);
fnabet's avatar
fnabet committed
4592
#if DISABLE_LOG_X
4593
    printf("[AbsSFN %d.%d] Slot0: LLR Computation %5.2f \n",frame_rx,subframe_rx,ue->pdsch_procedures_per_slot_stat[ue->current_thread_id[subframe_rx]][0].p_time/(cpuf*1000.0));
fnabet's avatar
fnabet committed
4594
#else
4595
    LOG_D(PHY, "[AbsSFN %d.%d] Slot0: LLR Computation %5.2f \n",frame_rx,subframe_rx,ue->pdsch_procedures_per_slot_stat[ue->current_thread_id[subframe_rx]][0].p_time/(cpuf*1000.0));
fnabet's avatar
fnabet committed
4596 4597
#endif
#endif
4598

hbilel's avatar
hbilel committed
4599

4600 4601 4602 4603 4604 4605
    //wait until LLR Slot1 is done
    wait = 0;
    while(proc->llr_slot1_available == 0)
    {
        usleep(1);
        wait++;
4606
    }
hbilel's avatar
hbilel committed
4607

fnabet's avatar
fnabet committed
4608 4609


4610
#if UE_TIMING_TRACE
4611
    stop_meas(&ue->pdsch_procedures_stat[ue->current_thread_id[subframe_rx]]);
4612
#if DISABLE_LOG_X
4613
    printf("[AbsSFN %d.%d] Full LLR Computation %5.2f \n",frame_rx,subframe_rx,ue->pdsch_procedures_stat[ue->current_thread_id[subframe_rx]].p_time/(cpuf*1000.0));
4614
#else
4615
    LOG_D(PHY, "[AbsSFN %d.%d] Full LLR Computation %5.2f \n",frame_rx,subframe_rx,ue->pdsch_procedures_stat[ue->current_thread_id[subframe_rx]].p_time/(cpuf*1000.0));
4616 4617
#endif
#endif
4618
    //printf("[slot0 dl processing] AbsSubframe %d.%d Channel Decoder Start wait %d\n",frame_rx,subframe_rx,wait);
4619

fnabet's avatar
fnabet committed
4620 4621 4622

    //=====================================================================//
#if UE_TIMING_TRACE
4623
    start_meas(&ue->dlsch_procedures_stat[ue->current_thread_id[subframe_rx]]);
fnabet's avatar
fnabet committed
4624
#endif
tct-labo4's avatar
tct-labo4 committed
4625

4626
    LOG_D(PHY,"==> Start Turbo Decoder active dlsch %d SI %d RA %d \n",ue->dlsch[ue->current_thread_id[subframe_rx]][eNB_id][0]->active,
tct-labo4's avatar
tct-labo4 committed
4627 4628 4629
    		ue->dlsch_SI[eNB_id]->active,
			//ue->dlsch_p[eNB_id]->active,
			ue->dlsch_ra[eNB_id]->active);
4630
    // Start Turbo decoder
4631
    if (ue->dlsch[ue->current_thread_id[subframe_rx]][eNB_id][0]->active == 1) {
4632
        //VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME(VCD_SIGNAL_DUMPER_FUNCTIONS_PDSCH_PROC, VCD_FUNCTION_IN);
fnabet's avatar
fnabet committed
4633 4634 4635 4636
        ue_dlsch_procedures(ue,
                proc,
                eNB_id,
                PDSCH,
4637 4638
                ue->dlsch[ue->current_thread_id[subframe_rx]][eNB_id][0],
                ue->dlsch[ue->current_thread_id[subframe_rx]][eNB_id][1],
fnabet's avatar
fnabet committed
4639 4640 4641
                &ue->dlsch_errors[eNB_id],
                mode,
                abstraction_flag);
4642
        //VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME(VCD_SIGNAL_DUMPER_FUNCTIONS_PDSCH_PROC, VCD_FUNCTION_OUT);
fnabet's avatar
fnabet committed
4643
    }
4644

fnabet's avatar
fnabet committed
4645 4646 4647 4648 4649 4650 4651 4652 4653 4654 4655 4656 4657 4658 4659 4660 4661 4662 4663 4664 4665 4666 4667 4668 4669 4670 4671 4672 4673 4674 4675 4676 4677 4678 4679 4680 4681 4682 4683 4684
    // do procedures for SI-RNTI
    if ((ue->dlsch_SI[eNB_id]) && (ue->dlsch_SI[eNB_id]->active == 1)) {
        ue_dlsch_procedures(ue,
                proc,
                eNB_id,
                SI_PDSCH,
                ue->dlsch_SI[eNB_id],
                NULL,
                &ue->dlsch_SI_errors[eNB_id],
                mode,
                abstraction_flag);
        ue->dlsch_SI[eNB_id]->active = 0;
    }

    // do procedures for P-RNTI
    if ((ue->dlsch_p[eNB_id]) && (ue->dlsch_p[eNB_id]->active == 1)) {
        ue_dlsch_procedures(ue,
                proc,
                eNB_id,
                P_PDSCH,
                ue->dlsch_p[eNB_id],
                NULL,
                &ue->dlsch_p_errors[eNB_id],
                mode,
                abstraction_flag);
        ue->dlsch_p[eNB_id]->active = 0;
    }
    // do procedures for RA-RNTI
    if ((ue->dlsch_ra[eNB_id]) && (ue->dlsch_ra[eNB_id]->active == 1)) {
        ue_dlsch_procedures(ue,
                proc,
                eNB_id,
                RA_PDSCH,
                ue->dlsch_ra[eNB_id],
                NULL,
                &ue->dlsch_ra_errors[eNB_id],
                mode,
                abstraction_flag);
        ue->dlsch_ra[eNB_id]->active = 0;
    }
4685

fnabet's avatar
fnabet committed
4686
#if UE_TIMING_TRACE
4687
        stop_meas(&ue->dlsch_procedures_stat[ue->current_thread_id[subframe_rx]]);
fnabet's avatar
fnabet committed
4688
#if DISABLE_LOG_X
4689
        printf("[AbsSFN %d.%d] Channel Decoder: %5.2f \n",frame_rx,subframe_rx,ue->dlsch_procedures_stat[ue->current_thread_id[subframe_rx]].p_time/(cpuf*1000.0));
fnabet's avatar
fnabet committed
4690
#else
4691
        LOG_D(PHY, "[AbsSFN %d.%d] Channel Decoder: %5.2f \n",frame_rx,subframe_rx,ue->dlsch_procedures_stat[ue->current_thread_id[subframe_rx]].p_time/(cpuf*1000.0));
fnabet's avatar
fnabet committed
4692
#endif
4693

fnabet's avatar
fnabet committed
4694 4695
#endif

4696
        // duplicate harq structure
4697 4698 4699
        uint8_t          current_harq_pid        = ue->dlsch[ue->current_thread_id[subframe_rx]][eNB_id][0]->current_harq_pid;
        LTE_DL_UE_HARQ_t *current_harq_processes = ue->dlsch[ue->current_thread_id[subframe_rx]][eNB_id][0]->harq_processes[current_harq_pid];
        harq_status_t    *current_harq_ack       = &ue->dlsch[ue->current_thread_id[subframe_rx]][eNB_id][0]->harq_ack[subframe_rx];
4700

4701
        // For Debug parallelisation
4702 4703 4704 4705
        //if (current_harq_ack->ack == 0) {
            //printf("[slot0 dl processing][End of Channel Decoding] AbsSubframe %d.%d Decode Fail for HarqId%d Round%d\n",frame_rx,subframe_rx,current_harq_pid,current_harq_processes->round);
        //}
        for(uint8_t rx_th_idx=1; rx_th_idx<RX_NB_TH; rx_th_idx++)
4706
        {
4707 4708
            LTE_DL_UE_HARQ_t *harq_processes_dest  = ue->dlsch[ue->current_thread_id[(subframe_rx+rx_th_idx)%10]][eNB_id][0]->harq_processes[current_harq_pid];
            harq_status_t    *harq_ack_dest        = &ue->dlsch[ue->current_thread_id[(subframe_rx+rx_th_idx)%10]][eNB_id][0]->harq_ack[subframe_rx];
4709 4710 4711 4712 4713 4714

            copy_harq_proc_struct(harq_processes_dest, current_harq_processes);
            copy_ack_struct(harq_ack_dest, current_harq_ack);

        }
    /*
fnabet's avatar
fnabet committed
4715 4716 4717 4718 4719 4720 4721 4722 4723 4724 4725 4726
    LTE_DL_UE_HARQ_t *harq_processes_dest    = ue->dlsch[(subframe_rx+1)%RX_NB_TH][eNB_id][0]->harq_processes[current_harq_pid];
    LTE_DL_UE_HARQ_t *harq_processes_dest1    = ue->dlsch[(subframe_rx+2)%RX_NB_TH][eNB_id][0]->harq_processes[current_harq_pid];

    harq_status_t *current_harq_ack = &ue->dlsch[subframe_rx%RX_NB_TH][eNB_id][0]->harq_ack[subframe_rx];
    harq_status_t *harq_ack_dest    = &ue->dlsch[(subframe_rx+1)%RX_NB_TH][eNB_id][0]->harq_ack[subframe_rx];
    harq_status_t *harq_ack_dest1    = &ue->dlsch[(subframe_rx+2)%RX_NB_TH][eNB_id][0]->harq_ack[subframe_rx];

    copy_harq_proc_struct(harq_processes_dest, current_harq_processes);
    copy_ack_struct(harq_ack_dest, current_harq_ack);

    copy_harq_proc_struct(harq_processes_dest1, current_harq_processes);
    copy_ack_struct(harq_ack_dest1, current_harq_ack);
4727
    */
4728
    if (subframe_rx==9) {
fnabet's avatar
fnabet committed
4729 4730 4731
        if (frame_rx % 10 == 0) {
            if ((ue->dlsch_received[eNB_id] - ue->dlsch_received_last[eNB_id]) != 0)
                ue->dlsch_fer[eNB_id] = (100*(ue->dlsch_errors[eNB_id] - ue->dlsch_errors_last[eNB_id]))/(ue->dlsch_received[eNB_id] - ue->dlsch_received_last[eNB_id]);
4732

fnabet's avatar
fnabet committed
4733 4734 4735
            ue->dlsch_errors_last[eNB_id] = ue->dlsch_errors[eNB_id];
            ue->dlsch_received_last[eNB_id] = ue->dlsch_received[eNB_id];
        }
gabrielC's avatar
gabrielC committed
4736 4737


fnabet's avatar
fnabet committed
4738 4739 4740 4741 4742
        ue->bitrate[eNB_id] = (ue->total_TBS[eNB_id] - ue->total_TBS_last[eNB_id])*100;
        ue->total_TBS_last[eNB_id] = ue->total_TBS[eNB_id];
        LOG_D(PHY,"[UE %d] Calculating bitrate Frame %d: total_TBS = %d, total_TBS_last = %d, bitrate %f kbits\n",
                ue->Mod_id,frame_rx,ue->total_TBS[eNB_id],
                ue->total_TBS_last[eNB_id],(float) ue->bitrate[eNB_id]/1000.0);
gabrielC's avatar
gabrielC committed
4743

fnabet's avatar
fnabet committed
4744 4745 4746 4747
#if UE_AUTOTEST_TRACE
        if ((frame_rx % 100 == 0)) {
            LOG_I(PHY,"[UE  %d] AUTOTEST Metric : UE_DLSCH_BITRATE = %5.2f kbps (frame = %d) \n", ue->Mod_id, (float) ue->bitrate[eNB_id]/1000.0, frame_rx);
        }
4748
#endif
4749

4750
    }
4751

fnabet's avatar
fnabet committed
4752
#ifdef EMOS
4753
    phy_procedures_emos_UE_RX(ue,slot,eNB_id);
fnabet's avatar
fnabet committed
4754
#endif
4755

4756

fnabet's avatar
fnabet committed
4757
    VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME(VCD_SIGNAL_DUMPER_FUNCTIONS_PHY_PROCEDURES_UE_RX, VCD_FUNCTION_OUT);
jiangx's avatar
jiangx committed
4758

fnabet's avatar
fnabet committed
4759
#if UE_TIMING_TRACE
4760
    stop_meas(&ue->phy_proc_rx[ue->current_thread_id[subframe_rx]]);
fnabet's avatar
fnabet committed
4761
#if DISABLE_LOG_X
4762
    printf("------FULL RX PROC [AbsSFN %d.%d]: %5.2f ------\n",frame_rx,subframe_rx,ue->phy_proc_rx[ue->current_thread_id[subframe_rx]].p_time/(cpuf*1000.0));
fnabet's avatar
fnabet committed
4763
#else
4764
    LOG_D(PHY, "------FULL RX PROC [AbsSFN %d.%d]: %5.2f ------\n",frame_rx,subframe_rx,ue->phy_proc_rx[ue->current_thread_id[subframe_rx]].p_time/(cpuf*1000.0));
fnabet's avatar
fnabet committed
4765 4766
#endif
#endif
jiangx's avatar
jiangx committed
4767

fnabet's avatar
fnabet committed
4768
    LOG_D(PHY," ****** end RX-Chain  for AbsSubframe %d.%d ******  \n", frame_rx%1024, subframe_rx);
4769
    return (0);
fnabet's avatar
fnabet committed
4770
}
4771
#endif
4772

fnabet's avatar
fnabet committed
4773

4774 4775
int phy_procedures_UE_RX(PHY_VARS_UE *ue,UE_rxtx_proc_t *proc,uint8_t eNB_id,
			 uint8_t abstraction_flag,uint8_t do_pdcch_flag,runmode_t mode,
4776
			 relaying_type_t r_type,PHY_VARS_RN *phy_vars_rn) {
fnabet's avatar
fnabet committed
4777

4778 4779 4780 4781 4782
  int l,l2;
  int pilot1;
  int pmch_flag=0;
  int frame_rx = proc->frame_rx;
  int subframe_rx = proc->subframe_rx;
fnabet's avatar
fnabet committed
4783

4784 4785
  uint8_t next1_thread_id = ue->current_thread_id[subframe_rx]== (RX_NB_TH-1) ? 0:(ue->current_thread_id[subframe_rx]+1);
  uint8_t next2_thread_id = next1_thread_id== (RX_NB_TH-1) ? 0:(next1_thread_id+1);
fnabet's avatar
fnabet committed
4786

4787
  VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME(VCD_SIGNAL_DUMPER_FUNCTIONS_PHY_PROCEDURES_UE_RX, VCD_FUNCTION_IN);
fnabet's avatar
fnabet committed
4788 4789

#if T_TRACER
hbilel's avatar
hbilel committed
4790
  T(T_UE_PHY_DL_TICK, T_INT(ue->Mod_id), T_INT(frame_rx%1024), T_INT(subframe_rx));
4791

hbilel's avatar
hbilel committed
4792
  T(T_UE_PHY_INPUT_SIGNAL, T_INT(ue->Mod_id), T_INT(frame_rx%1024), T_INT(subframe_rx), T_INT(0),
4793 4794
    T_BUFFER(&ue->common_vars.rxdata[0][subframe_rx*ue->frame_parms.samples_per_tti],
             ue->frame_parms.samples_per_tti * 4));
gabrielC's avatar
gabrielC committed
4795
#endif
4796

hbilel's avatar
hbilel committed
4797
  // start timers
gabrielC's avatar
gabrielC committed
4798
#ifdef UE_DEBUG_TRACE
4799
  LOG_I(PHY," ****** start RX-Chain for AbsSubframe %d.%d ******  \n", frame_rx%1024, subframe_rx);
fnabet's avatar
fnabet committed
4800
#endif
4801

gabrielC's avatar
gabrielC committed
4802
#if UE_TIMING_TRACE
4803
  start_meas(&ue->phy_proc_rx[ue->current_thread_id[subframe_rx]]);
hbilel's avatar
hbilel committed
4804
  start_meas(&ue->generic_stat);
gabrielC's avatar
gabrielC committed
4805
#endif
4806

4807
  pmch_flag = is_pmch_subframe(frame_rx,subframe_rx,&ue->frame_parms) ? 1 : 0;
4808

4809
  if (do_pdcch_flag) {
4810
  // deactivate reception until we scan pdcch
4811 4812 4813 4814
  if (ue->dlsch[ue->current_thread_id[subframe_rx]][eNB_id][0])
    ue->dlsch[ue->current_thread_id[subframe_rx]][eNB_id][0]->active = 0;
  if (ue->dlsch[ue->current_thread_id[subframe_rx]][eNB_id][1])
    ue->dlsch[ue->current_thread_id[subframe_rx]][eNB_id][1]->active = 0;
4815

4816 4817
  if (ue->dlsch_SI[eNB_id])
    ue->dlsch_SI[eNB_id]->active = 0;
4818 4819
  if (ue->dlsch_p[eNB_id])
    ue->dlsch_p[eNB_id]->active = 0;
4820 4821
  if (ue->dlsch_ra[eNB_id])
    ue->dlsch_ra[eNB_id]->active = 0;
4822
  }
4823 4824

#ifdef DEBUG_PHY_PROC
Cedric Roux's avatar
Cedric Roux committed
4825
  LOG_D(PHY,"[%s %d] Frame %d subframe %d: Doing phy_procedures_UE_RX\n",
4826 4827
  (r_type == multicast_relay) ? "RN/UE" : "UE",
  ue->Mod_id,frame_rx, subframe_rx);
4828 4829
#endif

4830 4831 4832 4833 4834
  if (ue->frame_parms.Ncp == 0) {  // normal prefix
    pilot1 = 4;
  } else { // extended prefix
    pilot1 = 3;
  }
fnabet's avatar
fnabet committed
4835 4836


4837 4838 4839 4840 4841 4842 4843
  if (subframe_select(&ue->frame_parms,subframe_rx) == SF_S) { // S-subframe, do first 5 symbols only
    l2 = 5;
  } else if (pmch_flag == 1) { // do first 2 symbols only
    l2 = 1;
  } else { // normal subframe, last symbol to be processed is the first of the second slot
    l2 = (ue->frame_parms.symbols_per_tti/2)-1;
  }
fnabet's avatar
fnabet committed
4844

4845 4846 4847 4848 4849 4850 4851 4852 4853 4854 4855 4856
  int prev_subframe_rx = (subframe_rx - 1)<0? 9: (subframe_rx - 1);
  if (subframe_select(&ue->frame_parms,prev_subframe_rx) != SF_DL) {
    //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
    // RX processing of symbols l=0...l2
    //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
    l=0;
  } else {
    //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
    // RX processing of symbols l=1...l2 (l=0 is done in last scheduling epoch)
    //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
    l=1;
  }
hbilel's avatar
hbilel committed
4857

4858 4859
  LOG_D(PHY," ------ slot 0 Processing: AbsSubframe %d.%d ------  \n", frame_rx%1024, subframe_rx);
  LOG_D(PHY," ------  --> FFT/ChannelEst/PDCCH slot 0: AbsSubframe %d.%d ------  \n", frame_rx%1024, subframe_rx);
4860
  for (; l<=l2; l++) {
4861
    if (abstraction_flag == 0) {
gabrielC's avatar
gabrielC committed
4862 4863 4864
#if UE_TIMING_TRACE
        start_meas(&ue->ofdm_demod_stats);
#endif
4865 4866
      VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME(VCD_SIGNAL_DUMPER_FUNCTIONS_UE_SLOT_FEP, VCD_FUNCTION_IN);
      slot_fep(ue,
4867 4868 4869 4870 4871
         l,
         (subframe_rx<<1),
         0,
         0,
         0);
4872
      VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME(VCD_SIGNAL_DUMPER_FUNCTIONS_UE_SLOT_FEP, VCD_FUNCTION_OUT);
gabrielC's avatar
gabrielC committed
4873
#if UE_TIMING_TRACE
4874
      stop_meas(&ue->ofdm_demod_stats);
gabrielC's avatar
gabrielC committed
4875
#endif
4876
    }
fnabet's avatar
fnabet committed
4877

4878
    ue_measurement_procedures(l-1,ue,proc,eNB_id,(subframe_rx<<1),abstraction_flag,mode);
fnabet's avatar
fnabet committed
4879

4880 4881 4882 4883
    if (do_pdcch_flag) {
      if ((l==pilot1) ||
	  ((pmch_flag==1)&(l==l2)))  {
	LOG_D(PHY,"[UE  %d] Frame %d: Calling pdcch procedures (eNB %d)\n",ue->Mod_id,frame_rx,eNB_id);
fnabet's avatar
fnabet committed
4884

4885
	//start_meas(&ue->rx_pdcch_stats[ue->current_thread_id[subframe_rx]]);
4886 4887 4888 4889
	if (ue_pdcch_procedures(eNB_id,ue,proc,abstraction_flag) == -1) {
	  LOG_E(PHY,"[UE  %d] Frame %d, subframe %d: Error in pdcch procedures\n",ue->Mod_id,frame_rx,subframe_rx);
	  return(-1);
	}
4890
	//stop_meas(&ue->rx_pdcch_stats[ue->current_thread_id[subframe_rx]]);
4891
    //printf("subframe %d n_pdcch_sym %d pdcch procedures  %5.3f \n",
4892 4893
    //        subframe_rx, ue->pdcch_vars[ue->current_thread_id[subframe_rx]][eNB_id]->num_pdcch_symbols,
    //     (ue->rx_pdcch_stats[ue->current_thread_id[subframe_rx]].p_time)/(cpuf*1000.0));
4894
	LOG_D(PHY,"num_pdcch_symbols %d\n",ue->pdcch_vars[ue->current_thread_id[subframe_rx]][eNB_id]->num_pdcch_symbols);
4895
      }
4896
    }
4897

4898
  } // for l=1..l2
4899 4900
  ue_measurement_procedures(l-1,ue,proc,eNB_id,(subframe_rx<<1),abstraction_flag,mode);

4901
  LOG_D(PHY," ------  end FFT/ChannelEst/PDCCH slot 0: AbsSubframe %d.%d ------  \n", frame_rx%1024, subframe_rx);
4902 4903 4904 4905 4906
    // If this is PMCH, call procedures and return
  if (pmch_flag == 1) {
    ue_pmch_procedures(ue,proc,eNB_id,abstraction_flag);
    return 0;
  }
4907

4908
  slot_fep(ue,
4909 4910 4911 4912 4913
     0,
     1+(subframe_rx<<1),
     0,
     0,
     0);
4914

4915
  // first slot has been processed (FFTs + Channel Estimation, PCFICH/PHICH/PDCCH)
gabrielC's avatar
gabrielC committed
4916
#if UE_TIMING_TRACE
hbilel's avatar
hbilel committed
4917
  stop_meas(&ue->generic_stat);
Cedric Roux's avatar
Cedric Roux committed
4918
#if DISABLE_LOG_X
gabrielC's avatar
gabrielC committed
4919
  printf("[SFN %d] Slot0: FFT + Channel Estimate + PCFICH/PHICH/PDCCH %5.2f \n",subframe_rx,ue->generic_stat.p_time/(cpuf*1000.0));
Cedric Roux's avatar
Cedric Roux committed
4920 4921
#else
  LOG_D(PHY, "[SFN %d] Slot0: FFT + Channel Estimate + PCFICH/PHICH/PDCCH %5.2f \n",subframe_rx,ue->generic_stat.p_time/(cpuf*1000.0));
fnabet's avatar
fnabet committed
4922
#endif
hbilel's avatar
hbilel committed
4923

gabrielC's avatar
gabrielC committed
4924
#endif
fnabet's avatar
fnabet committed
4925

gabrielC's avatar
gabrielC committed
4926 4927
  LOG_D(PHY," ------ --> PDSCH ChannelComp/LLR slot 0: AbsSubframe %d.%d ------  \n", frame_rx%1024, subframe_rx);
#if UE_TIMING_TRACE
hbilel's avatar
hbilel committed
4928
  start_meas(&ue->generic_stat);
gabrielC's avatar
gabrielC committed
4929
#endif
4930
  // do procedures for C-RNTI
4931
  if (ue->dlsch[ue->current_thread_id[subframe_rx]][eNB_id][0]->active == 1) {
4932
    VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME(VCD_SIGNAL_DUMPER_FUNCTIONS_PDSCH_PROC, VCD_FUNCTION_IN);
4933 4934 4935 4936
    ue_pdsch_procedures(ue,
			proc,
			eNB_id,
			PDSCH,
4937
			ue->dlsch[ue->current_thread_id[subframe_rx]][eNB_id][0],
4938
			NULL,
4939
			ue->pdcch_vars[ue->current_thread_id[subframe_rx]][eNB_id]->num_pdcch_symbols,
4940 4941
			ue->frame_parms.symbols_per_tti>>1,
			abstraction_flag);
fnabet's avatar
fnabet committed
4942

4943
    VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME(VCD_SIGNAL_DUMPER_FUNCTIONS_PDSCH_PROC, VCD_FUNCTION_OUT);
4944
  }
hbilel's avatar
hbilel committed
4945

4946
  LOG_D(PHY," ------ end PDSCH ChannelComp/LLR slot 0: AbsSubframe %d.%d ------  \n", frame_rx%1024, subframe_rx);
4947 4948
  // do procedures for SI-RNTI
  if ((ue->dlsch_SI[eNB_id]) && (ue->dlsch_SI[eNB_id]->active == 1)) {
4949
    VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME(VCD_SIGNAL_DUMPER_FUNCTIONS_PDSCH_PROC_SI, VCD_FUNCTION_IN);
4950
    ue_pdsch_procedures(ue,
4951

4952 4953 4954 4955 4956
			proc,
			eNB_id,
			SI_PDSCH,
			ue->dlsch_SI[eNB_id],
			NULL,
4957
			ue->pdcch_vars[ue->current_thread_id[subframe_rx]][eNB_id]->num_pdcch_symbols,
4958 4959
			ue->frame_parms.symbols_per_tti>>1,
			abstraction_flag);
4960
    VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME(VCD_SIGNAL_DUMPER_FUNCTIONS_PDSCH_PROC_SI, VCD_FUNCTION_OUT);
4961
  }
4962 4963 4964

  // do procedures for SI-RNTI
  if ((ue->dlsch_p[eNB_id]) && (ue->dlsch_p[eNB_id]->active == 1)) {
4965
    VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME(VCD_SIGNAL_DUMPER_FUNCTIONS_PDSCH_PROC_P, VCD_FUNCTION_IN);
4966 4967 4968 4969 4970 4971
    ue_pdsch_procedures(ue,
			proc,
			eNB_id,
			P_PDSCH,
			ue->dlsch_p[eNB_id],
			NULL,
4972
			ue->pdcch_vars[ue->current_thread_id[subframe_rx]][eNB_id]->num_pdcch_symbols,
4973 4974
			ue->frame_parms.symbols_per_tti>>1,
			abstraction_flag);
4975
    VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME(VCD_SIGNAL_DUMPER_FUNCTIONS_PDSCH_PROC_P, VCD_FUNCTION_OUT);
4976 4977
  }

4978 4979
  // do procedures for RA-RNTI
  if ((ue->dlsch_ra[eNB_id]) && (ue->dlsch_ra[eNB_id]->active == 1)) {
4980
    VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME(VCD_SIGNAL_DUMPER_FUNCTIONS_PDSCH_PROC_RA, VCD_FUNCTION_IN);
4981 4982 4983 4984 4985 4986
    ue_pdsch_procedures(ue,
			proc,
			eNB_id,
			RA_PDSCH,
			ue->dlsch_ra[eNB_id],
			NULL,
4987
			ue->pdcch_vars[ue->current_thread_id[subframe_rx]][eNB_id]->num_pdcch_symbols,
4988 4989
			ue->frame_parms.symbols_per_tti>>1,
			abstraction_flag);
4990
    VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME(VCD_SIGNAL_DUMPER_FUNCTIONS_PDSCH_PROC_RA, VCD_FUNCTION_OUT);
4991
  }
fnabet's avatar
fnabet committed
4992

4993 4994
  LOG_D(PHY," ------ slot 1 Processing: AbsSubframe %d.%d ------  \n", frame_rx%1024, subframe_rx);
  LOG_D(PHY," ------  --> FFT/ChannelEst/PDCCH slot 1: AbsSubframe %d.%d ------  \n", frame_rx%1024, subframe_rx);
hbilel's avatar
hbilel committed
4995

4996 4997 4998
  if (subframe_select(&ue->frame_parms,subframe_rx) != SF_S) {  // do front-end processing for second slot, and first symbol of next subframe
    for (l=1; l<ue->frame_parms.symbols_per_tti>>1; l++) {
      if (abstraction_flag == 0) {
gabrielC's avatar
gabrielC committed
4999 5000 5001
#if UE_TIMING_TRACE
          start_meas(&ue->ofdm_demod_stats);
#endif
5002 5003 5004 5005
	VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME(VCD_SIGNAL_DUMPER_FUNCTIONS_UE_SLOT_FEP, VCD_FUNCTION_IN);
	slot_fep(ue,
		 l,
		 1+(subframe_rx<<1),
5006
		 0,
5007 5008 5009
		 0,
		 0);
	VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME(VCD_SIGNAL_DUMPER_FUNCTIONS_UE_SLOT_FEP, VCD_FUNCTION_OUT);
gabrielC's avatar
gabrielC committed
5010 5011 5012
#if UE_TIMING_TRACE
    stop_meas(&ue->ofdm_demod_stats);
#endif
5013
      }
fnabet's avatar
fnabet committed
5014

5015
      ue_measurement_procedures(l-1,ue,proc,eNB_id,1+(subframe_rx<<1),abstraction_flag,mode);
fnabet's avatar
fnabet committed
5016

5017
    } // for l=1..l2
5018 5019 5020 5021 5022 5023 5024 5025

    // do first symbol of next downlink subframe for channel estimation
    int next_subframe_rx = (1+subframe_rx)%10;
    if (subframe_select(&ue->frame_parms,next_subframe_rx) != SF_UL)
    {
      slot_fep(ue,
         0,
         (next_subframe_rx<<1),
5026
         0,
5027 5028 5029
         0,
         0);
    }
5030
  } // not an S-subframe
gabrielC's avatar
gabrielC committed
5031
#if UE_TIMING_TRACE
hbilel's avatar
hbilel committed
5032
  stop_meas(&ue->generic_stat);
Cedric Roux's avatar
Cedric Roux committed
5033
#if DISABLE_LOG_X
gabrielC's avatar
gabrielC committed
5034
  printf("[SFN %d] Slot1: FFT + Channel Estimate + Pdsch Proc Slot0 %5.2f \n",subframe_rx,ue->generic_stat.p_time/(cpuf*1000.0));
Cedric Roux's avatar
Cedric Roux committed
5035 5036 5037
#else
  LOG_D(PHY, "[SFN %d] Slot1: FFT + Channel Estimate + Pdsch Proc Slot0 %5.2f \n",subframe_rx,ue->generic_stat.p_time/(cpuf*1000.0));
#endif
fnabet's avatar
fnabet committed
5038 5039

#endif
hbilel's avatar
hbilel committed
5040

5041 5042
  LOG_D(PHY," ------  end FFT/ChannelEst/PDCCH slot 1: AbsSubframe %d.%d ------  \n", frame_rx%1024, subframe_rx);

5043 5044
  if ( (subframe_rx == 0) && (ue->decode_MIB == 1))
  {
5045
    ue_pbch_procedures(eNB_id,ue,proc,abstraction_flag);
5046
  }
fnabet's avatar
fnabet committed
5047 5048 5049



5050
  // do procedures for C-RNTI
5051
  LOG_D(PHY," ------ --> PDSCH ChannelComp/LLR slot 0: AbsSubframe %d.%d ------  \n", frame_rx%1024, subframe_rx);
5052
  if (ue->dlsch[ue->current_thread_id[subframe_rx]][eNB_id][0]->active == 1) {
5053
    VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME(VCD_SIGNAL_DUMPER_FUNCTIONS_PDSCH_PROC, VCD_FUNCTION_IN);
gabrielC's avatar
gabrielC committed
5054
#if UE_TIMING_TRACE
5055
    start_meas(&ue->pdsch_procedures_stat[ue->current_thread_id[subframe_rx]);
gabrielC's avatar
gabrielC committed
5056
#endif
5057 5058 5059 5060
    ue_pdsch_procedures(ue,
			proc,
			eNB_id,
			PDSCH,
5061
			ue->dlsch[ue->current_thread_id[subframe_rx]][eNB_id][0],
5062 5063 5064 5065
			NULL,
			1+(ue->frame_parms.symbols_per_tti>>1),
			ue->frame_parms.symbols_per_tti-1,
			abstraction_flag);
5066 5067
    LOG_D(PHY," ------ end PDSCH ChannelComp/LLR slot 0: AbsSubframe %d.%d ------  \n", frame_rx%1024, subframe_rx);
    LOG_D(PHY," ------ --> PDSCH Turbo Decoder slot 0/1: AbsSubframe %d.%d ------  \n", frame_rx%1024, subframe_rx);
gabrielC's avatar
gabrielC committed
5068
#if UE_TIMING_TRACE
5069 5070
    stop_meas(&ue->pdsch_procedures_stat[ue->current_thread_id[subframe_rx]]);
    start_meas(&ue->dlsch_procedures_stat[ue->current_thread_id[subframe_rx]]);
gabrielC's avatar
gabrielC committed
5071
#endif
5072 5073 5074 5075
    ue_dlsch_procedures(ue,
			proc,
			eNB_id,
			PDSCH,
5076 5077
			ue->dlsch[ue->current_thread_id[subframe_rx]][eNB_id][0],
			ue->dlsch[ue->current_thread_id[subframe_rx]][eNB_id][1],
5078 5079 5080
			&ue->dlsch_errors[eNB_id],
			mode,
			abstraction_flag);
gabrielC's avatar
gabrielC committed
5081
#if UE_TIMING_TRACE
5082
    stop_meas(&ue->dlsch_procedures_stat[ue->current_thread_id[subframe_rx]]);
Cedric Roux's avatar
Cedric Roux committed
5083
#if DISABLE_LOG_X
5084 5085
    printf("[SFN %d] Slot1:       Pdsch Proc %5.2f\n",subframe_rx,ue->pdsch_procedures_stat[ue->current_thread_id[subframe_rx]].p_time/(cpuf*1000.0));
    printf("[SFN %d] Slot0 Slot1: Dlsch Proc %5.2f\n",subframe_rx,ue->dlsch_procedures_stat[ue->current_thread_id[subframe_rx]].p_time/(cpuf*1000.0));
Cedric Roux's avatar
Cedric Roux committed
5086
#else
5087 5088
    LOG_D(PHY, "[SFN %d] Slot1:       Pdsch Proc %5.2f\n",subframe_rx,ue->pdsch_procedures_stat[ue->current_thread_id[subframe_rx]].p_time/(cpuf*1000.0));
    LOG_D(PHY, "[SFN %d] Slot0 Slot1: Dlsch Proc %5.2f\n",subframe_rx,ue->dlsch_procedures_stat[ue->current_thread_id[subframe_rx]].p_time/(cpuf*1000.0));
Cedric Roux's avatar
Cedric Roux committed
5089
#endif
fnabet's avatar
fnabet committed
5090

gabrielC's avatar
gabrielC committed
5091
#endif
hbilel's avatar
hbilel committed
5092

5093
    VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME(VCD_SIGNAL_DUMPER_FUNCTIONS_PDSCH_PROC, VCD_FUNCTION_OUT);
5094

5095
  }
gabrielC's avatar
gabrielC committed
5096
#if UE_TIMING_TRACE
hbilel's avatar
hbilel committed
5097
  start_meas(&ue->generic_stat);
gabrielC's avatar
gabrielC committed
5098
#endif
hbilel's avatar
hbilel committed
5099 5100

#if 0
5101
  if(subframe_rx==5 &&  ue->dlsch[ue->current_thread_id[subframe_rx]][eNB_id][0]->harq_processes[ue->dlsch[ue->current_thread_id[subframe_rx]][eNB_id][0]->current_harq_pid]->nb_rb > 20){
hbilel's avatar
hbilel committed
5102 5103 5104
       //write_output("decoder_llr.m","decllr",dlsch_llr,G,1,0);
       //write_output("llr.m","llr",  &ue->pdsch_vars[eNB_id]->llr[0][0],(14*nb_rb*12*dlsch1_harq->Qm) - 4*(nb_rb*4*dlsch1_harq->Qm),1,0);

5105 5106
       write_output("rxdataF0_current.m"    , "rxdataF0", &ue->common_vars.common_vars_rx_data_per_thread[ue->current_thread_id[subframe_rx]].rxdataF[0][0],14*ue->frame_parms.ofdm_symbol_size,1,1);
       //write_output("rxdataF0_previous.m"    , "rxdataF0_prev_sss", &ue->common_vars.common_vars_rx_data_per_thread[next_thread_id].rxdataF[0][0],14*ue->frame_parms.ofdm_symbol_size,1,1);
hbilel's avatar
hbilel committed
5107

5108
       //write_output("rxdataF0_previous.m"    , "rxdataF0_prev", &ue->common_vars.common_vars_rx_data_per_thread[next_thread_id].rxdataF[0][0],14*ue->frame_parms.ofdm_symbol_size,1,1);
hbilel's avatar
hbilel committed
5109

5110 5111 5112 5113 5114
       write_output("dl_ch_estimates.m", "dl_ch_estimates_sfn5", &ue->common_vars.common_vars_rx_data_per_thread[ue->current_thread_id[subframe_rx]].dl_ch_estimates[0][0][0],14*ue->frame_parms.ofdm_symbol_size,1,1);
       write_output("dl_ch_estimates_ext.m", "dl_ch_estimatesExt_sfn5", &ue->pdsch_vars[ue->current_thread_id[subframe_rx]][0]->dl_ch_estimates_ext[0][0],14*ue->frame_parms.N_RB_DL*12,1,1);
       write_output("rxdataF_comp00.m","rxdataF_comp00",         &ue->pdsch_vars[ue->current_thread_id[subframe_rx]][0]->rxdataF_comp0[0][0],14*ue->frame_parms.N_RB_DL*12,1,1);
       //write_output("magDLFirst.m", "magDLFirst", &phy_vars_ue->pdsch_vars[ue->current_thread_id[subframe_rx]][0]->dl_ch_mag0[0][0],14*frame_parms->N_RB_DL*12,1,1);
       //write_output("magDLSecond.m", "magDLSecond", &phy_vars_ue->pdsch_vars[ue->current_thread_id[subframe_rx]][0]->dl_ch_magb0[0][0],14*frame_parms->N_RB_DL*12,1,1);
hbilel's avatar
hbilel committed
5115 5116 5117 5118 5119

       AssertFatal (0,"");
  }
#endif

5120 5121 5122
  // do procedures for SI-RNTI
  if ((ue->dlsch_SI[eNB_id]) && (ue->dlsch_SI[eNB_id]->active == 1)) {
    ue_pdsch_procedures(ue,
5123 5124 5125 5126 5127 5128 5129 5130
      proc,
      eNB_id,
      SI_PDSCH,
      ue->dlsch_SI[eNB_id],
      NULL,
      1+(ue->frame_parms.symbols_per_tti>>1),
      ue->frame_parms.symbols_per_tti-1,
      abstraction_flag);
5131

5132
    ue_dlsch_procedures(ue,
5133 5134 5135 5136 5137 5138 5139 5140
      proc,
      eNB_id,
      SI_PDSCH,
      ue->dlsch_SI[eNB_id],
      NULL,
      &ue->dlsch_SI_errors[eNB_id],
      mode,
      abstraction_flag);
5141 5142
    ue->dlsch_SI[eNB_id]->active = 0;
  }
5143 5144 5145 5146

  // do procedures for P-RNTI
  if ((ue->dlsch_p[eNB_id]) && (ue->dlsch_p[eNB_id]->active == 1)) {
    ue_pdsch_procedures(ue,
5147 5148 5149 5150 5151 5152 5153 5154
      proc,
      eNB_id,
      P_PDSCH,
      ue->dlsch_p[eNB_id],
      NULL,
      1+(ue->frame_parms.symbols_per_tti>>1),
      ue->frame_parms.symbols_per_tti-1,
      abstraction_flag);
5155 5156

    ue_dlsch_procedures(ue,
5157 5158 5159 5160 5161 5162 5163 5164
      proc,
      eNB_id,
      P_PDSCH,
      ue->dlsch_p[eNB_id],
      NULL,
      &ue->dlsch_p_errors[eNB_id],
      mode,
      abstraction_flag);
5165 5166
    ue->dlsch_p[eNB_id]->active = 0;
  }
5167 5168 5169
  // do procedures for RA-RNTI
  if ((ue->dlsch_ra[eNB_id]) && (ue->dlsch_ra[eNB_id]->active == 1)) {
    ue_pdsch_procedures(ue,
5170 5171 5172 5173 5174 5175 5176 5177
      proc,
      eNB_id,
      RA_PDSCH,
      ue->dlsch_ra[eNB_id],
      NULL,
      1+(ue->frame_parms.symbols_per_tti>>1),
      ue->frame_parms.symbols_per_tti-1,
      abstraction_flag);
5178
    ue_dlsch_procedures(ue,
5179 5180 5181 5182 5183 5184 5185 5186
      proc,
      eNB_id,
      RA_PDSCH,
      ue->dlsch_ra[eNB_id],
      NULL,
      &ue->dlsch_ra_errors[eNB_id],
      mode,
      abstraction_flag);
5187 5188
    ue->dlsch_ra[eNB_id]->active = 0;
  }
5189

gabrielC's avatar
gabrielC committed
5190
  // duplicate harq structure
5191

5192 5193 5194 5195
  uint8_t          current_harq_pid        = ue->dlsch[ue->current_thread_id[subframe_rx]][eNB_id][0]->current_harq_pid;
  LTE_DL_UE_HARQ_t *current_harq_processes = ue->dlsch[ue->current_thread_id[subframe_rx]][eNB_id][0]->harq_processes[current_harq_pid];
  LTE_DL_UE_HARQ_t *harq_processes_dest    = ue->dlsch[next1_thread_id][eNB_id][0]->harq_processes[current_harq_pid];
  LTE_DL_UE_HARQ_t *harq_processes_dest1    = ue->dlsch[next2_thread_id][eNB_id][0]->harq_processes[current_harq_pid];
gabrielC's avatar
gabrielC committed
5196

5197 5198 5199
  harq_status_t *current_harq_ack = &ue->dlsch[ue->current_thread_id[subframe_rx]][eNB_id][0]->harq_ack[subframe_rx];
  harq_status_t *harq_ack_dest    = &ue->dlsch[next1_thread_id][eNB_id][0]->harq_ack[subframe_rx];
  harq_status_t *harq_ack_dest1    = &ue->dlsch[next2_thread_id][eNB_id][0]->harq_ack[subframe_rx];
gabrielC's avatar
gabrielC committed
5200

5201 5202
  copy_harq_proc_struct(harq_processes_dest, current_harq_processes);
  copy_ack_struct(harq_ack_dest, current_harq_ack);
gabrielC's avatar
gabrielC committed
5203

5204 5205 5206
  copy_harq_proc_struct(harq_processes_dest1, current_harq_processes);
  copy_ack_struct(harq_ack_dest1, current_harq_ack);

5207
  if (subframe_rx==9) {
Raymond Knopp's avatar
 
Raymond Knopp committed
5208
    if (frame_rx % 10 == 0) {
5209
      if ((ue->dlsch_received[eNB_id] - ue->dlsch_received_last[eNB_id]) != 0)
5210
  ue->dlsch_fer[eNB_id] = (100*(ue->dlsch_errors[eNB_id] - ue->dlsch_errors_last[eNB_id]))/(ue->dlsch_received[eNB_id] - ue->dlsch_received_last[eNB_id]);
5211

5212 5213
      ue->dlsch_errors_last[eNB_id] = ue->dlsch_errors[eNB_id];
      ue->dlsch_received_last[eNB_id] = ue->dlsch_received[eNB_id];
5214
    }
5215 5216


5217 5218
    ue->bitrate[eNB_id] = (ue->total_TBS[eNB_id] - ue->total_TBS_last[eNB_id])*100;
    ue->total_TBS_last[eNB_id] = ue->total_TBS[eNB_id];
5219
    LOG_D(PHY,"[UE %d] Calculating bitrate Frame %d: total_TBS = %d, total_TBS_last = %d, bitrate %f kbits\n",
fnabet's avatar
fnabet committed
5220 5221
    ue->Mod_id,frame_rx,ue->total_TBS[eNB_id],
    ue->total_TBS_last[eNB_id],(float) ue->bitrate[eNB_id]/1000.0);
5222 5223 5224 5225 5226 5227 5228

  #if UE_AUTOTEST_TRACE
    if ((frame_rx % 100 == 0)) {
      LOG_I(PHY,"[UE  %d] AUTOTEST Metric : UE_DLSCH_BITRATE = %5.2f kbps (frame = %d) \n", ue->Mod_id, (float) ue->bitrate[eNB_id]/1000.0, frame_rx);
    }
  #endif

5229
  }
5230

gabrielC's avatar
gabrielC committed
5231
#if UE_TIMING_TRACE
hbilel's avatar
hbilel committed
5232
  stop_meas(&ue->generic_stat);
gabrielC's avatar
gabrielC committed
5233 5234
  printf("after tubo until end of Rx %5.2f \n",ue->generic_stat.p_time/(cpuf*1000.0));
#endif
jiangx's avatar
jiangx committed
5235 5236

#ifdef EMOS
5237
  phy_procedures_emos_UE_RX(ue,slot,eNB_id);
jiangx's avatar
jiangx committed
5238 5239
#endif

fnabet's avatar
fnabet committed
5240

5241
  VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME(VCD_SIGNAL_DUMPER_FUNCTIONS_PHY_PROCEDURES_UE_RX, VCD_FUNCTION_OUT);
hbilel's avatar
hbilel committed
5242

gabrielC's avatar
gabrielC committed
5243
#if UE_TIMING_TRACE
5244
  stop_meas(&ue->phy_proc_rx[ue->current_thread_id[subframe_rx]]);
Cedric Roux's avatar
Cedric Roux committed
5245
#if DISABLE_LOG_X
5246
  printf("------FULL RX PROC [SFN %d]: %5.2f ------\n",subframe_rx,ue->phy_proc_rx[ue->current_thread_id[subframe_rx]].p_time/(cpuf*1000.0));
Cedric Roux's avatar
Cedric Roux committed
5247
#else
5248
  LOG_D(PHY, "------FULL RX PROC [SFN %d]: %5.2f ------\n",subframe_rx,ue->phy_proc_rx[ue->current_thread_id[subframe_rx]].p_time/(cpuf*1000.0));
Cedric Roux's avatar
Cedric Roux committed
5249
#endif
gabrielC's avatar
gabrielC committed
5250
#endif
fnabet's avatar
fnabet committed
5251

5252
  LOG_D(PHY," ****** end RX-Chain  for AbsSubframe %d.%d ******  \n", frame_rx%1024, subframe_rx);
5253
  return (0);
5254
}
5255

Cedric Roux's avatar
Cedric Roux committed
5256
#if defined(Rel10) || defined(Rel14)
5257

5258 5259
int phy_procedures_RN_UE_RX(uint8_t slot_rx, uint8_t next_slot, relaying_type_t r_type)
{
5260

5261
  int do_proc =0; // do nothing by default
5262

5263
  switch(r_type) {
5264
  case no_relay:
5265
    do_proc=no_relay; // perform the normal UE operation
5266
    break;
5267

5268
  case multicast_relay:
Raymond Knopp's avatar
 
Raymond Knopp committed
5269
    if (slot_rx > 12)
5270 5271
      do_proc = 0; // do nothing
    else // SF#1, SF#2, SF3, SF#3, SF#4, SF#5, SF#6(do rx slot 12)
5272
      do_proc = multicast_relay ; // do PHY procedures UE RX
5273

5274
    break;
5275

5276 5277 5278 5279 5280
  default: // should'not be here
    LOG_W(PHY,"Not supported relay type %d, do nothing \n", r_type);
    do_proc= 0;
    break;
  }
5281

5282 5283
  return do_proc;
}
5284
#endif
5285

5286
void phy_procedures_UE_lte(PHY_VARS_UE *ue,UE_rxtx_proc_t *proc,uint8_t eNB_id,uint8_t abstraction_flag,uint8_t do_pdcch_flag,runmode_t mode,
5287
			   relaying_type_t r_type, PHY_VARS_RN *phy_vars_rn)
5288
{
5289
#if defined(ENABLE_ITTI)
5290 5291 5292 5293 5294
  MessageDef   *msg_p;
  const char   *msg_name;
  instance_t    instance;
  unsigned int  Mod_id;
  int           result;
5295
#endif
5296

5297 5298 5299 5300
  int           frame_rx = proc->frame_rx;
  int           frame_tx = proc->frame_tx;
  int           subframe_rx = proc->subframe_rx;
  int           subframe_tx = proc->subframe_tx;
5301
#undef DEBUG_PHY_PROC
5302

5303
  UE_L2_STATE_t ret;
5304
  int slot;
Florian Kaltenberger's avatar
Florian Kaltenberger committed
5305

5306 5307
  if (ue->mac_enabled == 0) {
    ue->UE_mode[eNB_id]=PUSCH;
Florian Kaltenberger's avatar
Florian Kaltenberger committed
5308
  }
5309 5310


5311
  VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME(VCD_SIGNAL_DUMPER_FUNCTIONS_PHY_PROCEDURES_UE_LTE,1);
gabrielC's avatar
gabrielC committed
5312
#if UE_TIMING_TRACE
5313
  start_meas(&ue->phy_proc[ue->current_thread_id[subframe_rx]]);
gabrielC's avatar
gabrielC committed
5314
#endif
5315
#if defined(ENABLE_ITTI)
5316

5317 5318
  do {
    // Checks if a message has been sent to PHY sub-task
5319
    itti_poll_msg (TASK_PHY_UE, &msg_p);
5320

5321 5322 5323 5324
    if (msg_p != NULL) {
      msg_name = ITTI_MSG_NAME (msg_p);
      instance = ITTI_MSG_INSTANCE (msg_p);
      Mod_id = instance - NB_eNB_INST;
5325

5326
      switch (ITTI_MSG_ID(msg_p)) {
5327
      case PHY_FIND_CELL_REQ:
5328 5329 5330 5331 5332
  LOG_I(PHY, "[UE %d] Received %s\n", Mod_id, msg_name);

  /* TODO process the message */
  break;

5333
      default:
5334 5335
  LOG_E(PHY, "[UE %d] Received unexpected message %s\n", Mod_id, msg_name);
  break;
5336
      }
5337

5338 5339
      result = itti_free (ITTI_MSG_ORIGIN_ID(msg_p), msg_p);
      AssertFatal (result == EXIT_SUCCESS, "Failed to free memory (%d)!\n", result);
5340 5341
    }
  } while(msg_p != NULL);
5342

5343
#endif
5344

5345
  for (slot=0;slot<2;slot++) {
5346

5347
    if ((subframe_select(&ue->frame_parms,subframe_tx)==SF_UL)||
5348
  (ue->frame_parms.frame_type == FDD)) {
5349 5350
      phy_procedures_UE_TX(ue,proc,eNB_id,abstraction_flag,mode,r_type);
    }
5351

5352
    if ((subframe_select(&ue->frame_parms,subframe_rx)==SF_DL) ||
5353
  (ue->frame_parms.frame_type == FDD)) {
Cedric Roux's avatar
Cedric Roux committed
5354
#if defined(Rel10) || defined(Rel14)
5355

5356
      if (phy_procedures_RN_UE_RX(subframe_rx, subframe_tx, r_type) != 0 )
5357
#endif
5358
	phy_procedures_UE_RX(ue,proc,eNB_id,abstraction_flag,do_pdcch_flag,mode,r_type,phy_vars_rn);
5359
    }
5360

5361
    if ((subframe_select(&ue->frame_parms,subframe_tx)==SF_S) &&
5362
  (slot==1)) {
5363 5364
      phy_procedures_UE_S_TX(ue,eNB_id,abstraction_flag,r_type);
    }
5365

5366
    if ((subframe_select(&ue->frame_parms,subframe_rx)==SF_S) &&
5367
  (slot==0)) {
Cedric Roux's avatar
Cedric Roux committed
5368
#if defined(Rel10) || defined(Rel14)
5369

5370
      if (phy_procedures_RN_UE_RX(subframe_rx, subframe_tx, r_type) != 0 )
5371
#endif
5372
	phy_procedures_UE_RX(ue,proc,eNB_id,abstraction_flag,do_pdcch_flag,mode,r_type,phy_vars_rn);
5373
    }
5374

5375 5376
    if (ue->mac_enabled==1) {
      if (slot==0) {
5377

5378
          //LOG_I(PHY,"[UE %d] Frame %d, subframe %d, star ue_scheduler\n", ue->Mod_id,frame_rx,subframe_tx);
5379 5380 5381 5382 5383 5384 5385 5386 5387
        ret = ue_scheduler(ue->Mod_id,
			   frame_rx,
			   subframe_rx,
			   frame_tx,
			   subframe_tx,
			   subframe_select(&ue->frame_parms,subframe_tx),
			   eNB_id,
			   0/*FIXME CC_id*/);
	
5388 5389 5390 5391 5392 5393 5394 5395 5396 5397 5398 5399 5400 5401 5402 5403 5404 5405
	if (ret == CONNECTION_LOST) {
	  LOG_E(PHY,"[UE %d] Frame %d, subframe %d RRC Connection lost, returning to PRACH\n",ue->Mod_id,
		frame_rx,subframe_tx);
	  ue->UE_mode[eNB_id] = PRACH;
	  //      mac_xface->macphy_exit("Connection lost");
	} else if (ret == PHY_RESYNCH) {
	  LOG_E(PHY,"[UE %d] Frame %d, subframe %d RRC Connection lost, trying to resynch\n",
		ue->Mod_id,
		frame_rx,subframe_tx);
	  ue->UE_mode[eNB_id] = RESYNCH;
	  //     mac_xface->macphy_exit("Connection lost");
	} else if (ret == PHY_HO_PRACH) {
	  LOG_I(PHY,"[UE %d] Frame %d, subframe %d, return to PRACH and perform a contention-free access\n",
		ue->Mod_id,frame_rx,subframe_tx);
	  ue->UE_mode[eNB_id] = PRACH;
	}
      }
    }
5406
    
5407
    VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME(VCD_SIGNAL_DUMPER_FUNCTIONS_PHY_PROCEDURES_UE_LTE,0);
gabrielC's avatar
gabrielC committed
5408
#if UE_TIMING_TRACE
5409
    stop_meas(&ue->phy_proc[ue->current_thread_id[subframe_rx]]);
gabrielC's avatar
gabrielC committed
5410
#endif
5411
  } // slot
5412
}
5413 5414