eNB_scheduler.c 17.6 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
#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

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

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

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

102
103
  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);
104

knopp's avatar
   
knopp committed
105
106
107
108
109
110
111
  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;
  }
knopp's avatar
   
knopp committed
112
  // refresh UE list based on UEs dropped by PHY in previous subframe
113
  for (i=UE_list->head;i>=0;i=i=next_i) {
114
    LOG_D(MAC,"UE %d: rnti %x (%p)\n",i,UE_RNTI(module_idP,i),mac_xface->get_eNB_UE_stats(module_idP,0,UE_RNTI(module_idP,i)));
115
    next_i= UE_list->next[i];
knopp's avatar
   
knopp committed
116
    if (mac_xface->get_eNB_UE_stats(module_idP,0,UE_RNTI(module_idP,i))==NULL)
knopp's avatar
   
knopp committed
117
      mac_remove_ue(module_idP,i,frameP);
knopp's avatar
   
knopp committed
118
  }
119
120
#if defined(ENABLE_ITTI)
  do {
gauthier's avatar
gauthier committed
121
122
      // Checks if a message has been sent to MAC sub-task
      itti_poll_msg (TASK_MAC_ENB, &msg_p);
123

gauthier's avatar
gauthier committed
124
125
126
      if (msg_p != NULL) {
          msg_name = ITTI_MSG_NAME (msg_p);
          instance = ITTI_MSG_INSTANCE (msg_p);
127

gauthier's avatar
gauthier committed
128
129
130
131
          switch (ITTI_MSG_ID(msg_p)) {
          case MESSAGE_TEST:
            LOG_D(MAC, "Received %s\n", ITTI_MSG_NAME(msg_p));
            break;
132

gauthier's avatar
gauthier committed
133
134
          case RRC_MAC_BCCH_DATA_REQ:
            LOG_D(MAC, "Received %s from %s: instance %d, frameP %d, eNB_index %d\n",
135
                msg_name, ITTI_MSG_ORIGIN_NAME(msg_p), instance,
136
                RRC_MAC_BCCH_DATA_REQ (msg_p).frame, RRC_MAC_BCCH_DATA_REQ (msg_p).enb_index);
137

gauthier's avatar
gauthier committed
138
139
            // TODO process BCCH data req.
            break;
140

gauthier's avatar
gauthier committed
141
142
          case RRC_MAC_CCCH_DATA_REQ:
            LOG_D(MAC, "Received %s from %s: instance %d, frameP %d, eNB_index %d\n",
143
                msg_name, ITTI_MSG_ORIGIN_NAME(msg_p), instance,
144
                RRC_MAC_CCCH_DATA_REQ (msg_p).frame, RRC_MAC_CCCH_DATA_REQ (msg_p).enb_index);
145

gauthier's avatar
gauthier committed
146
147
            // TODO process CCCH data req.
            break;
148
149

#ifdef Rel10
gauthier's avatar
gauthier committed
150
151
          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",
152
                msg_name, ITTI_MSG_ORIGIN_NAME(msg_p), instance,
153
                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);
154

gauthier's avatar
gauthier committed
155
156
            // TODO process MCCH data req.
            break;
157
158
#endif

gauthier's avatar
gauthier committed
159
160
161
162
          default:
            LOG_E(MAC, "Received unexpected message %s\n", msg_name);
            break;
          }
163

gauthier's avatar
gauthier committed
164
165
166
          result = itti_free (ITTI_MSG_ORIGIN_ID(msg_p), msg_p);
          AssertFatal (result == EXIT_SUCCESS, "Failed to free memory (%d)!\n", result);
      }
167
168
169
  } while(msg_p != NULL);
#endif

gauthier's avatar
gauthier committed
170
  // clear DCI and BCCH contents before scheduling
knopp's avatar
   
knopp committed
171
172
173
174
175
  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;
    
176
#ifdef Rel10
177
    eNB_mac_inst[module_idP].common_channels[CC_id].mcch_active =0;
178
#endif
knopp's avatar
   
knopp committed
179
180
181
182
    
    eNB_mac_inst[module_idP].frame    = frameP;
    eNB_mac_inst[module_idP].subframe = subframeP;
  }
183

gauthier's avatar
gauthier committed
184
  //if (subframeP%5 == 0)
knopp's avatar
   
knopp committed
185
  //#ifdef EXMIMO
186
187
188
189
190
  ctxt.enb_module_id = module_idP;
  ctxt.ue_module_id  = 0;
  ctxt.frame         = frameP;
  ctxt.enb_flag      = ENB_FLAG_YES;
  pdcp_run(&ctxt);
knopp's avatar
   
knopp committed
191
  //#endif
192

193
  // check HO
gauthier's avatar
gauthier committed
194
  rrc_rx_tx(module_idP,
195
196
197
            frameP,
            1,
            module_idP,
198
            CC_id);
199
200

#ifdef Rel10
knopp's avatar
   
knopp committed
201
  for (CC_id=0;CC_id<MAX_NUM_CCs;CC_id++) {
202
203
204
205
    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
206
    }
207
208
  }
#endif
knopp's avatar
   
knopp committed
209
  // refresh UE list based on UEs dropped by PHY in previous subframe
210
  /* 
knopp's avatar
   
knopp committed
211
212
213
  i=UE_list->head;
  while (i>=0) {
    next_i = UE_list->next[i];
214
    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
215
    if (mac_xface->get_eNB_UE_stats(module_idP,0,UE_RNTI(module_idP,i))==NULL) {
knopp's avatar
   
knopp committed
216
      mac_remove_ue(module_idP,i,frameP);
knopp's avatar
   
knopp committed
217
218
219
    }
    i=next_i;
  }
220
  */
221

gauthier's avatar
gauthier committed
222
  switch (subframeP) {
223
224
  case 0:
    // FDD/TDD Schedule Downlink RA transmissions (RA response, Msg4 Contention resolution)
gauthier's avatar
gauthier committed
225
    // Schedule ULSCH for FDD or subframeP 4 (TDD config 0,3,6)
226
    // Schedule Normal DLSCH
gauthier's avatar
gauthier committed
227

knopp's avatar
   
knopp committed
228
    // 
229
230

    if (mac_xface->lte_frame_parms->frame_type == FDD) {  //FDD
knopp's avatar
   
knopp committed
231
      schedule_ulsch(module_idP,frameP,cooperation_flag,0,4,nCCE);//,calibration_flag);
232
233
    }
    else if  ((mac_xface->lte_frame_parms->tdd_config == TDD) || //TDD
Florian Kaltenberger's avatar
Florian Kaltenberger committed
234
235
	      (mac_xface->lte_frame_parms->tdd_config == 3) ||
	      (mac_xface->lte_frame_parms->tdd_config == 6)) {
knopp's avatar
   
knopp committed
236
      //schedule_ulsch(module_idP,frameP,cooperation_flag,subframeP,4,nCCE);//,calibration_flag);
Florian Kaltenberger's avatar
Florian Kaltenberger committed
237
238
239
    }
    
    // schedule_ue_spec(module_idP,frameP,subframeP,nprb,nCCE,mbsfn_status);
gauthier's avatar
gauthier committed
240

knopp's avatar
   
knopp committed
241
242
243
    //schedule_RA(module_idP,frameP,subframeP,2,nprb,nCCE);
    //fill_DLSCH_dci(module_idP,frameP,subframeP,RBalloc,1,mbsfn_status);
    
244
245
246
    break;

  case 1:
gauthier's avatar
gauthier committed
247
    // TDD, schedule UL for subframeP 7 (TDD config 0,1) / subframeP 8 (TDD Config 6)
248
249
    // FDD, schedule normal UL/DLSCH
    if (mac_xface->lte_frame_parms->frame_type == TDD) { // TDD
gauthier's avatar
gauthier committed
250
251
252
        switch (mac_xface->lte_frame_parms->tdd_config) {
        case 0:
        case 1:
knopp's avatar
   
knopp committed
253
          schedule_ulsch(module_idP,frameP,cooperation_flag,subframeP,7,nCCE);
gauthier's avatar
gauthier committed
254
255
256
          fill_DLSCH_dci(module_idP,frameP,subframeP,RBalloc,0,mbsfn_status);
          break;
        case 6:
knopp's avatar
   
knopp committed
257
          schedule_ulsch(module_idP,frameP,cooperation_flag,subframeP,8,nCCE);
gauthier's avatar
gauthier committed
258
259
260
261
262
          fill_DLSCH_dci(module_idP,frameP,subframeP,RBalloc,0,mbsfn_status);
          break;
        default:
          break;
        }
263
264
    }
    else {  //FDD
265
266
      schedule_ue_spec(module_idP,frameP,subframeP,nprb,nCCE,mbsfn_status);
      fill_DLSCH_dci(module_idP,frameP,subframeP,RBalloc,0,mbsfn_status);
knopp's avatar
   
knopp committed
267
      schedule_ulsch(module_idP,frameP,cooperation_flag,1,5,nCCE);
268
269
    }
    break;
270
271

  case 2:
gauthier's avatar
gauthier committed
272
    // TDD, nothing
273
274
    // FDD, normal UL/DLSCH
    if (mac_xface->lte_frame_parms->frame_type == FDD) {  //FDD
275
276
      schedule_ue_spec(module_idP,frameP,subframeP,nprb,nCCE,mbsfn_status);
      fill_DLSCH_dci(module_idP,frameP,subframeP,RBalloc,0,mbsfn_status);
knopp's avatar
   
knopp committed
277
      schedule_ulsch(module_idP,frameP,cooperation_flag,2,6,nCCE);
278
279
280
281
    }
    break;

  case 3:
gauthier's avatar
gauthier committed
282
    // TDD Config 2, ULSCH for subframeP 7
283
284
285
    // TDD Config 2/5 normal DLSCH
    // FDD, normal UL/DLSCH
    if (mac_xface->lte_frame_parms->frame_type == TDD) {
gauthier's avatar
gauthier committed
286
287
        switch (mac_xface->lte_frame_parms->tdd_config) {
        case 2:
knopp's avatar
   
knopp committed
288
          schedule_ulsch(module_idP,frameP,cooperation_flag,subframeP,7,nCCE);
289
          // no break here!
gauthier's avatar
gauthier committed
290
        case 5:
knopp's avatar
   
knopp committed
291
          schedule_ue_spec(module_idP,frameP,subframeP,nprb,nCCE,mbsfn_status);
gauthier's avatar
gauthier committed
292
293
294
295
296
          fill_DLSCH_dci(module_idP,frameP,subframeP,RBalloc,0,mbsfn_status);
          break;
        default:
          break;
        }
297
298
    }
    else { //FDD
299
300
      //schedule_ue_spec(module_idP,frameP,subframeP,nprb,nCCE,mbsfn_status);
      //fill_DLSCH_dci(module_idP,frameP,subframeP,RBalloc,0,mbsfn_status);
301
      schedule_ulsch(module_idP,frameP,cooperation_flag,3,7,nCCE);
302

303
304
    }
    break;
305
306

  case 4:
gauthier's avatar
gauthier committed
307
    // TDD Config 1, ULSCH for subframeP 8
308
309
310
    // 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
311
312
        switch (mac_xface->lte_frame_parms->tdd_config) {
        case 1:
knopp's avatar
   
knopp committed
313
314
          //        schedule_RA(module_idP,frameP,subframeP,nprb,nCCE);
          schedule_ulsch(module_idP,frameP,cooperation_flag,subframeP,8,nCCE);
315
          // no break here!
gauthier's avatar
gauthier committed
316
        case 2:
317
          // no break here!
gauthier's avatar
gauthier committed
318
        case 4:
319
          // no break here!
gauthier's avatar
gauthier committed
320
        case 5:
knopp's avatar
   
knopp committed
321
          schedule_ue_spec(module_idP,frameP,subframeP,nprb,nCCE,mbsfn_status);
gauthier's avatar
gauthier committed
322
323
324
325
326
          fill_DLSCH_dci(module_idP,frameP,subframeP,RBalloc,1,mbsfn_status);
          break;
        default:
          break;
        }
327
328
    }
    else {
gauthier's avatar
gauthier committed
329
        if (mac_xface->lte_frame_parms->frame_type == FDD) {  //FDD
knopp's avatar
   
knopp committed
330
331
332
333
	  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
334

gauthier's avatar
gauthier committed
335
        }
336
337
338
339
340
341
342
343
    }
    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
344
345
    schedule_SI(module_idP,frameP,nprb,nCCE);
    //schedule_RA(module_idP,frameP,subframeP,5,nprb,nCCE);
346
    if ((mac_xface->lte_frame_parms->frame_type == FDD) ) {
knopp's avatar
   
knopp committed
347
348
        //      schedule_RA(module_idP,frameP,subframeP,1,nprb,nCCE);
        //      schedule_ulsch(module_idP,frameP,cooperation_flag,5,9,nCCE);
gauthier's avatar
gauthier committed
349
        fill_DLSCH_dci(module_idP,frameP,subframeP,RBalloc,0,mbsfn_status);
350
351
352

    }
    else if ((mac_xface->lte_frame_parms->tdd_config == 0) || // TDD Config 0
gauthier's avatar
gauthier committed
353
        (mac_xface->lte_frame_parms->tdd_config == 6)) { // TDD Config 6
knopp's avatar
   
knopp committed
354
        //schedule_ulsch(module_idP,cooperation_flag,subframeP,nCCE);
gauthier's avatar
gauthier committed
355
        fill_DLSCH_dci(module_idP,frameP,subframeP,RBalloc,0,mbsfn_status);
356
357
    }
    else {
358
        //schedule_ue_spec(module_idP,frameP,subframeP,nprb,nCCE,mbsfn_status);
gauthier's avatar
gauthier committed
359
        fill_DLSCH_dci(module_idP,frameP,subframeP,RBalloc,0,mbsfn_status);
360
361
362
363
364
365
366
367
    }
    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
368
369
370
371
        switch (mac_xface->lte_frame_parms->tdd_config) {
        case 0:
          break;
        case 1:
knopp's avatar
   
knopp committed
372
373
          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
374
375
376
          fill_DLSCH_dci(module_idP,frameP,subframeP,RBalloc,0,mbsfn_status);
          break;
        case 6:
knopp's avatar
   
knopp committed
377
378
          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
379
380
381
          fill_DLSCH_dci(module_idP,frameP,subframeP,RBalloc,0,mbsfn_status);
          break;
        case 5:
knopp's avatar
   
knopp committed
382
383
          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
384
385
386
387
          fill_DLSCH_dci(module_idP,frameP,subframeP,RBalloc,1,mbsfn_status);
          break;
        case 3:
        case 4:
knopp's avatar
   
knopp committed
388
          schedule_ue_spec(module_idP,frameP,subframeP,nprb,nCCE,mbsfn_status);
gauthier's avatar
gauthier committed
389
390
391
392
393
394
          fill_DLSCH_dci(module_idP,frameP,subframeP,RBalloc,0,mbsfn_status);
          break;

        default:
          break;
        }
395
396
    }
    else {  //FDD
knopp's avatar
   
knopp committed
397
398
        //      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
399
        fill_DLSCH_dci(module_idP,frameP,subframeP,RBalloc,0,mbsfn_status);
400
401
    }
    break;
gauthier's avatar
gauthier committed
402

403
404
405
406
  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
407
408
409
        switch (mac_xface->lte_frame_parms->tdd_config) {
        case 3:
        case 4:
410
          schedule_RA(module_idP,frameP,subframeP,3,nprb,nCCE);  // 3 = Msg3 subframeP, not
knopp's avatar
   
knopp committed
411
          schedule_ue_spec(module_idP,frameP,subframeP,nprb,nCCE,mbsfn_status);
412
          fill_DLSCH_dci(module_idP,frameP,subframeP,RBalloc,1,mbsfn_status);
gauthier's avatar
gauthier committed
413
414
          break;
        case 5:
knopp's avatar
   
knopp committed
415
          schedule_ue_spec(module_idP,frameP,subframeP,nprb,nCCE,mbsfn_status);
gauthier's avatar
gauthier committed
416
417
418
419
420
          fill_DLSCH_dci(module_idP,frameP,subframeP,RBalloc,0,mbsfn_status);
          break;
        default:
          break;
        }
421
    }
422
    else {  //FDD
423
424
425
      //schedule_ulsch(module_idP,frameP,cooperation_flag,7,1,nCCE);
      schedule_ue_spec(module_idP,frameP,subframeP,nprb,nCCE,mbsfn_status);
      fill_DLSCH_dci(module_idP,frameP,subframeP,RBalloc,0,mbsfn_status);
426
427
428
429
    }
    break;

  case 8:
gauthier's avatar
gauthier committed
430
    // TDD Config 2,3,4,5 ULSCH for subframeP 2
431
432
433
    //
    // FDD Normal UL/DLSCH
    if (mac_xface->lte_frame_parms->frame_type == TDD) { // TDD
gauthier's avatar
gauthier committed
434
435
436
437
438
439
        switch (mac_xface->lte_frame_parms->tdd_config) {
        case 2:
        case 3:
        case 4:
        case 5:

knopp's avatar
   
knopp committed
440
441
442
          //	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
443
444
445
446
447
          fill_DLSCH_dci(module_idP,frameP,subframeP,RBalloc,0,mbsfn_status);
          break;
        default:
          break;
        }
448
449
    }
    else {  //FDD
450
451
452
      //schedule_ulsch(module_idP,frameP,cooperation_flag,8,2,nCCE);
      schedule_ue_spec(module_idP,frameP,subframeP,nprb,nCCE,mbsfn_status);
      fill_DLSCH_dci(module_idP,frameP,subframeP,RBalloc,0,mbsfn_status);
453
454
455
456
457
458
    }
    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
459
460
        switch (mac_xface->lte_frame_parms->tdd_config) {
        case 1:
knopp's avatar
   
knopp committed
461
462
463
          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
464
465
466
467
          fill_DLSCH_dci(module_idP,frameP,subframeP,RBalloc,1,mbsfn_status);
          break;
        case 3:
        case 4:
knopp's avatar
   
knopp committed
468
469
          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
470
471
472
          fill_DLSCH_dci(module_idP,frameP,subframeP,RBalloc,0,mbsfn_status);
          break;
        case 6:
knopp's avatar
   
knopp committed
473
474
475
          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
476
477
478
479
          fill_DLSCH_dci(module_idP,frameP,subframeP,RBalloc,0,mbsfn_status);
          break;
        case 2:
        case 5:
knopp's avatar
   
knopp committed
480
481
          //schedule_RA(module_idP,frameP,subframeP,nprb,nCCE);
          schedule_ue_spec(module_idP,frameP,subframeP,nprb,nCCE,mbsfn_status);
gauthier's avatar
gauthier committed
482
483
484
485
486
          fill_DLSCH_dci(module_idP,frameP,subframeP,RBalloc,0,mbsfn_status);
          break;
        default:
          break;
        }
487
488
    }
    else {  //FDD
489
      //     schedule_ulsch(module_idP,frameP,cooperation_flag,9,3,nCCE);
knopp's avatar
   
knopp committed
490
        schedule_ue_spec(module_idP,frameP,subframeP,nprb,nCCE,mbsfn_status);
gauthier's avatar
gauthier committed
491
        fill_DLSCH_dci(module_idP,frameP,subframeP,RBalloc,0,mbsfn_status);
492
493
    }
    break;
gauthier's avatar
gauthier committed
494

495
  }
496

knopp's avatar
   
knopp committed
497
498
499
  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]);
500

501
  stop_meas(&eNB_mac_inst[module_idP].eNB_scheduler);
502
503
  vcd_signal_dumper_dump_function_by_name(VCD_SIGNAL_DUMPER_FUNCTIONS_ENB_DLSCH_ULSCH_SCHEDULER,VCD_FUNCTION_OUT);
 
504
}
505
506
507