134 lines
5.7 KiB
C
134 lines
5.7 KiB
C
/*
|
|
* 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.1 (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
|
|
*/
|
|
|
|
/*! \file nr_prach_procedures.c
|
|
* \brief Implementation of gNB prach procedures from 38.213 LTE specifications
|
|
* \author R. Knopp,
|
|
* \date 2019
|
|
* \version 0.1
|
|
* \company Eurecom
|
|
* \email: knopp@eurecom.fr
|
|
* \note
|
|
* \warning
|
|
*/
|
|
|
|
#include "PHY/defs_gNB.h"
|
|
#include "PHY/NR_TRANSPORT/nr_transport_proto.h"
|
|
#include "nfapi_nr_interface_scf.h"
|
|
#include "nfapi_pnf.h"
|
|
#include "common/utils/LOG/log.h"
|
|
#include "common/utils/LOG/vcd_signal_dumper.h"
|
|
#include "assertions.h"
|
|
#include <time.h>
|
|
|
|
int get_nr_prach_duration(uint8_t prach_format)
|
|
{
|
|
const int val[14] = {0, 0, 0, 0, 2, 4, 6, 2, 12, 2, 6, 2, 4, 6};
|
|
AssertFatal(prach_format < sizeofArray(val), "Invalid Prach format %d\n", prach_format);
|
|
return val[prach_format];
|
|
}
|
|
|
|
void L1_nr_prach_procedures(PHY_VARS_gNB *gNB, int frame, int slot, nfapi_nr_rach_indication_t *rach_ind)
|
|
{
|
|
VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME(VCD_SIGNAL_DUMPER_FUNCTIONS_PHY_ENB_PRACH_RX,1);
|
|
rach_ind->sfn = frame;
|
|
rach_ind->slot = slot;
|
|
rach_ind->number_of_pdus = 0;
|
|
|
|
prach_item_t *prach_id = find_nr_prach(&gNB->prach_list, frame, slot, SEARCH_EXIST);
|
|
if (!prach_id) {
|
|
return;
|
|
}
|
|
|
|
nfapi_nr_prach_pdu_t *prach_pdu = &prach_id->pdu;
|
|
LOG_D(NR_PHY_RACH, "%d.%d, prachstart slot %d prach entry occas %d\n", frame, slot, prach_id->slot, prach_pdu->num_prach_ocas);
|
|
const int prach_start_slot = prach_id->slot;
|
|
int N_dur = get_nr_prach_duration(prach_pdu->prach_format);
|
|
|
|
for (int prach_oc = 0; prach_oc < prach_pdu->num_prach_ocas; prach_oc++) {
|
|
uint prachStartSymbol = prach_pdu->prach_start_symbol + prach_oc * N_dur;
|
|
// comment FK: the standard 38.211 section 5.3.2 has one extra term +14*N_RA_slot. This is because there prachStartSymbol is
|
|
// given wrt to start of the 15kHz slot or 60kHz slot. Here we work slot based, so this function is anyway only called in slots
|
|
// where there is PRACH. Its up to the MAC to schedule another PRACH PDU in the case there are there N_RA_slot \in {0,1}.
|
|
rx_prach_out_t res = rx_nr_prach(prach_id, prach_oc);
|
|
LOG_D(NR_PHY,
|
|
"[RAPROC] Frame %d, slot %d, occasion %d (prachStartSymbol %d) : Most likely preamble %d, energy %d.%d dB delay %d "
|
|
"(prach_energy counter %d)\n",
|
|
frame,
|
|
slot,
|
|
prach_oc,
|
|
prachStartSymbol,
|
|
res.max_preamble,
|
|
res.max_preamble_energy / 10,
|
|
res.max_preamble_energy % 10,
|
|
res.max_preamble_delay,
|
|
gNB->prach_energy_counter);
|
|
|
|
if ((gNB->prach_energy_counter == NUM_PRACH_RX_FOR_NOISE_ESTIMATE)
|
|
&& (res.max_preamble_energy > gNB->measurements.prach_I0 + gNB->prach_thres)
|
|
&& (rach_ind->number_of_pdus < MAX_NUM_NR_RX_RACH_PDUS)) {
|
|
LOG_A(NR_PHY,
|
|
"[RAPROC] %d.%d Initiating RA procedure with preamble %d, energy %d.%d dB (I0 %d, thres %d), delay %d start symbol "
|
|
"%u freq index %u\n",
|
|
frame,
|
|
prach_start_slot,
|
|
res.max_preamble,
|
|
res.max_preamble_energy / 10,
|
|
res.max_preamble_energy % 10,
|
|
gNB->measurements.prach_I0,
|
|
gNB->prach_thres,
|
|
res.max_preamble_delay,
|
|
prachStartSymbol,
|
|
prach_pdu->num_ra);
|
|
|
|
T(T_ENB_PHY_INITIATE_RA_PROCEDURE,
|
|
T_INT(gNB->Mod_id),
|
|
T_INT(frame),
|
|
T_INT(slot),
|
|
T_INT(res.max_preamble),
|
|
T_INT(res.max_preamble_energy),
|
|
T_INT(res.max_preamble_delay));
|
|
|
|
nfapi_nr_prach_indication_pdu_t *ind = rach_ind->pdu_list + rach_ind->number_of_pdus;
|
|
*ind = (nfapi_nr_prach_indication_pdu_t){
|
|
.phy_cell_id = gNB->gNB_config.cell_config.phy_cell_id.value,
|
|
.symbol_index = prachStartSymbol,
|
|
.slot_index = slot,
|
|
.freq_index = prach_pdu->num_ra,
|
|
.avg_rssi = (res.max_preamble_energy < 631) ? (128 + (res.max_preamble_energy / 5)) : 254,
|
|
.avg_snr = 0xff, // invalid for now
|
|
.num_preamble = 1,
|
|
.preamble_list = {
|
|
{.preamble_index = res.max_preamble, .timing_advance = res.max_preamble_delay, .preamble_pwr = 0xffffffff}}};
|
|
rach_ind->number_of_pdus++;
|
|
}
|
|
gNB->measurements.prach_I0 = ((gNB->measurements.prach_I0 * 900) >> 10) + ((res.max_preamble_energy * 124) >> 10);
|
|
if (frame == 0)
|
|
LOG_I(PHY, "prach_I0 = %d.%d dB\n", gNB->measurements.prach_I0 / 10, gNB->measurements.prach_I0 % 10);
|
|
if (gNB->prach_energy_counter < NUM_PRACH_RX_FOR_NOISE_ESTIMATE)
|
|
gNB->prach_energy_counter++;
|
|
} // if prach_id>0
|
|
rach_ind->slot = prach_start_slot;
|
|
LOG_D(NR_PHY_RACH, "Freeing PRACH entry\n");
|
|
free_nr_prach_entry(&gNB->prach_list, prach_id);
|
|
VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME(VCD_SIGNAL_DUMPER_FUNCTIONS_PHY_ENB_PRACH_RX,0);
|
|
}
|