added support in gNB and UE for long PRACH sequences. Tested format 0 with unitary simulation only.

openair1/SIMULATION/NR_PHY/prachsim.c

@@ -89,7 +89,7 @@ int main(int argc, char **argv){
   int i, aa, aarx, **txdata, trial, n_frames = 1, prach_start, rx_prach_start; //, ntrials=1;
   int N_RB_UL = 106, delay = 0, NCS_config = 13, rootSequenceIndex = 1, threequarter_fs = 0, mu = 1, fd_occasion = 0, loglvl = OAILOG_INFO, numRA = 0, prachStartSymbol = 0;
   uint8_t snr1set = 0, ue_speed1set = 0, transmission_mode = 1, n_tx = 1, n_rx = 1, awgn_flag = 0, msg1_frequencystart = 0, num_prach_fd_occasions = 1, prach_format;
-  uint8_t frame = 1, subframe = 19, config_index = 98, prach_sequence_length = 1, num_root_sequences = 16, restrictedSetConfig = 0, N_dur, N_t_slot, start_symbol;
+  uint8_t frame = 1, subframe = 9, slot=19, config_index = 98, prach_sequence_length = 1, num_root_sequences = 16, restrictedSetConfig = 0, N_dur, N_t_slot, start_symbol;
   uint16_t Nid_cell = 0, preamble_tx = 0, preamble_delay, format, format0, format1;
   uint32_t tx_lev = 10000, prach_errors = 0, samp_count; //,tx_lev_dB;
   uint64_t SSB_positions = 0x01, absoluteFrequencyPointA = 640000;
@@ -118,7 +118,7 @@ int main(int argc, char **argv){
 
   randominit(0);
 
-  while ((c = getopt (argc, argv, "hHaA:Cr:p:g:n:s:S:t:x:y:v:V:z:N:F:d:Z:L:R:E")) != -1) {
+  while ((c = getopt (argc, argv, "hHaA:Cc:r:p:g:n:s:S:t:x:y:v:V:z:N:F:d:Z:L:R:E")) != -1) {
     switch (c) {
     case 'a':
       printf("Running AWGN simulation\n");
@@ -127,6 +127,10 @@ int main(int argc, char **argv){
       //ntrials=1;
       break;
 
+    case 'c':
+      config_index = atoi(optarg);
+      break;
+
     case 'd':
       delay = atoi(optarg);
       break;
@@ -313,6 +317,11 @@ int main(int argc, char **argv){
     }
   }
 
+  
+  if (config_index<67)  { prach_sequence_length=0; slot = subframe*2; }
+
+  printf("Config_index %d, prach_sequence_length %d\n",config_index,prach_sequence_length);
+
   // Configure log
   logInit();
   set_glog(loglvl);
@@ -373,11 +382,11 @@ int main(int argc, char **argv){
   gNB->gNB_config.prach_config.num_prach_fd_occasions.value = num_prach_fd_occasions;
   gNB->gNB_config.prach_config.num_prach_fd_occasions_list = (nfapi_nr_num_prach_fd_occasions_t *) malloc(num_prach_fd_occasions*sizeof(nfapi_nr_num_prach_fd_occasions_t));
 
-  gNB->proc.slot_rx       = subframe;
+  gNB->proc.slot_rx       = slot;
 
   get_nr_prach_info_from_index(config_index,
                                (int)frame,
-                               (int)subframe,
+                               (int)slot,
                                absoluteFrequencyPointA,
                                mu,
                                frame_parms->frame_type,
@@ -562,7 +571,7 @@ int main(int argc, char **argv){
 
   UE_nr_rxtx_proc_t proc={0};
   proc.frame_tx  = frame;
-  proc.nr_tti_tx = subframe;
+  proc.nr_tti_tx = slot;
   nr_ue_prach_procedures(UE,&proc,0,0);
 
   /* tx_lev_dB not used later, no need to set */
@@ -571,19 +580,19 @@ int main(int argc, char **argv){
   if (mu == 0)
     samp_count = frame_parms->samples_per_subframe;
   else
-    samp_count = (subframe%(frame_parms->slots_per_subframe/2)) ? frame_parms->samples_per_slotN0 : frame_parms->samples_per_slot0;
+    samp_count = ((slot)%(frame_parms->slots_per_subframe/2)) ? frame_parms->samples_per_slotN0 : frame_parms->samples_per_slot0;
 
-  prach_start = subframe*samp_count - UE->N_TA_offset;
+  prach_start = slot*samp_count - UE->N_TA_offset;
 
   #ifdef NR_PRACH_DEBUG
-    LOG_M("txsig0.m", "txs0", &txdata[0][prach_start], samp_count, 1, 1);
+    LOG_M("txsig0.m", "txs0", &txdata[0][prach_start], frame_parms->samples_per_subframe, 1, 1);
     //LOG_M("txsig1.m","txs1", txdata[1],FRAME_LENGTH_COMPLEX_SAMPLES,1,1);
   #endif
 
   // multipath channel
   // dump_nr_prach_config(&gNB->frame_parms,subframe);
 
-  for (i = 0; i < samp_count<<1; i++) {
+  for (i = 0; i < frame_parms->samples_per_subframe<<1; i++) {
     for (aa=0; aa<1; aa++) {
       if (awgn_flag == 0) {
         s_re[aa][i] = ((double)(((short *)&txdata[aa][prach_start]))[(i<<1)]);
@@ -618,7 +627,10 @@ int main(int argc, char **argv){
       ue_speed1 = ue_speed0 + 50;
   }
 
-  rx_prach_start = subframe*frame_parms->get_samples_per_slot(subframe,frame_parms);
+  rx_prach_start = slot*frame_parms->get_samples_per_slot(slot,frame_parms);
+  if (n_frames==1) printf("slot %d, rx_prach_start %d\n",slot,rx_prach_start);
+  uint16_t preamble_rx, preamble_energy, N_ZC;
+  N_ZC = prach_sequence_length == 0 ? 839 : 139;
 
   for (SNR=snr0; SNR<snr1; SNR+=.1) {
     for (ue_speed=ue_speed0; ue_speed<ue_speed1; ue_speed+=10) {
@@ -630,9 +642,8 @@ int main(int argc, char **argv){
 
       for (trial=0; trial<n_frames; trial++) {
 
-        uint16_t preamble_rx, preamble_energy, N_ZC;
 
-        sigma2_dB = 10*log10((double)tx_lev) - SNR;
+        sigma2_dB = 10*log10((double)tx_lev) - SNR - 10*log10(N_RB_UL*12/N_ZC);
 
         if (n_frames==1)
           printf("sigma2_dB %f (SNR %f dB) tx_lev_dB %f\n",sigma2_dB,SNR,10*log10((double)tx_lev));
@@ -651,20 +662,20 @@ int main(int argc, char **argv){
                  10*log10(tx_lev));
         }
 
-        for (i = 0; i< frame_parms->get_samples_per_slot(subframe,frame_parms); i++) {
+        for (i = 0; i< frame_parms->samples_per_subframe; i++) {
           for (aa = 0; aa < frame_parms->nb_antennas_rx; aa++) {
-            ((short*) &gNB->common_vars.rxdata[aa][rx_prach_start])[2*i] = (short) (.167*(r_re[aa][i] +sqrt(sigma2/2)*gaussdouble(0.0,1.0)));
-            ((short*) &gNB->common_vars.rxdata[aa][rx_prach_start])[2*i+1] = (short) (.167*(r_im[aa][i] + (iqim*r_re[aa][i]) + sqrt(sigma2/2)*gaussdouble(0.0,1.0)));
+            ((short*) &ru->common.rxdata[aa][rx_prach_start])[2*i] = (short) (.167*(r_re[aa][i] +sqrt(sigma2/2)*gaussdouble(0.0,1.0)));
+            ((short*) &ru->common.rxdata[aa][rx_prach_start])[2*i+1] = (short) (.167*(r_im[aa][i] + (iqim*r_re[aa][i]) + sqrt(sigma2/2)*gaussdouble(0.0,1.0)));
           }
         }
 
-        rx_nr_prach_ru(ru, prach_format, numRA, prachStartSymbol, frame, subframe);
+        rx_nr_prach_ru(ru, prach_format, numRA, prachStartSymbol, frame, slot);
 
         gNB->prach_vars.rxsigF = ru->prach_rxsigF;
 
         rx_nr_prach(gNB, prach_pdu, frame, subframe, &preamble_rx, &preamble_energy, &preamble_delay);
 
-        printf(" preamble_energy %d preamble_rx %d preamble_tx %d \n", preamble_energy, preamble_rx, preamble_tx);
+	//        printf(" preamble_energy %d preamble_rx %d preamble_tx %d \n", preamble_energy, preamble_rx, preamble_tx);
 
         if (preamble_rx != preamble_tx)
           prach_errors++;

openair1/SIMULATION/TOOLS/taus.c

@@ -21,7 +21,8 @@
 
 #include <time.h>
 #include <stdlib.h>
-#include "SIMULATION/TOOLS/sim.h"
+//#include "SIMULATION/TOOLS/sim.h"
+
 
 unsigned int s0, s1, s2, b;