138 lines
5.9 KiB
C
138 lines
5.9 KiB
C
/*******************************************************************************
|
|
|
|
Eurecom OpenAirInterface
|
|
Copyright(c) 1999 - 2011 Eurecom
|
|
|
|
This program is free software; you can redistribute it and/or modify it
|
|
under the terms and conditions of the GNU General Public License,
|
|
version 2, as published by the Free Software Foundation.
|
|
|
|
This program is distributed in the hope it will be useful, but WITHOUT
|
|
ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
|
|
FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for
|
|
more details.
|
|
|
|
You should have received a copy of the GNU General Public License along with
|
|
this program; if not, write to the Free Software Foundation, Inc.,
|
|
51 Franklin St - Fifth Floor, Boston, MA 02110-1301 USA.
|
|
|
|
The full GNU General Public License is included in this distribution in
|
|
the file called "COPYING".
|
|
|
|
Contact Information
|
|
Openair Admin: openair_admin@eurecom.fr
|
|
Openair Tech : openair_tech@eurecom.fr
|
|
Forums : http://forums.eurecom.fsr/openairinterface
|
|
Address : Eurecom, 2229, route des crêtes, 06560 Valbonne Sophia Antipolis, France
|
|
|
|
*******************************************************************************/
|
|
|
|
/*! \file pusch_pc.c
|
|
* \brief Implementation of UE PUSCH Power Control procedures from 36.213 LTE specifications (Section
|
|
* \author R. Knopp
|
|
* \date 2011
|
|
* \version 0.1
|
|
* \company Eurecom
|
|
* \email: knopp@eurecom.fr
|
|
* \note
|
|
* \warning
|
|
*/
|
|
|
|
#include "PHY/defs.h"
|
|
#include "PHY/LTE_TRANSPORT/proto.h"
|
|
#include "PHY/extern.h"
|
|
|
|
int16_t get_hundred_times_delta_IF(PHY_VARS_UE *phy_vars_ue,uint8_t eNB_id,uint8_t harq_pid) {
|
|
|
|
uint32_t Nre = phy_vars_ue->ulsch_ue[eNB_id]->harq_processes[harq_pid]->Nsymb_initial *
|
|
phy_vars_ue->ulsch_ue[eNB_id]->harq_processes[harq_pid]->nb_rb*12;
|
|
|
|
if (Nre==0)
|
|
return(0);
|
|
|
|
uint32_t MPR = phy_vars_ue->ulsch_ue[eNB_id]->harq_processes[harq_pid]->sumKr / Nre;
|
|
// Note: MPR is the effective spectral efficiency of the PUSCH
|
|
|
|
uint16_t beta_offset_pusch = (phy_vars_ue->ulsch_ue[eNB_id]->harq_processes[harq_pid]->control_only == 1) ?
|
|
phy_vars_ue->ulsch_ue[eNB_id]->beta_offset_cqi_times8:8;
|
|
|
|
if (phy_vars_ue->ul_power_control_dedicated[eNB_id].deltaMCS_Enabled == 1) {
|
|
// This is the formula from Section 5.1.1.1 in 36.213 (deltaIF_PUSCH = (2^(MPR*Ks)-1)*beta_offset_pusch
|
|
return(100*((((1<<((5*MPR)>>2)) - 1)*beta_offset_pusch)>>3));
|
|
}
|
|
else {
|
|
return(0);
|
|
}
|
|
}
|
|
|
|
uint16_t hundred_times_log10_NPRB[100] = {0,301,477,602,698,778,845,903,954,1000,1041,1079,1113,1146,1176,1204,1230,1255,1278,1301,1322,1342,1361,1380,1397,1414,1431,1447,1462,1477,1491,1505,1518,1531,1544,1556,1568,1579,1591,1602,1612,1623,1633,1643,1653,1662,1672,1681,1690,1698,1707,1716,1724,1732,1740,1748,1755,1763,1770,1778,1785,1792,1799,1806,1812,1819,1826,1832,1838,1845,1851,1857,1863,1869,1875,1880,1886,1892,1897,1903,1908,1913,1919,1924,1929,1934,1939,1944,1949,1954,1959,1963,1968,1973,1977,1982,1986,1991,1995,2000};
|
|
|
|
uint8_t alpha_lut[8] = {0,40,50,60,70,80,90,100};
|
|
|
|
void pusch_power_cntl(PHY_VARS_UE *phy_vars_ue,uint8_t subframe,uint8_t eNB_id,uint8_t j, uint8_t abstraction_flag) {
|
|
|
|
|
|
uint8_t harq_pid = subframe2harq_pid(&phy_vars_ue->lte_frame_parms,
|
|
((subframe==0)?1:0) + phy_vars_ue->frame,
|
|
subframe);
|
|
|
|
uint8_t nb_rb = phy_vars_ue->ulsch_ue[eNB_id]->harq_processes[harq_pid]->nb_rb;
|
|
int8_t PL;
|
|
|
|
|
|
// P_pusch = 10*log10(nb_rb + P_opusch(j)+ alpha(u)*PL + delta_TF(i) + f(i))
|
|
//
|
|
// P_opusch(0) = P_oPTR + deltaP_Msg3 if PUSCH is transporting Msg3
|
|
// else
|
|
// P_opusch(0) = PO_NOMINAL_PUSCH(j) + P_O_UE_PUSCH(j)
|
|
PL = get_PL(phy_vars_ue->Mod_id,eNB_id);
|
|
|
|
phy_vars_ue->ulsch_ue[eNB_id]->Po_PUSCH = (hundred_times_log10_NPRB[nb_rb-1]+
|
|
get_hundred_times_delta_IF(phy_vars_ue,eNB_id,harq_pid) +
|
|
100*phy_vars_ue->ulsch_ue[eNB_id]->f_pusch)/100;
|
|
|
|
if( phy_vars_ue->ulsch_ue_Msg3_active[eNB_id] == 1) { // Msg3 PUSCH
|
|
|
|
phy_vars_ue->ulsch_ue[eNB_id]->Po_PUSCH += (mac_xface->get_Po_NOMINAL_PUSCH(phy_vars_ue->Mod_id) + PL);
|
|
|
|
LOG_D(PHY,"[UE %d][RAPROC] frame %d, subframe %d: Msg3 Po_PUSCH %d dBm (%d,%d,%d,%d,%d)\n",
|
|
phy_vars_ue->Mod_id,((subframe==0)?1:0)+phy_vars_ue->frame,subframe,phy_vars_ue->ulsch_ue[eNB_id]->Po_PUSCH,
|
|
100*mac_xface->get_Po_NOMINAL_PUSCH(phy_vars_ue->Mod_id),
|
|
hundred_times_log10_NPRB[nb_rb-1],
|
|
100*PL,
|
|
get_hundred_times_delta_IF(phy_vars_ue,eNB_id,harq_pid),
|
|
100*phy_vars_ue->ulsch_ue[eNB_id]->f_pusch);
|
|
}
|
|
else if (j==0) { // SPS PUSCH
|
|
}
|
|
else if (j==1) { // Normal PUSCH
|
|
|
|
phy_vars_ue->ulsch_ue[eNB_id]->Po_PUSCH += ((alpha_lut[phy_vars_ue->lte_frame_parms.ul_power_control_config_common.alpha]*PL)/100);
|
|
phy_vars_ue->ulsch_ue[eNB_id]->Po_PUSCH += phy_vars_ue->lte_frame_parms.ul_power_control_config_common.p0_NominalPUSCH;
|
|
phy_vars_ue->ulsch_ue[eNB_id]->PHR = 15-phy_vars_ue->ulsch_ue[eNB_id]->Po_PUSCH; // 15 dBm, FIX ME
|
|
|
|
if (phy_vars_ue->ulsch_ue[eNB_id]->PHR < -23)
|
|
phy_vars_ue->ulsch_ue[eNB_id]->PHR = -23;
|
|
else if (phy_vars_ue->ulsch_ue[eNB_id]->PHR > 40)
|
|
phy_vars_ue->ulsch_ue[eNB_id]->PHR = 40;
|
|
|
|
LOG_D(PHY,"[UE %d][PUSCH %d] frame %d, subframe %d: Po_PUSCH %d dBm : Po_NOMINAL_PUSCH %d,log10(NPRB) %f,PHR %d, PL %d, alpha*PL %f,delta_IF %f,f_pusch %d\n",
|
|
phy_vars_ue->Mod_id,harq_pid,((subframe==0)?1:0) + phy_vars_ue->frame,subframe,
|
|
phy_vars_ue->ulsch_ue[eNB_id]->Po_PUSCH,
|
|
phy_vars_ue->lte_frame_parms.ul_power_control_config_common.p0_NominalPUSCH,
|
|
hundred_times_log10_NPRB[nb_rb-1]/100.0,
|
|
phy_vars_ue->ulsch_ue[eNB_id]->PHR,
|
|
PL,
|
|
alpha_lut[phy_vars_ue->lte_frame_parms.ul_power_control_config_common.alpha]*PL/100.0,
|
|
get_hundred_times_delta_IF(phy_vars_ue,eNB_id,harq_pid)/100.0,
|
|
phy_vars_ue->ulsch_ue[eNB_id]->f_pusch);
|
|
}
|
|
|
|
}
|
|
|
|
int8_t get_PHR(uint8_t Mod_id, uint8_t eNB_index){
|
|
|
|
return PHY_vars_UE_g[Mod_id]->ulsch_ue[eNB_index]->PHR;
|
|
}
|
|
|