eNB_scheduler.c 16.8 KB
Newer Older
1
/*******************************************************************************
nikaeinn's avatar
nikaeinn committed
2 3
    OpenAirInterface
    Copyright(c) 1999 - 2014 Eurecom
4

nikaeinn's avatar
nikaeinn committed
5 6 7 8
    OpenAirInterface is free software: you can redistribute it and/or modify
    it under the terms of the GNU General Public License as published by
    the Free Software Foundation, either version 3 of the License, or
    (at your option) any later version.
9 10


nikaeinn's avatar
nikaeinn committed
11 12 13 14
    OpenAirInterface is distributed in the hope that it will be useful,
    but WITHOUT ANY WARRANTY; without even the implied warranty of
    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
    GNU General Public License for more details.
15

nikaeinn's avatar
nikaeinn committed
16 17 18 19
    You should have received a copy of the GNU General Public License
    along with OpenAirInterface.The full GNU General Public License is
    included in this distribution in the file called "COPYING". If not,
    see <http://www.gnu.org/licenses/>.
20 21

  Contact Information
nikaeinn's avatar
nikaeinn committed
22 23 24 25
  OpenAirInterface Admin: openair_admin@eurecom.fr
  OpenAirInterface Tech : openair_tech@eurecom.fr
  OpenAirInterface Dev  : openair4g-devel@eurecom.fr

ghaddab's avatar
ghaddab committed
26
  Address      : Eurecom, Campus SophiaTech, 450 Route des Chappes, CS 50193 - 06904 Biot Sophia Antipolis cedex, FRANCE
27

nikaeinn's avatar
nikaeinn committed
28
*******************************************************************************/
29
/*! \file eNB_scheduler.c
nikaeinn's avatar
nikaeinn committed
30
 * \brief eNB scheduler top level function operates on per subframe basis
31 32
 * \author  Navid Nikaein and Raymond Knopp
 * \date 2010 - 2014
33
 * \email: navid.nikaein@eurecom.fr
34 35
 * \version 0.5
 * @ingroup _mac
36

37
 */
38

39
#include "assertions.h"
40 41 42 43 44 45 46 47
#include "PHY/defs.h"
#include "PHY/extern.h"

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

#include "LAYER2/MAC/defs.h"
#include "LAYER2/MAC/extern.h"
gauthier's avatar
gauthier committed
48

49 50 51 52 53 54 55 56 57
#include "LAYER2/MAC/proto.h"
#include "UTIL/LOG/log.h"
#include "UTIL/LOG/vcd_signal_dumper.h"
#include "UTIL/OPT/opt.h"
#include "OCG.h"
#include "OCG_extern.h"
#include "ARCH/CBMIMO1/DEVICE_DRIVER/extern.h"
#include "ARCH/CBMIMO1/DEVICE_DRIVER/defs.h"
#include "ARCH/CBMIMO1/DEVICE_DRIVER/from_grlib_softregs.h"
gauthier's avatar
gauthier committed
58

59 60
#include "RRC/LITE/extern.h"
#include "RRC/L2_INTERFACE/openair_rrc_L2_interface.h"
gauthier's avatar
gauthier committed
61

62 63
//#include "LAYER2/MAC/pre_processor.c"
#include "pdcp.h"
64

65 66
#if defined(ENABLE_ITTI)
# include "intertask_interface.h"
67 68
#endif

69 70 71 72
#define ENABLE_MAC_PAYLOAD_DEBUG
#define DEBUG_eNB_SCHEDULER 1
//#define DEBUG_HEADER_PARSING 1
//#define DEBUG_PACKET_TRACE 1
gauthier's avatar
gauthier committed
73

74 75 76 77 78
/*
  #ifndef USER_MODE
  #define msg debug_msg
  #endif
 */
gauthier's avatar
gauthier committed
79 80 81



82

gauthier's avatar
gauthier committed
83
void eNB_dlsch_ulsch_scheduler(module_id_t module_idP,uint8_t cooperation_flag, frame_t frameP, sub_frame_t subframeP) {//, int calibration_flag) {
84

knopp's avatar
 
knopp committed
85 86 87 88
  unsigned int nprb[MAX_NUM_CCs];
  unsigned int nCCE[MAX_NUM_CCs];
  int mbsfn_status[MAX_NUM_CCs];
  uint32_t RBalloc[MAX_NUM_CCs];
89
#ifdef EXMIMO
90
  int ret;
91
#endif
92
#if defined(ENABLE_ITTI)
93 94 95 96
  MessageDef   *msg_p;
  const char   *msg_name;
  instance_t    instance;
  int           result;
97
#endif
knopp's avatar
 
knopp committed
98
  DCI_PDU *DCI_pdu[MAX_NUM_CCs];
knopp's avatar
 
knopp committed
99 100
  int CC_id,i;
  UE_list_t *UE_list=&eNB_mac_inst[module_idP].UE_list;
101

nikaeinn's avatar
nikaeinn committed
102
  LOG_D(MAC,"[eNB %d] Frame %d, Subframe %d, entering MAC scheduler\n",module_idP, frameP, subframeP);
103

104 105
  start_meas(&eNB_mac_inst[module_idP].eNB_scheduler);
  vcd_signal_dumper_dump_function_by_name(VCD_SIGNAL_DUMPER_FUNCTIONS_ENB_DLSCH_ULSCH_SCHEDULER,VCD_FUNCTION_IN);
106

knopp's avatar
 
knopp committed
107 108 109 110 111 112 113
  for (CC_id=0;CC_id<MAX_NUM_CCs;CC_id++) {
    DCI_pdu[CC_id] = &eNB_mac_inst[module_idP].common_channels[CC_id].DCI_pdu;
    nCCE[CC_id]=0;
    nprb[CC_id]=0;
    RBalloc[CC_id]=0;
    mbsfn_status[CC_id]=0;
  }
114 115
#if defined(ENABLE_ITTI)
  do {
gauthier's avatar
gauthier committed
116 117
      // Checks if a message has been sent to MAC sub-task
      itti_poll_msg (TASK_MAC_ENB, &msg_p);
118

gauthier's avatar
gauthier committed
119 120 121
      if (msg_p != NULL) {
          msg_name = ITTI_MSG_NAME (msg_p);
          instance = ITTI_MSG_INSTANCE (msg_p);
122

gauthier's avatar
gauthier committed
123 124 125 126
          switch (ITTI_MSG_ID(msg_p)) {
          case MESSAGE_TEST:
            LOG_D(MAC, "Received %s\n", ITTI_MSG_NAME(msg_p));
            break;
127

gauthier's avatar
gauthier committed
128 129
          case RRC_MAC_BCCH_DATA_REQ:
            LOG_D(MAC, "Received %s from %s: instance %d, frameP %d, eNB_index %d\n",
130
                msg_name, ITTI_MSG_ORIGIN_NAME(msg_p), instance,
131
                RRC_MAC_BCCH_DATA_REQ (msg_p).frame, RRC_MAC_BCCH_DATA_REQ (msg_p).enb_index);
132

gauthier's avatar
gauthier committed
133 134
            // TODO process BCCH data req.
            break;
135

gauthier's avatar
gauthier committed
136 137
          case RRC_MAC_CCCH_DATA_REQ:
            LOG_D(MAC, "Received %s from %s: instance %d, frameP %d, eNB_index %d\n",
138
                msg_name, ITTI_MSG_ORIGIN_NAME(msg_p), instance,
139
                RRC_MAC_CCCH_DATA_REQ (msg_p).frame, RRC_MAC_CCCH_DATA_REQ (msg_p).enb_index);
140

gauthier's avatar
gauthier committed
141 142
            // TODO process CCCH data req.
            break;
143 144

#ifdef Rel10
gauthier's avatar
gauthier committed
145 146
          case RRC_MAC_MCCH_DATA_REQ:
            LOG_D(MAC, "Received %s from %s: instance %d, frameP %d, eNB_index %d, mbsfn_sync_area %d\n",
147
                msg_name, ITTI_MSG_ORIGIN_NAME(msg_p), instance,
148
                RRC_MAC_MCCH_DATA_REQ (msg_p).frame, RRC_MAC_MCCH_DATA_REQ (msg_p).enb_index, RRC_MAC_MCCH_DATA_REQ (msg_p).mbsfn_sync_area);
149

gauthier's avatar
gauthier committed
150 151
            // TODO process MCCH data req.
            break;
152 153
#endif

gauthier's avatar
gauthier committed
154 155 156 157
          default:
            LOG_E(MAC, "Received unexpected message %s\n", msg_name);
            break;
          }
158

gauthier's avatar
gauthier committed
159 160 161
          result = itti_free (ITTI_MSG_ORIGIN_ID(msg_p), msg_p);
          AssertFatal (result == EXIT_SUCCESS, "Failed to free memory (%d)!\n", result);
      }
162 163 164
  } while(msg_p != NULL);
#endif

gauthier's avatar
gauthier committed
165
  // clear DCI and BCCH contents before scheduling
knopp's avatar
 
knopp committed
166 167 168 169 170
  for (CC_id=0;CC_id<MAX_NUM_CCs;CC_id++) {
    DCI_pdu[CC_id]->Num_common_dci  = 0;
    DCI_pdu[CC_id]->Num_ue_spec_dci = 0;
    eNB_mac_inst[module_idP].common_channels[CC_id].bcch_active = 0;
    
171
#ifdef Rel10
172
    eNB_mac_inst[module_idP].common_channels[CC_id].mcch_active =0;
173
#endif
knopp's avatar
 
knopp committed
174 175 176 177
    
    eNB_mac_inst[module_idP].frame    = frameP;
    eNB_mac_inst[module_idP].subframe = subframeP;
  }
178

gauthier's avatar
gauthier committed
179
  //if (subframeP%5 == 0)
180
#ifdef EXMIMO
gauthier's avatar
gauthier committed
181
  pdcp_run(frameP, 1, 0, module_idP);
182
#endif
183

184
  // check HO
gauthier's avatar
gauthier committed
185
  rrc_rx_tx(module_idP,
186 187 188
	    frameP,
	    1,
	    module_idP);
189 190

#ifdef Rel10
knopp's avatar
 
knopp committed
191
  for (CC_id=0;CC_id<MAX_NUM_CCs;CC_id++) {
192 193 194 195
    if (eNB_mac_inst[module_idP].common_channels[CC_id].MBMS_flag >0) {
      start_meas(&eNB_mac_inst[module_idP].schedule_mch);
      mbsfn_status[CC_id] = schedule_MBMS(module_idP,CC_id,frameP,subframeP);
      stop_meas(&eNB_mac_inst[module_idP].schedule_mch);
knopp's avatar
 
knopp committed
196
    }
197 198
  }
#endif
knopp's avatar
 
knopp committed
199 200 201 202 203
  // refresh UE list based on UEs dropped by PHY in previous subframe
  for (i=UE_list->head;i>0;i=UE_list->next[i])
    if (mac_xface->get_eNB_UE_stats(module_idP,0,UE_RNTI(module_idP,i))==NULL)
      mac_remove_ue(module_idP,i);

204

gauthier's avatar
gauthier committed
205
  switch (subframeP) {
206 207
  case 0:
    // FDD/TDD Schedule Downlink RA transmissions (RA response, Msg4 Contention resolution)
gauthier's avatar
gauthier committed
208
    // Schedule ULSCH for FDD or subframeP 4 (TDD config 0,3,6)
209
    // Schedule Normal DLSCH
gauthier's avatar
gauthier committed
210

knopp's avatar
 
knopp committed
211
    schedule_RA(module_idP,frameP,subframeP,2,nprb,nCCE);
212 213

    if (mac_xface->lte_frame_parms->frame_type == FDD) {  //FDD
knopp's avatar
 
knopp committed
214
      schedule_ulsch(module_idP,frameP,cooperation_flag,0,4,nCCE);//,calibration_flag);
215 216
    }
    else if  ((mac_xface->lte_frame_parms->tdd_config == TDD) || //TDD
gauthier's avatar
gauthier committed
217 218
        (mac_xface->lte_frame_parms->tdd_config == 3) ||
        (mac_xface->lte_frame_parms->tdd_config == 6))
knopp's avatar
 
knopp committed
219
      //schedule_ulsch(module_idP,frameP,cooperation_flag,subframeP,4,nCCE);//,calibration_flag);
gauthier's avatar
gauthier committed
220

221

knopp's avatar
 
knopp committed
222
      // schedule_ue_spec(module_idP,subframeP,nprb,nCCE,mbsfn_status);
223

gauthier's avatar
gauthier committed
224
      fill_DLSCH_dci(module_idP,frameP,subframeP,RBalloc,1,mbsfn_status);
225 226 227
    break;

  case 1:
gauthier's avatar
gauthier committed
228
    // TDD, schedule UL for subframeP 7 (TDD config 0,1) / subframeP 8 (TDD Config 6)
229 230
    // FDD, schedule normal UL/DLSCH
    if (mac_xface->lte_frame_parms->frame_type == TDD) { // TDD
gauthier's avatar
gauthier committed
231 232 233
        switch (mac_xface->lte_frame_parms->tdd_config) {
        case 0:
        case 1:
knopp's avatar
 
knopp committed
234
          schedule_ulsch(module_idP,frameP,cooperation_flag,subframeP,7,nCCE);
gauthier's avatar
gauthier committed
235 236 237
          fill_DLSCH_dci(module_idP,frameP,subframeP,RBalloc,0,mbsfn_status);
          break;
        case 6:
knopp's avatar
 
knopp committed
238
          schedule_ulsch(module_idP,frameP,cooperation_flag,subframeP,8,nCCE);
gauthier's avatar
gauthier committed
239 240 241 242 243
          fill_DLSCH_dci(module_idP,frameP,subframeP,RBalloc,0,mbsfn_status);
          break;
        default:
          break;
        }
244 245
    }
    else {  //FDD
knopp's avatar
 
knopp committed
246 247
      schedule_ulsch(module_idP,frameP,cooperation_flag,1,5,nCCE);
        // schedule_ue_spec(module_idP,subframeP,nprb,nCCE,mbsfn_status);
gauthier's avatar
gauthier committed
248
        // fill_DLSCH_dci(module_idP,subframeP,RBalloc,0,mbsfn_status);
249 250
    }
    break;
251 252

  case 2:
gauthier's avatar
gauthier committed
253
    // TDD, nothing
254 255
    // FDD, normal UL/DLSCH
    if (mac_xface->lte_frame_parms->frame_type == FDD) {  //FDD
knopp's avatar
 
knopp committed
256 257
      schedule_ulsch(module_idP,frameP,cooperation_flag,2,6,nCCE);
        // schedule_ue_spec(module_idP,subframeP,nprb,nCCE,mbsfn_status);
gauthier's avatar
gauthier committed
258
        // fill_DLSCH_dci(module_idP,subframeP,RBalloc,0,mbsfn_status);
259 260 261 262
    }
    break;

  case 3:
gauthier's avatar
gauthier committed
263
    // TDD Config 2, ULSCH for subframeP 7
264 265 266
    // TDD Config 2/5 normal DLSCH
    // FDD, normal UL/DLSCH
    if (mac_xface->lte_frame_parms->frame_type == TDD) {
gauthier's avatar
gauthier committed
267 268
        switch (mac_xface->lte_frame_parms->tdd_config) {
        case 2:
knopp's avatar
 
knopp committed
269
          schedule_ulsch(module_idP,frameP,cooperation_flag,subframeP,7,nCCE);
gauthier's avatar
gauthier committed
270
        case 5:
knopp's avatar
 
knopp committed
271
          schedule_ue_spec(module_idP,frameP,subframeP,nprb,nCCE,mbsfn_status);
gauthier's avatar
gauthier committed
272 273 274 275 276
          fill_DLSCH_dci(module_idP,frameP,subframeP,RBalloc,0,mbsfn_status);
          break;
        default:
          break;
        }
277 278
    }
    else { //FDD
knopp's avatar
 
knopp committed
279
        //      schedule_ulsch(module_idP,frameP,cooperation_flag,3,7,nCCE);
gauthier's avatar
gauthier committed
280 281
        // schedule_ue_spec(module_idP,subframeP,0,0,mbsfn_status);
        // fill_DLSCH_dci(module_idP,subframeP,RBalloc,0,mbsfn_status);
282 283
    }
    break;
284 285

  case 4:
gauthier's avatar
gauthier committed
286
    // TDD Config 1, ULSCH for subframeP 8
287 288 289
    // TDD Config 1/2/4/5 DLSCH
    // FDD UL/DLSCH
    if (mac_xface->lte_frame_parms->frame_type == 1) { // TDD
gauthier's avatar
gauthier committed
290 291
        switch (mac_xface->lte_frame_parms->tdd_config) {
        case 1:
knopp's avatar
 
knopp committed
292 293
          //        schedule_RA(module_idP,frameP,subframeP,nprb,nCCE);
          schedule_ulsch(module_idP,frameP,cooperation_flag,subframeP,8,nCCE);
gauthier's avatar
gauthier committed
294 295 296
        case 2:
        case 4:
        case 5:
knopp's avatar
 
knopp committed
297
          schedule_ue_spec(module_idP,frameP,subframeP,nprb,nCCE,mbsfn_status);
gauthier's avatar
gauthier committed
298 299 300 301 302
          fill_DLSCH_dci(module_idP,frameP,subframeP,RBalloc,1,mbsfn_status);
          break;
        default:
          break;
        }
303 304
    }
    else {
gauthier's avatar
gauthier committed
305
        if (mac_xface->lte_frame_parms->frame_type == FDD) {  //FDD
knopp's avatar
 
knopp committed
306 307 308 309
	  schedule_RA(module_idP,frameP, subframeP, 0, nprb, nCCE);
            //	schedule_ulsch(module_idP, frameP, cooperation_flag, 4, 8, nCCE);
            //schedule_ue_spec(module_idP, frameP, subframeP, nprb, nCCE, mbsfn_status);
	  fill_DLSCH_dci(module_idP, frameP, subframeP, RBalloc, 1, mbsfn_status);
knopp's avatar
knopp committed
310

gauthier's avatar
gauthier committed
311
        }
312 313 314 315 316 317 318 319
    }
    break;

  case 5:
    // TDD/FDD Schedule SI
    // TDD Config 0,6 ULSCH for subframes 9,3 resp.
    // TDD normal DLSCH
    // FDD normal UL/DLSCH
knopp's avatar
 
knopp committed
320 321
    schedule_SI(module_idP,frameP,nprb,nCCE);
    //schedule_RA(module_idP,frameP,subframeP,5,nprb,nCCE);
322
    if ((mac_xface->lte_frame_parms->frame_type == FDD) ) {
knopp's avatar
 
knopp committed
323 324
        //      schedule_RA(module_idP,frameP,subframeP,1,nprb,nCCE);
        //      schedule_ulsch(module_idP,frameP,cooperation_flag,5,9,nCCE);
gauthier's avatar
gauthier committed
325
        fill_DLSCH_dci(module_idP,frameP,subframeP,RBalloc,0,mbsfn_status);
326 327 328

    }
    else if ((mac_xface->lte_frame_parms->tdd_config == 0) || // TDD Config 0
gauthier's avatar
gauthier committed
329
        (mac_xface->lte_frame_parms->tdd_config == 6)) { // TDD Config 6
knopp's avatar
 
knopp committed
330
        //schedule_ulsch(module_idP,cooperation_flag,subframeP,nCCE);
gauthier's avatar
gauthier committed
331
        fill_DLSCH_dci(module_idP,frameP,subframeP,RBalloc,0,mbsfn_status);
332 333
    }
    else {
knopp's avatar
 
knopp committed
334
        //schedule_ue_spec(module_idP,subframeP,nprb,nCCE,mbsfn_status);
gauthier's avatar
gauthier committed
335
        fill_DLSCH_dci(module_idP,frameP,subframeP,RBalloc,0,mbsfn_status);
336 337 338 339 340 341 342 343
    }
    break;

  case 6:
    // TDD Config 0,1,6 ULSCH for subframes 2,3
    // TDD Config 3,4,5 Normal DLSCH
    // FDD normal ULSCH/DLSCH
    if (mac_xface->lte_frame_parms->frame_type == TDD) { // TDD
gauthier's avatar
gauthier committed
344 345 346 347
        switch (mac_xface->lte_frame_parms->tdd_config) {
        case 0:
          break;
        case 1:
knopp's avatar
 
knopp committed
348 349
          schedule_ulsch(module_idP,frameP,cooperation_flag,subframeP,2,nCCE);
          //	schedule_ue_spec(module_idP,frameP,subframeP,nprb,nCCE,mbsfn_status);
gauthier's avatar
gauthier committed
350 351 352
          fill_DLSCH_dci(module_idP,frameP,subframeP,RBalloc,0,mbsfn_status);
          break;
        case 6:
knopp's avatar
 
knopp committed
353 354
          schedule_ulsch(module_idP,frameP,cooperation_flag,subframeP,3,nCCE);
          //	schedule_ue_spec(module_idP,frameP,subframeP,nprb,nCCE,mbsfn_status);
gauthier's avatar
gauthier committed
355 356 357
          fill_DLSCH_dci(module_idP,frameP,subframeP,RBalloc,0,mbsfn_status);
          break;
        case 5:
knopp's avatar
 
knopp committed
358 359
          schedule_RA(module_idP,frameP,subframeP,2,nprb,nCCE);
          schedule_ue_spec(module_idP,frameP,subframeP,nprb,nCCE,mbsfn_status);
gauthier's avatar
gauthier committed
360 361 362 363
          fill_DLSCH_dci(module_idP,frameP,subframeP,RBalloc,1,mbsfn_status);
          break;
        case 3:
        case 4:
knopp's avatar
 
knopp committed
364
          schedule_ue_spec(module_idP,frameP,subframeP,nprb,nCCE,mbsfn_status);
gauthier's avatar
gauthier committed
365 366 367 368 369 370
          fill_DLSCH_dci(module_idP,frameP,subframeP,RBalloc,0,mbsfn_status);
          break;

        default:
          break;
        }
371 372
    }
    else {  //FDD
knopp's avatar
 
knopp committed
373 374
        //      schedule_ulsch(module_idP,frameP,cooperation_flag,6,0,nCCE);
        schedule_ue_spec(module_idP,frameP,subframeP,nprb,nCCE,mbsfn_status);
gauthier's avatar
gauthier committed
375
        fill_DLSCH_dci(module_idP,frameP,subframeP,RBalloc,0,mbsfn_status);
376 377
    }
    break;
gauthier's avatar
gauthier committed
378

379 380 381 382
  case 7:
    // TDD Config 3,4,5 Normal DLSCH
    // FDD Normal UL/DLSCH
    if (mac_xface->lte_frame_parms->frame_type == TDD) { // TDD
gauthier's avatar
gauthier committed
383 384 385
        switch (mac_xface->lte_frame_parms->tdd_config) {
        case 3:
        case 4:
knopp's avatar
 
knopp committed
386 387
          //	  schedule_RA(module_idP,frameP,subframeP,3,nprb,nCCE);  // 3 = Msg3 subframeP, not
          schedule_ue_spec(module_idP,frameP,subframeP,nprb,nCCE,mbsfn_status);
gauthier's avatar
gauthier committed
388 389 390
          fill_DLSCH_dci(module_idP,frameP,subframeP,RBalloc,0,mbsfn_status); //1,mbsfn_status);
          break;
        case 5:
knopp's avatar
 
knopp committed
391
          schedule_ue_spec(module_idP,frameP,subframeP,nprb,nCCE,mbsfn_status);
gauthier's avatar
gauthier committed
392 393 394 395 396
          fill_DLSCH_dci(module_idP,frameP,subframeP,RBalloc,0,mbsfn_status);
          break;
        default:
          break;
        }
397
    }
398
    else {  //FDD
knopp's avatar
 
knopp committed
399 400
        //      schedule_ulsch(module_idP,frameP,cooperation_flag,7,1,nCCE);
        schedule_ue_spec(module_idP,frameP,subframeP,nprb,nCCE,mbsfn_status);
gauthier's avatar
gauthier committed
401
        fill_DLSCH_dci(module_idP,frameP,subframeP,RBalloc,0,mbsfn_status);
402 403 404 405
    }
    break;

  case 8:
gauthier's avatar
gauthier committed
406
    // TDD Config 2,3,4,5 ULSCH for subframeP 2
407 408 409
    //
    // FDD Normal UL/DLSCH
    if (mac_xface->lte_frame_parms->frame_type == TDD) { // TDD
gauthier's avatar
gauthier committed
410 411 412 413 414 415
        switch (mac_xface->lte_frame_parms->tdd_config) {
        case 2:
        case 3:
        case 4:
        case 5:

knopp's avatar
 
knopp committed
416 417 418
          //	schedule_RA(module_idP,subframeP,nprb,nCCE);
          schedule_ulsch(module_idP,frameP,cooperation_flag,subframeP,2,nCCE);
          schedule_ue_spec(module_idP,frameP,subframeP,nprb,nCCE,mbsfn_status);
gauthier's avatar
gauthier committed
419 420 421 422 423
          fill_DLSCH_dci(module_idP,frameP,subframeP,RBalloc,0,mbsfn_status);
          break;
        default:
          break;
        }
424 425
    }
    else {  //FDD
knopp's avatar
 
knopp committed
426 427
        //      schedule_ulsch(module_idP,frameP,cooperation_flag,8,2,nCCE);
        schedule_ue_spec(module_idP,frameP,subframeP,nprb,nCCE,mbsfn_status);
gauthier's avatar
gauthier committed
428
        fill_DLSCH_dci(module_idP,frameP,subframeP,RBalloc,0,mbsfn_status);
429 430 431 432 433 434
    }
    break;

  case 9:
    // TDD Config 1,3,4,6 ULSCH for subframes 3,3,3,4
    if (mac_xface->lte_frame_parms->frame_type == TDD) {
gauthier's avatar
gauthier committed
435 436
        switch (mac_xface->lte_frame_parms->tdd_config) {
        case 1:
knopp's avatar
 
knopp committed
437 438 439
          schedule_ulsch(module_idP,frameP,cooperation_flag,subframeP,3,nCCE);
          schedule_RA(module_idP,frameP,subframeP,7,nprb,nCCE);  // 7 = Msg3 subframeP, not
          schedule_ue_spec(module_idP,frameP,subframeP,nprb,nCCE,mbsfn_status);
gauthier's avatar
gauthier committed
440 441 442 443
          fill_DLSCH_dci(module_idP,frameP,subframeP,RBalloc,1,mbsfn_status);
          break;
        case 3:
        case 4:
knopp's avatar
 
knopp committed
444 445
          schedule_ulsch(module_idP,frameP,cooperation_flag,subframeP,3,nCCE);
          schedule_ue_spec(module_idP,frameP,subframeP,nprb,nCCE,mbsfn_status);
gauthier's avatar
gauthier committed
446 447 448
          fill_DLSCH_dci(module_idP,frameP,subframeP,RBalloc,0,mbsfn_status);
          break;
        case 6:
knopp's avatar
 
knopp committed
449 450 451
          schedule_ulsch(module_idP,frameP,cooperation_flag,subframeP,4,nCCE);
          //schedule_RA(module_idP,frameP,subframeP,nprb,nCCE);
          schedule_ue_spec(module_idP,frameP,subframeP,nprb,nCCE,mbsfn_status);
gauthier's avatar
gauthier committed
452 453 454 455
          fill_DLSCH_dci(module_idP,frameP,subframeP,RBalloc,0,mbsfn_status);
          break;
        case 2:
        case 5:
knopp's avatar
 
knopp committed
456 457
          //schedule_RA(module_idP,frameP,subframeP,nprb,nCCE);
          schedule_ue_spec(module_idP,frameP,subframeP,nprb,nCCE,mbsfn_status);
gauthier's avatar
gauthier committed
458 459 460 461 462
          fill_DLSCH_dci(module_idP,frameP,subframeP,RBalloc,0,mbsfn_status);
          break;
        default:
          break;
        }
463 464
    }
    else {  //FDD
knopp's avatar
 
knopp committed
465 466
        //      schedule_ulsch(module_idP,frameP,cooperation_flag,9,3,nCCE);
        schedule_ue_spec(module_idP,frameP,subframeP,nprb,nCCE,mbsfn_status);
gauthier's avatar
gauthier committed
467
        fill_DLSCH_dci(module_idP,frameP,subframeP,RBalloc,0,mbsfn_status);
468 469
    }
    break;
gauthier's avatar
gauthier committed
470

471
  }
472

knopp's avatar
 
knopp committed
473 474 475
  for (CC_id=0;CC_id<MAX_NUM_CCs;CC_id++)
    DCI_pdu[CC_id]->nCCE = nCCE[CC_id];
  LOG_D(MAC,"frameP %d, subframeP %d nCCE %d\n",frameP,subframeP,nCCE[0]);
476

477
  stop_meas(&eNB_mac_inst[module_idP].eNB_scheduler);
478 479
  vcd_signal_dumper_dump_function_by_name(VCD_SIGNAL_DUMPER_FUNCTIONS_ENB_DLSCH_ULSCH_SCHEDULER,VCD_FUNCTION_OUT);
 
480
}
481 482 483