eNB_scheduler.c 17.1 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
  OpenAirInterface Admin: openair_admin@eurecom.fr
  OpenAirInterface Tech : openair_tech@eurecom.fr
24
  OpenAirInterface Dev  : openair4g-devel@lists.eurecom.fr
nikaeinn's avatar
nikaeinn committed
25

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
#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"
gauthier's avatar
gauthier committed
55

56 57
#include "RRC/LITE/extern.h"
#include "RRC/L2_INTERFACE/openair_rrc_L2_interface.h"
gauthier's avatar
gauthier committed
58

59 60
//#include "LAYER2/MAC/pre_processor.c"
#include "pdcp.h"
61

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

66 67 68 69
#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
70

71 72 73 74 75
/*
  #ifndef USER_MODE
  #define msg debug_msg
  #endif
 */
gauthier's avatar
gauthier committed
76 77 78



79

80 81 82



83 84
void eNB_dlsch_ulsch_scheduler(module_id_t module_idP,uint8_t cooperation_flag, frame_t frameP, sub_frame_t subframeP)  //, int calibration_flag) {
{
85

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

104
  LOG_D(MAC,"[eNB %d] Frame %d, Subframe %d, entering MAC scheduler (UE_list->head %d)\n",module_idP, frameP, subframeP,UE_list->head);
105

106
  start_meas(&eNB_mac_inst[module_idP].eNB_scheduler);
gauthier's avatar
gauthier committed
107
  VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME(VCD_SIGNAL_DUMPER_FUNCTIONS_ENB_DLSCH_ULSCH_SCHEDULER,VCD_FUNCTION_IN);
108

109
  for (CC_id=0; CC_id<MAX_NUM_CCs; CC_id++) {
knopp's avatar
 
knopp committed
110
    DCI_pdu[CC_id] = &eNB_mac_inst[module_idP].common_channels[CC_id].DCI_pdu;
111 112
    DCI_pdu[CC_id]->nCCE=0;
    DCI_pdu[CC_id]->num_pdcch_symbols=1;
knopp's avatar
 
knopp committed
113 114 115
    nprb[CC_id]=0;
    RBalloc[CC_id]=0;
    mbsfn_status[CC_id]=0;
116 117
    // clear vrb_map
    memset(eNB_mac_inst[module_idP].common_channels[CC_id].vrb_map,0,100);
knopp's avatar
 
knopp committed
118
  }
119

knopp's avatar
 
knopp committed
120
  // refresh UE list based on UEs dropped by PHY in previous subframe
121 122 123
  i = UE_list->head;

  while (i>=0) {
124 125 126 127
    rnti = UE_RNTI(module_idP, i);
    CC_id = UE_PCCID(module_idP, i);
    LOG_D(MAC,"UE %d: rnti %x (%p)\n", i, rnti,
          mac_xface->get_eNB_UE_stats(module_idP, CC_id, rnti));
128
    next_i= UE_list->next[i];
129

130 131
    if (mac_xface->get_eNB_UE_stats(module_idP, CC_id, rnti)==NULL) {
      mac_remove_ue(module_idP, i, frameP, subframeP);
132 133
    }
    i = next_i;
knopp's avatar
 
knopp committed
134
  }
135

136
#if defined(ENABLE_ITTI)
137

138
  do {
139 140
    // Checks if a message has been sent to MAC sub-task
    itti_poll_msg (TASK_MAC_ENB, &msg_p);
141

142 143 144
    if (msg_p != NULL) {
      msg_name = ITTI_MSG_NAME (msg_p);
      instance = ITTI_MSG_INSTANCE (msg_p);
145

146 147 148 149
      switch (ITTI_MSG_ID(msg_p)) {
      case MESSAGE_TEST:
        LOG_D(MAC, "Received %s\n", ITTI_MSG_NAME(msg_p));
        break;
150

151 152 153 154
      case RRC_MAC_BCCH_DATA_REQ:
        LOG_D(MAC, "Received %s from %s: instance %d, frameP %d, eNB_index %d\n",
              msg_name, ITTI_MSG_ORIGIN_NAME(msg_p), instance,
              RRC_MAC_BCCH_DATA_REQ (msg_p).frame, RRC_MAC_BCCH_DATA_REQ (msg_p).enb_index);
155

156 157
        // TODO process BCCH data req.
        break;
158

159 160 161 162
      case RRC_MAC_CCCH_DATA_REQ:
        LOG_D(MAC, "Received %s from %s: instance %d, frameP %d, eNB_index %d\n",
              msg_name, ITTI_MSG_ORIGIN_NAME(msg_p), instance,
              RRC_MAC_CCCH_DATA_REQ (msg_p).frame, RRC_MAC_CCCH_DATA_REQ (msg_p).enb_index);
163

164 165
        // TODO process CCCH data req.
        break;
166 167 168

#ifdef Rel10

169 170 171 172
      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",
              msg_name, ITTI_MSG_ORIGIN_NAME(msg_p), instance,
              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);
173

174 175 176
        // TODO process MCCH data req.
        break;
#endif
177

178 179 180
      default:
        LOG_E(MAC, "Received unexpected message %s\n", msg_name);
        break;
gauthier's avatar
gauthier committed
181
      }
182 183 184 185

      result = itti_free (ITTI_MSG_ORIGIN_ID(msg_p), msg_p);
      AssertFatal (result == EXIT_SUCCESS, "Failed to free memory (%d)!\n", result);
    }
186
  } while(msg_p != NULL);
187

188 189
#endif

gauthier's avatar
gauthier committed
190
  // clear DCI and BCCH contents before scheduling
191
  for (CC_id=0; CC_id<MAX_NUM_CCs; CC_id++) {
knopp's avatar
 
knopp committed
192 193
    DCI_pdu[CC_id]->Num_common_dci  = 0;
    DCI_pdu[CC_id]->Num_ue_spec_dci = 0;
194

195

196
#ifdef Rel10
197
    eNB_mac_inst[module_idP].common_channels[CC_id].mcch_active =0;
198
#endif
199

knopp's avatar
 
knopp committed
200 201
    eNB_mac_inst[module_idP].frame    = frameP;
    eNB_mac_inst[module_idP].subframe = subframeP;
202 203


knopp's avatar
 
knopp committed
204
  }
205

gauthier's avatar
gauthier committed
206
  //if (subframeP%5 == 0)
knopp's avatar
 
knopp committed
207
  //#ifdef EXMIMO
208
  PROTOCOL_CTXT_SET_BY_MODULE_ID(&ctxt, module_idP, ENB_FLAG_YES, NOT_A_RNTI, frameP, 0,module_idP);
209
  pdcp_run(&ctxt);
knopp's avatar
 
knopp committed
210
  //#endif
211

212
  // check HO
213 214
  rrc_rx_tx(&ctxt,
            0, // eNB index, unused in eNB
215
            CC_id);
216 217

#ifdef Rel10
218 219

  for (CC_id=0; CC_id<MAX_NUM_CCs; CC_id++) {
220 221 222 223
    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
224
    }
225
  }
226

227
#endif
knopp's avatar
 
knopp committed
228
  // refresh UE list based on UEs dropped by PHY in previous subframe
229
  /*
knopp's avatar
 
knopp committed
230 231 232
  i=UE_list->head;
  while (i>=0) {
    next_i = UE_list->next[i];
233
    LOG_T(MAC,"UE %d : rnti %x, stats %p\n",i,UE_RNTI(module_idP,i),mac_xface->get_eNB_UE_stats(module_idP,0,UE_RNTI(module_idP,i)));
knopp's avatar
 
knopp committed
234
    if (mac_xface->get_eNB_UE_stats(module_idP,0,UE_RNTI(module_idP,i))==NULL) {
knopp's avatar
 
knopp committed
235
      mac_remove_ue(module_idP,i,frameP);
knopp's avatar
 
knopp committed
236 237 238
    }
    i=next_i;
  }
239
  */
240

gauthier's avatar
gauthier committed
241
  switch (subframeP) {
242
  case 0:
243

244
    // FDD/TDD Schedule Downlink RA transmissions (RA response, Msg4 Contention resolution)
gauthier's avatar
gauthier committed
245
    // Schedule ULSCH for FDD or subframeP 4 (TDD config 0,3,6)
246
    // Schedule Normal DLSCH
gauthier's avatar
gauthier committed
247

248
    schedule_RA(module_idP,frameP,subframeP,2,nprb);
249 250

    if (mac_xface->lte_frame_parms->frame_type == FDD) {  //FDD
251
      schedule_ulsch(module_idP,frameP,cooperation_flag,0,4);//,calibration_flag);
252 253 254
    } else if  ((mac_xface->lte_frame_parms->tdd_config == TDD) || //TDD
                (mac_xface->lte_frame_parms->tdd_config == 3) ||
                (mac_xface->lte_frame_parms->tdd_config == 6)) {
255
      //schedule_ulsch(module_idP,frameP,cooperation_flag,subframeP,4);//,calibration_flag);
Florian Kaltenberger's avatar
Florian Kaltenberger committed
256
    }
257

258
    // schedule_ue_spec(module_idP,frameP,subframeP,nprb,mbsfn_status);
gauthier's avatar
gauthier committed
259

260
    fill_DLSCH_dci(module_idP,frameP,subframeP,RBalloc,mbsfn_status);
261

262 263 264
    break;

  case 1:
265

gauthier's avatar
gauthier committed
266
    // TDD, schedule UL for subframeP 7 (TDD config 0,1) / subframeP 8 (TDD Config 6)
267 268
    // FDD, schedule normal UL/DLSCH
    if (mac_xface->lte_frame_parms->frame_type == TDD) { // TDD
269 270 271
      switch (mac_xface->lte_frame_parms->tdd_config) {
      case 0:
      case 1:
272 273
        schedule_ulsch(module_idP,frameP,cooperation_flag,subframeP,7);
        fill_DLSCH_dci(module_idP,frameP,subframeP,RBalloc,mbsfn_status);
274 275 276
        break;

      case 6:
277 278
        schedule_ulsch(module_idP,frameP,cooperation_flag,subframeP,8);
        fill_DLSCH_dci(module_idP,frameP,subframeP,RBalloc,mbsfn_status);
279 280 281 282 283 284
        break;

      default:
        break;
      }
    } else { //FDD
285 286 287
      schedule_ue_spec(module_idP,frameP,subframeP,nprb,mbsfn_status);
      fill_DLSCH_dci(module_idP,frameP,subframeP,RBalloc,mbsfn_status);
      schedule_ulsch(module_idP,frameP,cooperation_flag,1,5);
288
    }
289

290
    break;
291 292

  case 2:
293

gauthier's avatar
gauthier committed
294
    // TDD, nothing
295 296
    // FDD, normal UL/DLSCH
    if (mac_xface->lte_frame_parms->frame_type == FDD) {  //FDD
297 298 299
      schedule_ue_spec(module_idP,frameP,subframeP,nprb,mbsfn_status);
      fill_DLSCH_dci(module_idP,frameP,subframeP,RBalloc,mbsfn_status);
      schedule_ulsch(module_idP,frameP,cooperation_flag,2,6);
300
    }
301

302 303 304
    break;

  case 3:
305

gauthier's avatar
gauthier committed
306
    // TDD Config 2, ULSCH for subframeP 7
307 308 309
    // TDD Config 2/5 normal DLSCH
    // FDD, normal UL/DLSCH
    if (mac_xface->lte_frame_parms->frame_type == TDD) {
310 311
      switch (mac_xface->lte_frame_parms->tdd_config) {
      case 2:
312
        schedule_ulsch(module_idP,frameP,cooperation_flag,subframeP,7);
313 314 315

        // no break here!
      case 5:
316 317
        schedule_ue_spec(module_idP,frameP,subframeP,nprb,mbsfn_status);
        fill_DLSCH_dci(module_idP,frameP,subframeP,RBalloc,mbsfn_status);
318 319 320 321 322 323
        break;

      default:
        break;
      }
    } else { //FDD
324 325 326
      schedule_ue_spec(module_idP,frameP,subframeP,nprb,mbsfn_status);
      fill_DLSCH_dci(module_idP,frameP,subframeP,RBalloc,mbsfn_status);
      schedule_ulsch(module_idP,frameP,cooperation_flag,3,7);
327

328
    }
329

330
    break;
331 332

  case 4:
333

gauthier's avatar
gauthier committed
334
    // TDD Config 1, ULSCH for subframeP 8
335 336 337
    // TDD Config 1/2/4/5 DLSCH
    // FDD UL/DLSCH
    if (mac_xface->lte_frame_parms->frame_type == 1) { // TDD
338 339
      switch (mac_xface->lte_frame_parms->tdd_config) {
      case 1:
340 341
        //        schedule_RA(module_idP,frameP,subframeP,nprb);
        schedule_ulsch(module_idP,frameP,cooperation_flag,subframeP,8);
342 343 344 345 346 347 348 349 350

        // no break here!
      case 2:

        // no break here!
      case 4:

        // no break here!
      case 5:
351 352
        schedule_ue_spec(module_idP,frameP,subframeP,nprb,mbsfn_status);
        fill_DLSCH_dci(module_idP,frameP,subframeP,RBalloc,mbsfn_status);
353 354 355 356 357 358 359
        break;

      default:
        break;
      }
    } else {
      if (mac_xface->lte_frame_parms->frame_type == FDD) {  //FDD
360 361 362 363
	//        schedule_RA(module_idP,frameP, subframeP, 0, nprb);
        //  schedule_ulsch(module_idP, frameP, cooperation_flag, 4, 8);
        schedule_ue_spec(module_idP, frameP, subframeP, nprb, mbsfn_status);
        fill_DLSCH_dci(module_idP, frameP, subframeP, RBalloc,  mbsfn_status);
364 365

      }
366
    }
367

368 369 370 371 372 373 374
    break;

  case 5:
    // TDD/FDD Schedule SI
    // TDD Config 0,6 ULSCH for subframes 9,3 resp.
    // TDD normal DLSCH
    // FDD normal UL/DLSCH
375
    schedule_SI(module_idP,frameP,subframeP,nprb);
376

377
    //schedule_RA(module_idP,frameP,subframeP,5,nprb);
378
    if (mac_xface->lte_frame_parms->frame_type == FDD) {
379 380 381
      schedule_RA(module_idP,frameP,subframeP,1,nprb);
      //      schedule_ulsch(module_idP,frameP,cooperation_flag,5,9);
      fill_DLSCH_dci(module_idP,frameP,subframeP,RBalloc,mbsfn_status);
382

383 384
    } else if ((mac_xface->lte_frame_parms->tdd_config == 0) || // TDD Config 0
               (mac_xface->lte_frame_parms->tdd_config == 6)) { // TDD Config 6
385 386
      //schedule_ulsch(module_idP,cooperation_flag,subframeP);
      fill_DLSCH_dci(module_idP,frameP,subframeP,RBalloc,mbsfn_status);
387
    } else {
388 389
      //schedule_ue_spec(module_idP,frameP,subframeP,nprb,mbsfn_status);
      fill_DLSCH_dci(module_idP,frameP,subframeP,RBalloc,mbsfn_status);
390
    }
391

392 393 394
    break;

  case 6:
395

396 397 398 399
    // 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
400 401 402 403 404
      switch (mac_xface->lte_frame_parms->tdd_config) {
      case 0:
        break;

      case 1:
405 406 407
        schedule_ulsch(module_idP,frameP,cooperation_flag,subframeP,2);
        //  schedule_ue_spec(module_idP,frameP,subframeP,nprb,mbsfn_status);
        fill_DLSCH_dci(module_idP,frameP,subframeP,RBalloc,mbsfn_status);
408 409 410
        break;

      case 6:
411 412 413
        schedule_ulsch(module_idP,frameP,cooperation_flag,subframeP,3);
        //  schedule_ue_spec(module_idP,frameP,subframeP,nprb,mbsfn_status);
        fill_DLSCH_dci(module_idP,frameP,subframeP,RBalloc,mbsfn_status);
414 415 416
        break;

      case 5:
417 418 419
        schedule_RA(module_idP,frameP,subframeP,2,nprb);
        schedule_ue_spec(module_idP,frameP,subframeP,nprb,mbsfn_status);
        fill_DLSCH_dci(module_idP,frameP,subframeP,RBalloc,mbsfn_status);
420 421 422 423
        break;

      case 3:
      case 4:
424 425
        schedule_ue_spec(module_idP,frameP,subframeP,nprb,mbsfn_status);
        fill_DLSCH_dci(module_idP,frameP,subframeP,RBalloc,mbsfn_status);
426 427 428 429 430 431
        break;

      default:
        break;
      }
    } else { //FDD
432 433 434
      //      schedule_ulsch(module_idP,frameP,cooperation_flag,6,0);
      schedule_ue_spec(module_idP,frameP,subframeP,nprb,mbsfn_status);
      fill_DLSCH_dci(module_idP,frameP,subframeP,RBalloc,mbsfn_status);
435
    }
436

437
    break;
gauthier's avatar
gauthier committed
438

439
  case 7:
440

441 442 443
    // TDD Config 3,4,5 Normal DLSCH
    // FDD Normal UL/DLSCH
    if (mac_xface->lte_frame_parms->frame_type == TDD) { // TDD
444 445 446
      switch (mac_xface->lte_frame_parms->tdd_config) {
      case 3:
      case 4:
447 448 449
        schedule_RA(module_idP,frameP,subframeP,3,nprb);  // 3 = Msg3 subframeP, not
        schedule_ue_spec(module_idP,frameP,subframeP,nprb,mbsfn_status);
        fill_DLSCH_dci(module_idP,frameP,subframeP,RBalloc,mbsfn_status);
450 451 452
        break;

      case 5:
453 454
        schedule_ue_spec(module_idP,frameP,subframeP,nprb,mbsfn_status);
        fill_DLSCH_dci(module_idP,frameP,subframeP,RBalloc,mbsfn_status);
455 456 457 458 459 460
        break;

      default:
        break;
      }
    } else { //FDD
461 462 463
      //schedule_ulsch(module_idP,frameP,cooperation_flag,7,1);
      schedule_ue_spec(module_idP,frameP,subframeP,nprb,mbsfn_status);
      fill_DLSCH_dci(module_idP,frameP,subframeP,RBalloc,mbsfn_status);
464
    }
465

466 467 468
    break;

  case 8:
469

gauthier's avatar
gauthier committed
470
    // TDD Config 2,3,4,5 ULSCH for subframeP 2
471 472 473
    //
    // FDD Normal UL/DLSCH
    if (mac_xface->lte_frame_parms->frame_type == TDD) { // TDD
474 475 476 477 478 479
      switch (mac_xface->lte_frame_parms->tdd_config) {
      case 2:
      case 3:
      case 4:
      case 5:

480 481 482 483
        //  schedule_RA(module_idP,subframeP,nprb);
        schedule_ulsch(module_idP,frameP,cooperation_flag,subframeP,2);
        schedule_ue_spec(module_idP,frameP,subframeP,nprb,mbsfn_status);
        fill_DLSCH_dci(module_idP,frameP,subframeP,RBalloc,mbsfn_status);
484 485 486 487 488 489
        break;

      default:
        break;
      }
    } else { //FDD
490 491 492
      //schedule_ulsch(module_idP,frameP,cooperation_flag,8,2);
      schedule_ue_spec(module_idP,frameP,subframeP,nprb,mbsfn_status);
      fill_DLSCH_dci(module_idP,frameP,subframeP,RBalloc,mbsfn_status);
493
    }
494

495 496 497
    break;

  case 9:
498

499 500
    // TDD Config 1,3,4,6 ULSCH for subframes 3,3,3,4
    if (mac_xface->lte_frame_parms->frame_type == TDD) {
501 502
      switch (mac_xface->lte_frame_parms->tdd_config) {
      case 1:
503 504 505 506
        schedule_ulsch(module_idP,frameP,cooperation_flag,subframeP,3);
        schedule_RA(module_idP,frameP,subframeP,7,nprb);  // 7 = Msg3 subframeP, not
        schedule_ue_spec(module_idP,frameP,subframeP,nprb,mbsfn_status);
        fill_DLSCH_dci(module_idP,frameP,subframeP,RBalloc,mbsfn_status);
507 508 509 510
        break;

      case 3:
      case 4:
511 512 513
        schedule_ulsch(module_idP,frameP,cooperation_flag,subframeP,3);
        schedule_ue_spec(module_idP,frameP,subframeP,nprb,mbsfn_status);
        fill_DLSCH_dci(module_idP,frameP,subframeP,RBalloc,mbsfn_status);
514 515 516
        break;

      case 6:
517 518 519 520
        schedule_ulsch(module_idP,frameP,cooperation_flag,subframeP,4);
        //schedule_RA(module_idP,frameP,subframeP,nprb);
        schedule_ue_spec(module_idP,frameP,subframeP,nprb,mbsfn_status);
        fill_DLSCH_dci(module_idP,frameP,subframeP,RBalloc,mbsfn_status);
521 522 523 524
        break;

      case 2:
      case 5:
525 526 527
        //schedule_RA(module_idP,frameP,subframeP,nprb);
        schedule_ue_spec(module_idP,frameP,subframeP,nprb,mbsfn_status);
        fill_DLSCH_dci(module_idP,frameP,subframeP,RBalloc,mbsfn_status);
528 529 530 531 532 533
        break;

      default:
        break;
      }
    } else { //FDD
534 535 536
      //     schedule_ulsch(module_idP,frameP,cooperation_flag,9,3);
      schedule_ue_spec(module_idP,frameP,subframeP,nprb,mbsfn_status);
      fill_DLSCH_dci(module_idP,frameP,subframeP,RBalloc,mbsfn_status);
537
    }
538

539
    break;
gauthier's avatar
gauthier committed
540

541
  }
542

543 544
  LOG_I(MAC,"FrameP %d, subframeP %d : Scheduling CCEs\n",frameP,subframeP);

545 546
  for (CC_id=0;CC_id<MAX_NUM_CCs;CC_id++)
    allocate_CCEs(module_idP,CC_id,subframeP,0);
547

548
  LOG_D(MAC,"frameP %d, subframeP %d\n",frameP,subframeP);
549

550
  stop_meas(&eNB_mac_inst[module_idP].eNB_scheduler);
gauthier's avatar
gauthier committed
551
  VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME(VCD_SIGNAL_DUMPER_FUNCTIONS_ENB_DLSCH_ULSCH_SCHEDULER,VCD_FUNCTION_OUT);
552

553
}
554 555 556