Skip to content
Projects
Groups
Snippets
Help
Loading...
Help
Support
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
O
OpenXG-RAN
Project overview
Project overview
Details
Activity
Releases
Repository
Repository
Files
Commits
Branches
Tags
Contributors
Graph
Compare
Issues
0
Issues
0
List
Boards
Labels
Milestones
Merge Requests
0
Merge Requests
0
CI / CD
CI / CD
Pipelines
Jobs
Schedules
Analytics
Analytics
CI / CD
Repository
Value Stream
Wiki
Wiki
Snippets
Snippets
Members
Members
Collapse sidebar
Close sidebar
Activity
Graph
Create a new issue
Jobs
Commits
Issue Boards
Open sidebar
spbro
OpenXG-RAN
Commits
00106a7e
Commit
00106a7e
authored
2 years ago
by
Robert Schmidt
Browse files
Options
Browse Files
Download
Plain Diff
Merge remote-tracking branch 'origin/configurable_rounds_in_sim' into integration_2022_wk44
parents
e9126363
847044a5
Branches unavailable
2024.w43
2024.w42
2024.w41
2024.w40
2024.w39
2024.w38
2024.w36
2024.w35
2024.w34
2024.w33
2024.w32
2024.w31
2024.w30
2024.w29
2024.w28
2024.w27
2024.w26
2024.w25
2024.w24
2024.w23
2024.w22
2024.w21
2024.w18
2024.w17
2024.w16
2024.w15
2024.w14
2024.w13
2024.w12
2024.w11
2024.w10
2024.w09
2024.w08
2024.w06
2024.w05
2024.w04
2024.w03
2024.w02
2024.w01
2023.w51
2023.w50
2023.w49
2023.w48
2023.w47
2023.w45
2023.w43
2023.w42
2023.w41
2023.w40
2023.w39
2023.w38
2023.w37
2023.w36
2023.w34
2023.w33
2023.w32
2023.w31
2023.w30
2023.w29
2023.w28
2023.w27
2023.w26
2023.w25
2023.w24
2023.w23
2023.w22
2023.w21
2023.w20
2023.w19
2023.w18
2023.w18b
2023.w16
2023.w15
2023.w14
2023.w13
2023.w12
2023.w11
2023.w11b
2023.w10
2023.w10b
2023.w09
2023.w08
2023.w08b
2023.w07
2023.w06
2023.w05
2023.w03
2023.w02
2022.w51
2022.w50
2022.w49
2022.w48
2022.w47
2022.w46
2022.w45
v2.1.0
v2.0.0
flexran-eol
ARC_1.3
Changes
9
Hide whitespace changes
Inline
Side-by-side
Showing
9 changed files
with
516 additions
and
557 deletions
+516
-557
openair1/PHY/NR_TRANSPORT/nr_ulsch.c
openair1/PHY/NR_TRANSPORT/nr_ulsch.c
+4
-5
openair1/PHY/NR_TRANSPORT/nr_ulsch_decoding.c
openair1/PHY/NR_TRANSPORT/nr_ulsch_decoding.c
+3
-18
openair1/PHY/defs_gNB.h
openair1/PHY/defs_gNB.h
+0
-1
openair1/SIMULATION/NR_PHY/dlsim.c
openair1/SIMULATION/NR_PHY/dlsim.c
+42
-70
openair1/SIMULATION/NR_PHY/ulsim.c
openair1/SIMULATION/NR_PHY/ulsim.c
+460
-460
openair2/LAYER2/NR_MAC_gNB/gNB_scheduler_RA.c
openair2/LAYER2/NR_MAC_gNB/gNB_scheduler_RA.c
+2
-1
openair2/LAYER2/NR_MAC_gNB/gNB_scheduler_primitives.c
openair2/LAYER2/NR_MAC_gNB/gNB_scheduler_primitives.c
+2
-1
openair2/LAYER2/NR_MAC_gNB/gNB_scheduler_ulsch.c
openair2/LAYER2/NR_MAC_gNB/gNB_scheduler_ulsch.c
+2
-1
openair2/LAYER2/NR_MAC_gNB/mac_proto.h
openair2/LAYER2/NR_MAC_gNB/mac_proto.h
+1
-0
No files found.
openair1/PHY/NR_TRANSPORT/nr_ulsch.c
View file @
00106a7e
...
...
@@ -74,13 +74,12 @@ void nr_fill_ulsch(PHY_VARS_gNB *gNB,
harq
->
slot
=
slot
;
harq
->
handled
=
0
;
harq
->
status
=
NR_ACTIVE
;
harq
->
new_rx
=
harq
->
ndi
!=
ulsch_pdu
->
pusch_data
.
new_data_indicator
;
if
(
harq
->
new_rx
)
{
harq
->
ndi
=
ulsch_pdu
->
pusch_data
.
new_data_indicator
;
harq
->
new_rx
=
ulsch_pdu
->
pusch_data
.
new_data_indicator
;
LOG_D
(
PHY
,
"ULSCH ID %d RNTI %x HARQ PID %d new data indicator %d
\n
"
,
ulsch_id
,
ulsch_pdu
->
rnti
,
harq_pid
,
ulsch_pdu
->
pusch_data
.
new_data_indicator
);
if
(
harq
->
new_rx
)
harq
->
round
=
0
;
}
else
{
else
harq
->
round
++
;
}
memcpy
((
void
*
)
&
ulsch
->
harq_processes
[
harq_pid
]
->
ulsch_pdu
,
(
void
*
)
ulsch_pdu
,
sizeof
(
nfapi_nr_pusch_pdu_t
));
...
...
This diff is collapsed.
Click to expand it.
openair1/PHY/NR_TRANSPORT/nr_ulsch_decoding.c
View file @
00106a7e
...
...
@@ -104,7 +104,6 @@ NR_gNB_ULSCH_t *new_gNB_ulsch(uint8_t max_ldpc_iterations, uint16_t N_RB_UL)
ulsch
->
max_ldpc_iterations
=
max_ldpc_iterations
;
for
(
i
=
0
;
i
<
NR_MAX_ULSCH_HARQ_PROCESSES
;
i
++
)
{
ulsch
->
harq_processes
[
i
]
=
(
NR_UL_gNB_HARQ_t
*
)
malloc16_clear
(
sizeof
(
NR_UL_gNB_HARQ_t
));
ulsch
->
harq_processes
[
i
]
->
b
=
(
uint8_t
*
)
malloc16_clear
(
ulsch_bytes
);
ulsch
->
harq_processes
[
i
]
->
c
=
(
uint8_t
**
)
malloc16_clear
(
a_segments
*
sizeof
(
uint8_t
*
));
...
...
@@ -442,30 +441,16 @@ uint32_t nr_ulsch_decoding(PHY_VARS_gNB *phy_vars_gNB,
VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME
(
VCD_SIGNAL_DUMPER_FUNCTIONS_PHY_gNB_ULSCH_DECODING
,
1
);
harq_process
->
TBS
=
pusch_pdu
->
pusch_data
.
tb_size
;
harq_process
->
round
=
nr_rv_to_round
(
pusch_pdu
->
pusch_data
.
rv_index
);
harq_process
->
new_rx
=
false
;
// flag to indicate if this is a new reception for this harq (initialized to false)
dtx_det
=
0
;
if
(
harq_process
->
round
==
0
)
{
harq_process
->
new_rx
=
true
;
harq_process
->
ndi
=
pusch_pdu
->
pusch_data
.
new_data_indicator
;
}
// this happens if there was a DTX in round 0
if
(
harq_process
->
ndi
!=
pusch_pdu
->
pusch_data
.
new_data_indicator
)
{
harq_process
->
new_rx
=
true
;
harq_process
->
ndi
=
pusch_pdu
->
pusch_data
.
new_data_indicator
;
LOG_D
(
PHY
,
"Missed ULSCH detection. NDI toggled but rv %d does not correspond to first reception
\n
"
,
pusch_pdu
->
pusch_data
.
rv_index
);
}
A
=
(
harq_process
->
TBS
)
<<
3
;
// target_code_rate is in 0.1 units
float
Coderate
=
(
float
)
pusch_pdu
->
target_code_rate
/
10240
.
0
f
;
LOG_D
(
PHY
,
"ULSCH Decoding, harq_pid %d
TBS %d G %d mcs %d Nl %d nb_rb %d, Qm %d, Coderate %f RV %d round
%d
\n
"
,
harq_pid
,
A
,
G
,
mcs
,
n_layers
,
nb_rb
,
Qm
,
Coderate
,
pusch_pdu
->
pusch_data
.
rv_index
,
harq_process
->
round
);
LOG_D
(
PHY
,
"ULSCH Decoding, harq_pid %d
rnti %x TBS %d G %d mcs %d Nl %d nb_rb %d, Qm %d, Coderate %f RV %d round %d new RX
%d
\n
"
,
harq_pid
,
ulsch
->
rnti
,
A
,
G
,
mcs
,
n_layers
,
nb_rb
,
Qm
,
Coderate
,
pusch_pdu
->
pusch_data
.
rv_index
,
harq_process
->
round
,
harq_process
->
new_rx
);
p_decParams
->
BG
=
pusch_pdu
->
maintenance_parms_v3
.
ldpcBaseGraph
;
int
kc
;
...
...
@@ -701,7 +686,7 @@ uint32_t nr_ulsch_decoding(PHY_VARS_gNB *phy_vars_gNB,
LOG_D
(
PHY
,
"[gNB %d] ULSCH: Setting ACK for slot %d TBS %d
\n
"
,
phy_vars_gNB
->
Mod_id
,
harq_process
->
slot
,
harq_process
->
TBS
);
harq_process
->
status
=
SCH_IDLE
;
harq_process
->
round
=
0
;
harq_process
->
round
=
0
;
ulsch
->
harq_mask
&=
~
(
1
<<
harq_pid
);
LOG_D
(
PHY
,
"ULSCH received ok
\n
"
);
...
...
This diff is collapsed.
Click to expand it.
openair1/PHY/defs_gNB.h
View file @
00106a7e
...
...
@@ -239,7 +239,6 @@ typedef struct {
uint32_t
slot
;
/// Index of current HARQ round for this DLSCH
uint8_t
round
;
uint8_t
ndi
;
bool
new_rx
;
/// Last TPC command
uint8_t
TPC
;
...
...
This diff is collapsed.
Click to expand it.
openair1/SIMULATION/NR_PHY/dlsim.c
View file @
00106a7e
...
...
@@ -379,17 +379,9 @@ int main(int argc, char **argv)
int
i
,
aa
;
//,l;
double
sigma2
,
sigma2_dB
=
10
,
SNR
,
snr0
=-
2
.
0
,
snr1
=
2
.
0
;
uint8_t
snr1set
=
0
;
uint32_t
errors_scrambling
[
4
][
100
]
=
{{
0
}};
int
n_errors
[
4
][
100
]
=
{{
0
}};
int
round_trials
[
4
][
100
]
=
{{
0
}};
double
roundStats
[
100
]
=
{
0
};
double
blerStats
[
4
][
100
]
=
{{
0
}};
double
berStats
[
4
][
100
]
=
{{
0
}};
double
snrStats
[
100
]
=
{
0
};
float
effRate
;
//float psnr;
float
eff_tp_check
=
0
.
7
;
uint8_t
snrRun
;
uint32_t
TBS
=
0
;
int
**
txdata
;
double
**
s_re
,
**
s_im
,
**
r_re
,
**
r_im
;
...
...
@@ -470,8 +462,8 @@ int main(int argc, char **argv)
int
print_perf
=
0
;
FILE
*
scg_fd
=
NULL
;
while
((
c
=
getopt
(
argc
,
argv
,
"f:hA:pf:g:i:n:s:S:t
:x:y:z:M:N:F:GR:d:PI:L:Ea:b:e:m:w:T:U:q:X:Y"
))
!=
-
1
)
{
while
((
c
=
getopt
(
argc
,
argv
,
"f:hA:pf:g:i:n:s:S:t:v
:x:y:z:M:N:F:GR:d:PI:L:Ea:b:e:m:w:T:U:q:X:Y"
))
!=
-
1
)
{
switch
(
c
)
{
case
'f'
:
scg_fd
=
fopen
(
optarg
,
"r"
);
...
...
@@ -577,6 +569,12 @@ int main(int argc, char **argv)
break
;
case
'v'
:
num_rounds
=
atoi
(
optarg
);
AssertFatal
(
num_rounds
>
0
&&
num_rounds
<
16
,
"Unsupported number of rounds %d, should be in [1,16]
\n
"
,
num_rounds
);
break
;
case
'y'
:
n_tx
=
atoi
(
optarg
);
...
...
@@ -723,6 +721,7 @@ int main(int argc, char **argv)
printf
(
"-T Enable PTRS, arguments list L_PTRS{0,1,2} K_PTRS{2,4}, e.g. -T 2 0 2
\n
"
);
printf
(
"-U Change DMRS Config, arguments list DMRS TYPE{0=A,1=B} DMRS AddPos{0:2} DMRS ConfType{1:2}, e.g. -U 3 0 2 1
\n
"
);
printf
(
"-P Print DLSCH performances
\n
"
);
printf
(
"-v Maximum number of rounds
\n
"
);
printf
(
"-w Write txdata to binary file (one frame)
\n
"
);
printf
(
"-d number of dlsch threads, 0: no dlsch parallelization
\n
"
);
printf
(
"-X gNB thread pool configuration, n => no threads
\n
"
);
...
...
@@ -1034,7 +1033,6 @@ int main(int argc, char **argv)
nr_ue_phy_config_request
(
&
UE_mac
->
phy_config
);
//NR_COMMON_channels_t *cc = RC.nrmac[0]->common_channels;
snrRun
=
0
;
int
n_errs
=
0
;
initNamedTpool
(
gNBthreads
,
&
gNB
->
threadPool
,
true
,
"gNB-tpool"
);
...
...
@@ -1065,6 +1063,13 @@ int main(int argc, char **argv)
clear_pdsch_stats
(
gNB
);
uint32_t
errors_scrambling
[
16
]
=
{
0
};
int
n_errors
[
16
]
=
{
0
};
int
round_trials
[
16
]
=
{
0
};
double
roundStats
=
{
0
};
double
blerStats
[
16
]
=
{
0
};
double
berStats
[
16
]
=
{
0
};
effRate
=
0
;
//n_errors2 = 0;
//n_alamouti = 0;
...
...
@@ -1098,7 +1103,7 @@ int main(int argc, char **argv)
UE_harq_process
->
first_rx
=
1
;
while
((
round
<
num_rounds
)
&&
(
UE_harq_process
->
ack
==
0
))
{
round_trials
[
round
]
[
snrRun
]
++
;
round_trials
[
round
]
++
;
clear_nr_nfapi_information
(
RC
.
nrmac
[
0
],
0
,
frame
,
slot
);
UE_info
->
UE_sched_ctrl
.
harq_processes
[
harq_pid
].
ndi
=
!
(
trial
&
1
);
...
...
@@ -1269,9 +1274,8 @@ int main(int argc, char **argv)
//---------------------- count errors ----------------------
//----------------------------------------------------------
if
(
UE
->
dlsch
[
0
][
0
]
->
last_iteration_cnt
>=
UE
->
dlsch
[
0
][
0
]
->
max_ldpc_iterations
+
1
)
n_errors
[
round
][
snrRun
]
++
;
if
(
UE
->
dlsch
[
0
][
0
]
->
last_iteration_cnt
>=
UE
->
dlsch
[
0
][
0
]
->
max_ldpc_iterations
+
1
)
n_errors
[
round
]
++
;
NR_UE_PDSCH
**
pdsch_vars
=
UE
->
pdsch_vars
;
int16_t
*
UE_llr
=
pdsch_vars
[
0
]
->
llr
[
0
];
...
...
@@ -1293,10 +1297,10 @@ int main(int argc, char **argv)
if
(((
gNB_dlsch
->
harq_process
.
f
[
i
]
==
0
)
&&
(
UE_llr
[
i
]
<=
0
))
||
((
gNB_dlsch
->
harq_process
.
f
[
i
]
==
1
)
&&
(
UE_llr
[
i
]
>=
0
)))
{
if
(
errors_scrambling
[
round
][
snrRun
]
==
0
)
{
if
(
errors_scrambling
[
round
]
==
0
)
{
LOG_D
(
PHY
,
"First bit in error in unscrambling = %d
\n
"
,
i
);
}
errors_scrambling
[
round
]
[
snrRun
]
++
;
errors_scrambling
[
round
]
++
;
}
}
...
...
@@ -1324,51 +1328,34 @@ int main(int argc, char **argv)
if
(
n_trials
==
1
)
printf
(
"errors_bit = %u (trial %d)
\n
"
,
errors_bit
,
trial
);
}
roundStats
[
snrRun
]
+=
((
float
)
round
);
roundStats
+=
((
float
)
round
);
if
(
UE_harq_process
->
ack
==
1
)
effRate
+=
((
float
)
TBS
)
/
round
;
}
// noise trials
roundStats
[
snrRun
]
/=
((
float
)
n_trials
);
roundStats
/=
((
float
)
n_trials
);
blerStats
[
0
][
snrRun
]
=
(
double
)
n_errors
[
0
][
snrRun
]
/
round_trials
[
0
][
snrRun
];
blerStats
[
1
][
snrRun
]
=
(
double
)
n_errors
[
1
][
snrRun
]
/
round_trials
[
1
][
snrRun
];
blerStats
[
2
][
snrRun
]
=
(
double
)
n_errors
[
2
][
snrRun
]
/
round_trials
[
2
][
snrRun
];
blerStats
[
3
][
snrRun
]
=
(
double
)
n_errors
[
3
][
snrRun
]
/
round_trials
[
3
][
snrRun
];
berStats
[
0
][
snrRun
]
=
(
double
)
errors_scrambling
[
0
][
snrRun
]
/
available_bits
/
round_trials
[
0
][
snrRun
];
berStats
[
1
][
snrRun
]
=
(
double
)
errors_scrambling
[
1
][
snrRun
]
/
available_bits
/
round_trials
[
1
][
snrRun
];
berStats
[
2
][
snrRun
]
=
(
double
)
errors_scrambling
[
2
][
snrRun
]
/
available_bits
/
round_trials
[
2
][
snrRun
];
berStats
[
3
][
snrRun
]
=
(
double
)
errors_scrambling
[
3
][
snrRun
]
/
available_bits
/
round_trials
[
3
][
snrRun
];
for
(
int
r
=
0
;
r
<
num_rounds
;
r
++
)
{
blerStats
[
r
]
=
(
double
)
n_errors
[
r
]
/
round_trials
[
r
];
berStats
[
r
]
=
(
double
)
errors_scrambling
[
r
]
/
available_bits
/
round_trials
[
r
];
}
effRate
/=
n_trials
;
printf
(
"*****************************************
\n
"
);
printf
(
"SNR %f: n_errors (%d/%d,%d/%d,%d/%d,%d/%d) (negative CRC), false_positive %d/%d, errors_scrambling (%u/%u,%u/%u,%u/%u,%u/%u
\n
"
,
SNR
,
n_errors
[
0
][
snrRun
],
round_trials
[
0
][
snrRun
],
n_errors
[
1
][
snrRun
],
round_trials
[
1
][
snrRun
],
n_errors
[
2
][
snrRun
],
round_trials
[
2
][
snrRun
],
n_errors
[
3
][
snrRun
],
round_trials
[
3
][
snrRun
],
n_false_positive
,
n_trials
,
errors_scrambling
[
0
][
snrRun
],
available_bits
*
round_trials
[
0
][
snrRun
],
errors_scrambling
[
1
][
snrRun
],
available_bits
*
round_trials
[
1
][
snrRun
],
errors_scrambling
[
2
][
snrRun
],
available_bits
*
round_trials
[
2
][
snrRun
],
errors_scrambling
[
3
][
snrRun
],
available_bits
*
round_trials
[
3
][
snrRun
]);
printf
(
"
\n
"
);
printf
(
"SNR %f: n_errors (%d/%d"
,
SNR
,
n_errors
[
0
],
round_trials
[
0
]);
for
(
int
r
=
1
;
r
<
num_rounds
;
r
++
)
printf
(
",%d/%d"
,
n_errors
[
r
],
round_trials
[
r
]);
printf
(
") (negative CRC), false_positive %d/%d, errors_scrambling (%u/%u"
,
n_false_positive
,
n_trials
,
errors_scrambling
[
0
],
available_bits
*
round_trials
[
0
]);
for
(
int
r
=
1
;
r
<
num_rounds
;
r
++
)
printf
(
",%u/%u"
,
errors_scrambling
[
r
],
available_bits
*
round_trials
[
r
]);
printf
(
")
\n\n
"
);
dump_pdsch_stats
(
stdout
,
gNB
);
printf
(
"SNR %f: Channel BLER (%e,%e,%e,%e), Channel BER (%e,%e,%e,%e) Avg round %.2f, Eff Rate %.4f bits/slot, Eff Throughput %.2f, TBS %u bits/slot
\n
"
,
SNR
,
blerStats
[
0
][
snrRun
],
blerStats
[
1
][
snrRun
],
blerStats
[
2
][
snrRun
],
blerStats
[
3
][
snrRun
],
berStats
[
0
][
snrRun
],
berStats
[
1
][
snrRun
],
berStats
[
2
][
snrRun
],
berStats
[
3
][
snrRun
],
roundStats
[
snrRun
],
effRate
,
effRate
/
TBS
*
100
,
TBS
);
printf
(
"SNR %f: Channel BLER (%e"
,
SNR
,
blerStats
[
0
]);
for
(
int
r
=
1
;
r
<
num_rounds
;
r
++
)
printf
(
",%e"
,
blerStats
[
r
]);
printf
(
"), Channel BER (%e"
,
berStats
[
0
]);
for
(
int
r
=
1
;
r
<
num_rounds
;
r
++
)
printf
(
",%e"
,
berStats
[
r
]);
printf
(
") Avg round %.2f, Eff Rate %.4f bits/slot, Eff Throughput %.2f, TBS %u bits/slot
\n
"
,
roundStats
,
effRate
,
effRate
/
TBS
*
100
,
TBS
);
printf
(
"*****************************************
\n
"
);
printf
(
"
\n
"
);
...
...
@@ -1442,24 +1429,9 @@ int main(int argc, char **argv)
break
;
}
snrStats
[
snrRun
]
=
SNR
;
snrRun
++
;
n_errs
=
n_errors
[
0
][
snrRun
];
n_errs
=
n_errors
[
0
];
}
// NSR
LOG_M
(
"dlsimStats.m"
,
"SNR"
,
snrStats
,
snrRun
,
1
,
7
);
LOG_MM
(
"dlsimStats.m"
,
"BLER"
,
blerStats
,
snrRun
,
1
,
7
);
LOG_MM
(
"dlsimStats.m"
,
"BER"
,
berStats
,
snrRun
,
1
,
7
);
LOG_MM
(
"dlsimStats.m"
,
"rounds"
,
roundStats
,
snrRun
,
1
,
7
);
/*if (n_trials>1) {
printf("HARQ stats:\nSNR\tRounds\n");
psnr = snr0;
for (uint8_t i=0; i<snrRun; i++) {
printf("%.1f\t%.2f\n",psnr,roundStats[i]);
psnr+=0.2;
}
}*/
free_channel_desc_scm
(
gNB2UE
);
for
(
i
=
0
;
i
<
n_tx
;
i
++
)
{
...
...
This diff is collapsed.
Click to expand it.
openair1/SIMULATION/NR_PHY/ulsim.c
View file @
00106a7e
...
...
@@ -313,11 +313,10 @@ int main(int argc, char **argv)
cpuf
=
get_cpu_freq_GHz
();
int
msg3_flag
=
0
;
int
rv_index
=
0
;
float
roundStats
[
100
]
;
double
effRate
[
100
];
double
effTP
[
100
];
float
roundStats
;
double
effRate
;
double
effTP
;
float
eff_tp_check
=
100
;
uint8_t
snrRun
;
int
ldpc_offload_flag
=
0
;
uint8_t
max_rounds
=
4
;
int
chest_type
[
2
]
=
{
0
};
...
...
@@ -498,6 +497,7 @@ int main(int argc, char **argv)
case
'v'
:
max_rounds
=
atoi
(
optarg
);
AssertFatal
(
max_rounds
>
0
&&
max_rounds
<
16
,
"Unsupported number of rounds %d, should be in [1,16]
\n
"
,
max_rounds
);
break
;
case
'w'
:
...
...
@@ -1004,7 +1004,6 @@ int main(int argc, char **argv)
}
//for (int i=0;i<16;i++) printf("%f\n",gaussdouble(0.0,1.0));
snrRun
=
0
;
int
read_errors
=
0
;
int
slot_offset
=
frame_parms
->
get_samples_slot_timestamp
(
slot
,
frame_parms
,
0
);
...
...
@@ -1057,25 +1056,14 @@ int main(int argc, char **argv)
}
int
ret
=
1
;
uint32_t
errors_scrambling
[
4
][
100
];
int
n_errors
[
4
][
100
];
int
round_trials
[
4
][
100
];
double
blerStats
[
4
][
100
];
double
berStats
[
4
][
100
];
double
snrStats
[
100
];
memset
(
errors_scrambling
,
0
,
sizeof
(
uint32_t
)
*
4
*
100
);
memset
(
n_errors
,
0
,
sizeof
(
int
)
*
4
*
100
);
memset
(
round_trials
,
0
,
sizeof
(
int
)
*
4
*
100
);
memset
(
blerStats
,
0
,
sizeof
(
double
)
*
4
*
100
);
memset
(
berStats
,
0
,
sizeof
(
double
)
*
4
*
100
);
memset
(
snrStats
,
0
,
sizeof
(
double
)
*
100
);
for
(
SNR
=
snr0
;
SNR
<=
snr1
;
SNR
+=
snr_step
)
{
varArray_t
*
table_rx
=
initVarArray
(
1000
,
sizeof
(
double
));
int
error_flag
=
0
;
n_false_positive
=
0
;
effRate
[
snrRun
]
=
0
;
effTP
[
snrRun
]
=
0
;
effRate
=
0
;
effTP
=
0
;
roundStats
=
0
;
reset_meas
(
&
gNB
->
phy_proc_rx
);
reset_meas
(
&
gNB
->
rx_pusch_stats
);
reset_meas
(
&
gNB
->
ulsch_decoding_stats
);
...
...
@@ -1092,254 +1080,240 @@ int main(int argc, char **argv)
reset_meas
(
&
UE
->
ulsch_interleaving_stats
);
reset_meas
(
&
UE
->
ulsch_encoding_stats
);
uint32_t
errors_scrambling
[
16
]
=
{
0
};
int
n_errors
[
16
]
=
{
0
};
int
round_trials
[
16
]
=
{
0
};
double
blerStats
[
16
]
=
{
0
};
double
berStats
[
16
]
=
{
0
};
clear_pusch_stats
(
gNB
);
for
(
trial
=
0
;
trial
<
n_trials
;
trial
++
)
{
uint8_t
round
=
0
;
crc_status
=
1
;
errors_decoding
=
0
;
memset
((
void
*
)
roundStats
,
0
,
50
*
sizeof
(
roundStats
[
0
]));
while
(
round
<
max_rounds
&&
crc_status
)
{
round_trials
[
round
][
snrRun
]
++
;
ulsch_ue
->
harq_processes
[
harq_pid
]
->
round
=
round
;
gNB
->
ulsch
[
0
]
->
harq_processes
[
harq_pid
]
->
round
=
round
;
rv_index
=
nr_rv_round_map
[
round
];
UE_proc
.
nr_slot_tx
=
slot
;
UE_proc
.
frame_tx
=
frame
;
UL_tti_req
->
SFN
=
frame
;
UL_tti_req
->
Slot
=
slot
;
UL_tti_req
->
n_pdus
=
1
;
UL_tti_req
->
pdus_list
[
0
].
pdu_type
=
NFAPI_NR_UL_CONFIG_PUSCH_PDU_TYPE
;
UL_tti_req
->
pdus_list
[
0
].
pdu_size
=
sizeof
(
nfapi_nr_pusch_pdu_t
);
memset
(
pusch_pdu
,
0
,
sizeof
(
nfapi_nr_pusch_pdu_t
));
int
abwp_size
=
NRRIV2BW
(
ubwp
->
bwp_Common
->
genericParameters
.
locationAndBandwidth
,
275
);
int
abwp_start
=
NRRIV2PRBOFFSET
(
ubwp
->
bwp_Common
->
genericParameters
.
locationAndBandwidth
,
275
);
int
ibwp_size
=
ibwps
;
int
ibwp_start
=
ibwp_rboffset
;
if
(
msg3_flag
==
1
)
{
if
((
ibwp_start
<
abwp_start
)
||
(
ibwp_size
>
abwp_size
))
pusch_pdu
->
bwp_start
=
abwp_start
;
else
pusch_pdu
->
bwp_start
=
ibwp_start
;
pusch_pdu
->
bwp_size
=
ibwp_size
;
start_rb
=
(
ibwp_start
-
abwp_start
);
printf
(
"msg3: ibwp_size %d, abwp_size %d, ibwp_start %d, abwp_start %d
\n
"
,
ibwp_size
,
abwp_size
,
ibwp_start
,
abwp_start
);
}
else
{
pusch_pdu
->
bwp_start
=
abwp_start
;
pusch_pdu
->
bwp_size
=
abwp_size
;
}
pusch_pdu
->
pusch_data
.
tb_size
=
TBS
>>
3
;
pusch_pdu
->
pdu_bit_map
=
pdu_bit_map
;
pusch_pdu
->
rnti
=
n_rnti
;
pusch_pdu
->
mcs_index
=
Imcs
;
pusch_pdu
->
mcs_table
=
mcs_table
;
pusch_pdu
->
target_code_rate
=
code_rate
;
pusch_pdu
->
qam_mod_order
=
mod_order
;
pusch_pdu
->
transform_precoding
=
transform_precoding
;
pusch_pdu
->
data_scrambling_id
=
*
scc
->
physCellId
;
pusch_pdu
->
nrOfLayers
=
precod_nbr_layers
;
pusch_pdu
->
ul_dmrs_symb_pos
=
l_prime_mask
;
pusch_pdu
->
dmrs_config_type
=
dmrs_config_type
;
pusch_pdu
->
ul_dmrs_scrambling_id
=
*
scc
->
physCellId
;
pusch_pdu
->
scid
=
0
;
pusch_pdu
->
dmrs_ports
=
((
1
<<
precod_nbr_layers
)
-
1
);
pusch_pdu
->
num_dmrs_cdm_grps_no_data
=
num_dmrs_cdm_grps_no_data
;
pusch_pdu
->
resource_alloc
=
1
;
pusch_pdu
->
rb_start
=
start_rb
;
pusch_pdu
->
rb_size
=
nb_rb
;
pusch_pdu
->
vrb_to_prb_mapping
=
0
;
pusch_pdu
->
frequency_hopping
=
0
;
pusch_pdu
->
uplink_frequency_shift_7p5khz
=
0
;
pusch_pdu
->
start_symbol_index
=
start_symbol
;
pusch_pdu
->
nr_of_symbols
=
nb_symb_sch
;
pusch_pdu
->
maintenance_parms_v3
.
tbSizeLbrmBytes
=
tbslbrm
;
pusch_pdu
->
pusch_data
.
rv_index
=
rv_index
;
pusch_pdu
->
pusch_data
.
harq_process_id
=
0
;
pusch_pdu
->
pusch_data
.
new_data_indicator
=
trial
&
0x1
;
pusch_pdu
->
pusch_data
.
num_cb
=
0
;
pusch_pdu
->
pusch_ptrs
.
ptrs_time_density
=
ptrs_time_density
;
pusch_pdu
->
pusch_ptrs
.
ptrs_freq_density
=
ptrs_freq_density
;
pusch_pdu
->
pusch_ptrs
.
ptrs_ports_list
=
(
nfapi_nr_ptrs_ports_t
*
)
malloc
(
2
*
sizeof
(
nfapi_nr_ptrs_ports_t
));
pusch_pdu
->
pusch_ptrs
.
ptrs_ports_list
[
0
].
ptrs_re_offset
=
0
;
pusch_pdu
->
maintenance_parms_v3
.
ldpcBaseGraph
=
get_BG
(
TBS
,
code_rate
);
// if transform precoding is enabled
if
(
transform_precoding
==
transformPrecoder_enabled
)
{
pusch_pdu
->
dfts_ofdm
.
low_papr_group_number
=
*
scc
->
physCellId
%
30
;
// U as defined in 38.211 section 6.4.1.1.1.2
pusch_pdu
->
dfts_ofdm
.
low_papr_sequence_number
=
0
;
// V as defined in 38.211 section 6.4.1.1.1.2
pusch_pdu
->
num_dmrs_cdm_grps_no_data
=
num_dmrs_cdm_grps_no_data
;
}
// prepare ULSCH/PUSCH reception
pushNotifiedFIFO
(
&
gNB
->
L1_tx_free
,
msgL1Tx
);
// to unblock the process in the beginning
nr_schedule_response
(
Sched_INFO
);
uint8_t
round
=
0
;
crc_status
=
1
;
errors_decoding
=
0
;
while
(
round
<
max_rounds
&&
crc_status
)
{
round_trials
[
round
]
++
;
ulsch_ue
->
harq_processes
[
harq_pid
]
->
round
=
round
;
rv_index
=
nr_rv_round_map
[
round
%
4
];
UE_proc
.
nr_slot_tx
=
slot
;
UE_proc
.
frame_tx
=
frame
;
UL_tti_req
->
SFN
=
frame
;
UL_tti_req
->
Slot
=
slot
;
UL_tti_req
->
n_pdus
=
1
;
UL_tti_req
->
pdus_list
[
0
].
pdu_type
=
NFAPI_NR_UL_CONFIG_PUSCH_PDU_TYPE
;
UL_tti_req
->
pdus_list
[
0
].
pdu_size
=
sizeof
(
nfapi_nr_pusch_pdu_t
);
memset
(
pusch_pdu
,
0
,
sizeof
(
nfapi_nr_pusch_pdu_t
));
int
abwp_size
=
NRRIV2BW
(
ubwp
->
bwp_Common
->
genericParameters
.
locationAndBandwidth
,
275
);
int
abwp_start
=
NRRIV2PRBOFFSET
(
ubwp
->
bwp_Common
->
genericParameters
.
locationAndBandwidth
,
275
);
int
ibwp_size
=
ibwps
;
int
ibwp_start
=
ibwp_rboffset
;
if
(
msg3_flag
==
1
)
{
if
((
ibwp_start
<
abwp_start
)
||
(
ibwp_size
>
abwp_size
))
pusch_pdu
->
bwp_start
=
abwp_start
;
else
pusch_pdu
->
bwp_start
=
ibwp_start
;
pusch_pdu
->
bwp_size
=
ibwp_size
;
start_rb
=
(
ibwp_start
-
abwp_start
);
printf
(
"msg3: ibwp_size %d, abwp_size %d, ibwp_start %d, abwp_start %d
\n
"
,
ibwp_size
,
abwp_size
,
ibwp_start
,
abwp_start
);
}
else
{
pusch_pdu
->
bwp_start
=
abwp_start
;
pusch_pdu
->
bwp_size
=
abwp_size
;
}
// --------- setting parameters for UE --------
pusch_pdu
->
pusch_data
.
tb_size
=
TBS
>>
3
;
pusch_pdu
->
pdu_bit_map
=
pdu_bit_map
;
pusch_pdu
->
rnti
=
n_rnti
;
pusch_pdu
->
mcs_index
=
Imcs
;
pusch_pdu
->
mcs_table
=
mcs_table
;
pusch_pdu
->
target_code_rate
=
code_rate
;
pusch_pdu
->
qam_mod_order
=
mod_order
;
pusch_pdu
->
transform_precoding
=
transform_precoding
;
pusch_pdu
->
data_scrambling_id
=
*
scc
->
physCellId
;
pusch_pdu
->
nrOfLayers
=
precod_nbr_layers
;
pusch_pdu
->
ul_dmrs_symb_pos
=
l_prime_mask
;
pusch_pdu
->
dmrs_config_type
=
dmrs_config_type
;
pusch_pdu
->
ul_dmrs_scrambling_id
=
*
scc
->
physCellId
;
pusch_pdu
->
scid
=
0
;
pusch_pdu
->
dmrs_ports
=
((
1
<<
precod_nbr_layers
)
-
1
);
pusch_pdu
->
num_dmrs_cdm_grps_no_data
=
num_dmrs_cdm_grps_no_data
;
pusch_pdu
->
resource_alloc
=
1
;
pusch_pdu
->
rb_start
=
start_rb
;
pusch_pdu
->
rb_size
=
nb_rb
;
pusch_pdu
->
vrb_to_prb_mapping
=
0
;
pusch_pdu
->
frequency_hopping
=
0
;
pusch_pdu
->
uplink_frequency_shift_7p5khz
=
0
;
pusch_pdu
->
start_symbol_index
=
start_symbol
;
pusch_pdu
->
nr_of_symbols
=
nb_symb_sch
;
pusch_pdu
->
maintenance_parms_v3
.
tbSizeLbrmBytes
=
tbslbrm
;
pusch_pdu
->
pusch_data
.
rv_index
=
rv_index
;
pusch_pdu
->
pusch_data
.
harq_process_id
=
0
;
pusch_pdu
->
pusch_data
.
new_data_indicator
=
trial
&
0x1
;
pusch_pdu
->
pusch_data
.
num_cb
=
0
;
pusch_pdu
->
pusch_ptrs
.
ptrs_time_density
=
ptrs_time_density
;
pusch_pdu
->
pusch_ptrs
.
ptrs_freq_density
=
ptrs_freq_density
;
pusch_pdu
->
pusch_ptrs
.
ptrs_ports_list
=
(
nfapi_nr_ptrs_ports_t
*
)
malloc
(
2
*
sizeof
(
nfapi_nr_ptrs_ports_t
));
pusch_pdu
->
pusch_ptrs
.
ptrs_ports_list
[
0
].
ptrs_re_offset
=
0
;
pusch_pdu
->
maintenance_parms_v3
.
ldpcBaseGraph
=
get_BG
(
TBS
,
code_rate
);
// if transform precoding is enabled
if
(
transform_precoding
==
transformPrecoder_enabled
)
{
pusch_pdu
->
dfts_ofdm
.
low_papr_group_number
=
*
scc
->
physCellId
%
30
;
// U as defined in 38.211 section 6.4.1.1.1.2
pusch_pdu
->
dfts_ofdm
.
low_papr_sequence_number
=
0
;
// V as defined in 38.211 section 6.4.1.1.1.2
pusch_pdu
->
num_dmrs_cdm_grps_no_data
=
num_dmrs_cdm_grps_no_data
;
}
scheduled_response
.
module_id
=
0
;
scheduled_response
.
CC_id
=
0
;
scheduled_response
.
frame
=
frame
;
scheduled_response
.
slot
=
slot
;
scheduled_response
.
dl_config
=
NULL
;
scheduled_response
.
ul_config
=
&
ul_config
;
scheduled_response
.
tx_request
=
&
tx_req
;
// Config UL TX PDU
tx_req
.
slot
=
slot
;
tx_req
.
sfn
=
frame
;
// tx_req->tx_config // TbD
tx_req
.
number_of_pdus
=
1
;
tx_req
.
tx_request_body
[
0
].
pdu_length
=
TBS
/
8
;
tx_req
.
tx_request_body
[
0
].
pdu_index
=
0
;
tx_req
.
tx_request_body
[
0
].
pdu
=
&
ulsch_input_buffer
[
0
];
ul_config
.
slot
=
slot
;
ul_config
.
number_pdus
=
1
;
ul_config
.
ul_config_list
[
0
].
pdu_type
=
FAPI_NR_UL_CONFIG_TYPE_PUSCH
;
ul_config
.
ul_config_list
[
0
].
pusch_config_pdu
.
rnti
=
n_rnti
;
ul_config
.
ul_config_list
[
0
].
pusch_config_pdu
.
pdu_bit_map
=
pdu_bit_map
;
ul_config
.
ul_config_list
[
0
].
pusch_config_pdu
.
qam_mod_order
=
mod_order
;
ul_config
.
ul_config_list
[
0
].
pusch_config_pdu
.
rb_size
=
nb_rb
;
ul_config
.
ul_config_list
[
0
].
pusch_config_pdu
.
rb_start
=
start_rb
;
ul_config
.
ul_config_list
[
0
].
pusch_config_pdu
.
nr_of_symbols
=
nb_symb_sch
;
ul_config
.
ul_config_list
[
0
].
pusch_config_pdu
.
start_symbol_index
=
start_symbol
;
ul_config
.
ul_config_list
[
0
].
pusch_config_pdu
.
ul_dmrs_symb_pos
=
l_prime_mask
;
ul_config
.
ul_config_list
[
0
].
pusch_config_pdu
.
dmrs_config_type
=
dmrs_config_type
;
ul_config
.
ul_config_list
[
0
].
pusch_config_pdu
.
mcs_index
=
Imcs
;
ul_config
.
ul_config_list
[
0
].
pusch_config_pdu
.
mcs_table
=
mcs_table
;
ul_config
.
ul_config_list
[
0
].
pusch_config_pdu
.
num_dmrs_cdm_grps_no_data
=
num_dmrs_cdm_grps_no_data
;
ul_config
.
ul_config_list
[
0
].
pusch_config_pdu
.
nrOfLayers
=
precod_nbr_layers
;
ul_config
.
ul_config_list
[
0
].
pusch_config_pdu
.
dmrs_ports
=
((
1
<<
precod_nbr_layers
)
-
1
);
ul_config
.
ul_config_list
[
0
].
pusch_config_pdu
.
absolute_delta_PUSCH
=
0
;
ul_config
.
ul_config_list
[
0
].
pusch_config_pdu
.
target_code_rate
=
code_rate
;
ul_config
.
ul_config_list
[
0
].
pusch_config_pdu
.
tbslbrm
=
tbslbrm
;
ul_config
.
ul_config_list
[
0
].
pusch_config_pdu
.
pusch_data
.
tb_size
=
TBS
/
8
;
ul_config
.
ul_config_list
[
0
].
pusch_config_pdu
.
pusch_data
.
new_data_indicator
=
trial
&
0x1
;
ul_config
.
ul_config_list
[
0
].
pusch_config_pdu
.
pusch_data
.
rv_index
=
rv_index
;
ul_config
.
ul_config_list
[
0
].
pusch_config_pdu
.
pusch_data
.
harq_process_id
=
harq_pid
;
ul_config
.
ul_config_list
[
0
].
pusch_config_pdu
.
pusch_ptrs
.
ptrs_time_density
=
ptrs_time_density
;
ul_config
.
ul_config_list
[
0
].
pusch_config_pdu
.
pusch_ptrs
.
ptrs_freq_density
=
ptrs_freq_density
;
ul_config
.
ul_config_list
[
0
].
pusch_config_pdu
.
pusch_ptrs
.
ptrs_ports_list
=
(
nfapi_nr_ue_ptrs_ports_t
*
)
malloc
(
2
*
sizeof
(
nfapi_nr_ue_ptrs_ports_t
));
ul_config
.
ul_config_list
[
0
].
pusch_config_pdu
.
pusch_ptrs
.
ptrs_ports_list
[
0
].
ptrs_re_offset
=
0
;
ul_config
.
ul_config_list
[
0
].
pusch_config_pdu
.
transform_precoding
=
transform_precoding
;
// if transform precoding is enabled
if
(
transform_precoding
==
transformPrecoder_enabled
)
{
ul_config
.
ul_config_list
[
0
].
pusch_config_pdu
.
dfts_ofdm
.
low_papr_group_number
=
*
scc
->
physCellId
%
30
;
// U as defined in 38.211 section 6.4.1.1.1.2
ul_config
.
ul_config_list
[
0
].
pusch_config_pdu
.
dfts_ofdm
.
low_papr_sequence_number
=
0
;
// V as defined in 38.211 section 6.4.1.1.1.2
//ul_config.ul_config_list[0].pusch_config_pdu.pdu_bit_map |= PUSCH_PDU_BITMAP_DFTS_OFDM;
// prepare ULSCH/PUSCH reception
pushNotifiedFIFO
(
&
gNB
->
L1_tx_free
,
msgL1Tx
);
// to unblock the process in the beginning
nr_schedule_response
(
Sched_INFO
);
// --------- setting parameters for UE --------
scheduled_response
.
module_id
=
0
;
scheduled_response
.
CC_id
=
0
;
scheduled_response
.
frame
=
frame
;
scheduled_response
.
slot
=
slot
;
scheduled_response
.
dl_config
=
NULL
;
scheduled_response
.
ul_config
=
&
ul_config
;
scheduled_response
.
tx_request
=
&
tx_req
;
// Config UL TX PDU
tx_req
.
slot
=
slot
;
tx_req
.
sfn
=
frame
;
// tx_req->tx_config // TbD
tx_req
.
number_of_pdus
=
1
;
tx_req
.
tx_request_body
[
0
].
pdu_length
=
TBS
/
8
;
tx_req
.
tx_request_body
[
0
].
pdu_index
=
0
;
tx_req
.
tx_request_body
[
0
].
pdu
=
&
ulsch_input_buffer
[
0
];
ul_config
.
slot
=
slot
;
ul_config
.
number_pdus
=
1
;
ul_config
.
ul_config_list
[
0
].
pdu_type
=
FAPI_NR_UL_CONFIG_TYPE_PUSCH
;
ul_config
.
ul_config_list
[
0
].
pusch_config_pdu
.
rnti
=
n_rnti
;
ul_config
.
ul_config_list
[
0
].
pusch_config_pdu
.
pdu_bit_map
=
pdu_bit_map
;
ul_config
.
ul_config_list
[
0
].
pusch_config_pdu
.
qam_mod_order
=
mod_order
;
ul_config
.
ul_config_list
[
0
].
pusch_config_pdu
.
rb_size
=
nb_rb
;
ul_config
.
ul_config_list
[
0
].
pusch_config_pdu
.
rb_start
=
start_rb
;
ul_config
.
ul_config_list
[
0
].
pusch_config_pdu
.
nr_of_symbols
=
nb_symb_sch
;
ul_config
.
ul_config_list
[
0
].
pusch_config_pdu
.
start_symbol_index
=
start_symbol
;
ul_config
.
ul_config_list
[
0
].
pusch_config_pdu
.
ul_dmrs_symb_pos
=
l_prime_mask
;
ul_config
.
ul_config_list
[
0
].
pusch_config_pdu
.
dmrs_config_type
=
dmrs_config_type
;
ul_config
.
ul_config_list
[
0
].
pusch_config_pdu
.
mcs_index
=
Imcs
;
ul_config
.
ul_config_list
[
0
].
pusch_config_pdu
.
mcs_table
=
mcs_table
;
ul_config
.
ul_config_list
[
0
].
pusch_config_pdu
.
num_dmrs_cdm_grps_no_data
=
num_dmrs_cdm_grps_no_data
;
ul_config
.
ul_config_list
[
0
].
pusch_config_pdu
.
nrOfLayers
=
precod_nbr_layers
;
ul_config
.
ul_config_list
[
0
].
pusch_config_pdu
.
dmrs_ports
=
((
1
<<
precod_nbr_layers
)
-
1
);
ul_config
.
ul_config_list
[
0
].
pusch_config_pdu
.
absolute_delta_PUSCH
=
0
;
ul_config
.
ul_config_list
[
0
].
pusch_config_pdu
.
target_code_rate
=
code_rate
;
ul_config
.
ul_config_list
[
0
].
pusch_config_pdu
.
tbslbrm
=
tbslbrm
;
ul_config
.
ul_config_list
[
0
].
pusch_config_pdu
.
pusch_data
.
tb_size
=
TBS
/
8
;
ul_config
.
ul_config_list
[
0
].
pusch_config_pdu
.
pusch_data
.
new_data_indicator
=
trial
&
0x1
;
ul_config
.
ul_config_list
[
0
].
pusch_config_pdu
.
pusch_data
.
rv_index
=
rv_index
;
ul_config
.
ul_config_list
[
0
].
pusch_config_pdu
.
pusch_data
.
harq_process_id
=
harq_pid
;
ul_config
.
ul_config_list
[
0
].
pusch_config_pdu
.
pusch_ptrs
.
ptrs_time_density
=
ptrs_time_density
;
ul_config
.
ul_config_list
[
0
].
pusch_config_pdu
.
pusch_ptrs
.
ptrs_freq_density
=
ptrs_freq_density
;
ul_config
.
ul_config_list
[
0
].
pusch_config_pdu
.
pusch_ptrs
.
ptrs_ports_list
=
(
nfapi_nr_ue_ptrs_ports_t
*
)
malloc
(
2
*
sizeof
(
nfapi_nr_ue_ptrs_ports_t
));
ul_config
.
ul_config_list
[
0
].
pusch_config_pdu
.
pusch_ptrs
.
ptrs_ports_list
[
0
].
ptrs_re_offset
=
0
;
ul_config
.
ul_config_list
[
0
].
pusch_config_pdu
.
transform_precoding
=
transform_precoding
;
// if transform precoding is enabled
if
(
transform_precoding
==
transformPrecoder_enabled
)
{
ul_config
.
ul_config_list
[
0
].
pusch_config_pdu
.
dfts_ofdm
.
low_papr_group_number
=
*
scc
->
physCellId
%
30
;
// U as defined in 38.211 section 6.4.1.1.1.2
ul_config
.
ul_config_list
[
0
].
pusch_config_pdu
.
dfts_ofdm
.
low_papr_sequence_number
=
0
;
// V as defined in 38.211 section 6.4.1.1.1.2
// ul_config.ul_config_list[0].pusch_config_pdu.pdu_bit_map |= PUSCH_PDU_BITMAP_DFTS_OFDM;
ul_config
.
ul_config_list
[
0
].
pusch_config_pdu
.
num_dmrs_cdm_grps_no_data
=
num_dmrs_cdm_grps_no_data
;
}
}
//nr_fill_ulsch(gNB,frame,slot,pusch_pdu); // Not needed as its its already filled as apart of "nr_schedule_response(Sched_INFO);"
for
(
int
i
=
0
;
i
<
(
TBS
/
8
);
i
++
)
ulsch_ue
->
harq_processes
[
harq_pid
]
->
a
[
i
]
=
i
&
0xff
;
if
(
input_fd
==
NULL
)
{
// set FAPI parameters for UE, put them in the scheduled response and call
nr_ue_scheduled_response
(
&
scheduled_response
);
/////////////////////////phy_procedures_nr_ue_TX///////////////////////
///////////
phy_procedures_nrUE_TX
(
UE
,
&
UE_proc
,
gNB_id
);
/* We need to call common sending function to send signal */
LOG_D
(
PHY
,
"Sending Uplink data
\n
"
);
nr_ue_pusch_common_procedures
(
UE
,
slot
,
&
UE
->
frame_parms
,
UE
->
frame_parms
.
nb_antennas_tx
);
if
(
n_trials
==
1
)
{
LOG_M
(
"txsig0.m"
,
"txs0"
,
&
UE
->
common_vars
.
txdata
[
0
][
slot_offset
],
slot_length
,
1
,
1
);
LOG_M
(
"txsig0F.m"
,
"txs0F"
,
UE
->
common_vars
.
txdataF
[
0
],
frame_parms
->
ofdm_symbol_size
*
14
,
1
,
1
);
if
(
precod_nbr_layers
>
1
)
{
LOG_M
(
"txsig1.m"
,
"txs1"
,
&
UE
->
common_vars
.
txdata
[
1
][
slot_offset
],
slot_length
,
1
,
1
);
LOG_M
(
"txsig1F.m"
,
"txs1F"
,
UE
->
common_vars
.
txdataF
[
1
],
frame_parms
->
ofdm_symbol_size
*
14
,
1
,
1
);
if
(
precod_nbr_layers
==
4
)
{
LOG_M
(
"txsig2.m"
,
"txs2"
,
&
UE
->
common_vars
.
txdata
[
2
][
slot_offset
],
slot_length
,
1
,
1
);
LOG_M
(
"txsig3.m"
,
"txs3"
,
&
UE
->
common_vars
.
txdata
[
3
][
slot_offset
],
slot_length
,
1
,
1
);
LOG_M
(
"txsig2F.m"
,
"txs2F"
,
UE
->
common_vars
.
txdataF
[
2
],
frame_parms
->
ofdm_symbol_size
*
14
,
1
,
1
);
LOG_M
(
"txsig3F.m"
,
"txs3F"
,
UE
->
common_vars
.
txdataF
[
3
],
frame_parms
->
ofdm_symbol_size
*
14
,
1
,
1
);
// nr_fill_ulsch(gNB,frame,slot,pusch_pdu); // Not needed as its its already filled as apart of "nr_schedule_response(Sched_INFO);"
for
(
int
i
=
0
;
i
<
(
TBS
/
8
);
i
++
)
ulsch_ue
->
harq_processes
[
harq_pid
]
->
a
[
i
]
=
i
&
0xff
;
if
(
input_fd
==
NULL
)
{
// set FAPI parameters for UE, put them in the scheduled response and call
nr_ue_scheduled_response
(
&
scheduled_response
);
/////////////////////////phy_procedures_nr_ue_TX///////////////////////
///////////
phy_procedures_nrUE_TX
(
UE
,
&
UE_proc
,
gNB_id
);
/* We need to call common sending function to send signal */
LOG_D
(
PHY
,
"Sending Uplink data
\n
"
);
nr_ue_pusch_common_procedures
(
UE
,
slot
,
&
UE
->
frame_parms
,
UE
->
frame_parms
.
nb_antennas_tx
);
if
(
n_trials
==
1
)
{
LOG_M
(
"txsig0.m"
,
"txs0"
,
&
UE
->
common_vars
.
txdata
[
0
][
slot_offset
],
slot_length
,
1
,
1
);
LOG_M
(
"txsig0F.m"
,
"txs0F"
,
UE
->
common_vars
.
txdataF
[
0
],
frame_parms
->
ofdm_symbol_size
*
14
,
1
,
1
);
if
(
precod_nbr_layers
>
1
)
{
LOG_M
(
"txsig1.m"
,
"txs1"
,
&
UE
->
common_vars
.
txdata
[
1
][
slot_offset
],
slot_length
,
1
,
1
);
LOG_M
(
"txsig1F.m"
,
"txs1F"
,
UE
->
common_vars
.
txdataF
[
1
],
frame_parms
->
ofdm_symbol_size
*
14
,
1
,
1
);
if
(
precod_nbr_layers
==
4
)
{
LOG_M
(
"txsig2.m"
,
"txs2"
,
&
UE
->
common_vars
.
txdata
[
2
][
slot_offset
],
slot_length
,
1
,
1
);
LOG_M
(
"txsig3.m"
,
"txs3"
,
&
UE
->
common_vars
.
txdata
[
3
][
slot_offset
],
slot_length
,
1
,
1
);
LOG_M
(
"txsig2F.m"
,
"txs2F"
,
UE
->
common_vars
.
txdataF
[
2
],
frame_parms
->
ofdm_symbol_size
*
14
,
1
,
1
);
LOG_M
(
"txsig3F.m"
,
"txs3F"
,
UE
->
common_vars
.
txdataF
[
3
],
frame_parms
->
ofdm_symbol_size
*
14
,
1
,
1
);
}
}
}
}
///////////
////////////////////////////////////////////////////
tx_offset
=
frame_parms
->
get_samples_slot_timestamp
(
slot
,
frame_parms
,
0
)
;
txlev_sum
=
0
;
for
(
int
aa
=
0
;
aa
<
UE
->
frame_parms
.
nb_antennas_tx
;
aa
++
)
{
atxlev
[
aa
]
=
signal_energy
(
&
UE
->
common_vars
.
txdata
[
aa
][
tx_offset
+
5
*
frame_parms
->
ofdm_symbol_size
+
4
*
frame_parms
->
nb_prefix_samples
+
frame_parms
->
nb_prefix_samples0
],
frame_parms
->
ofdm_symbol_size
+
frame_parms
->
nb_prefix_samples
);
txlev_sum
+=
atxlev
[
aa
];
if
(
n_trials
==
1
)
printf
(
"txlev[%d] = %d (%f dB) txlev_sum %d
\n
"
,
aa
,
atxlev
[
aa
],
10
*
log10
((
double
)
atxlev
[
aa
]),
txlev_sum
);
}
}
else
n_trials
=
1
;
if
(
input_fd
==
NULL
)
{
// Justification of division by precod_nbr_layers:
// When the channel is the identity matrix, the results in terms of SNR should be almost equal for 2x2 and 4x4.
sigma_dB
=
10
*
log10
((
double
)
txlev_sum
/
precod_nbr_layers
*
((
double
)
frame_parms
->
ofdm_symbol_size
/
(
12
*
nb_rb
)))
-
SNR
;
;
sigma
=
pow
(
10
,
sigma_dB
/
10
);
if
(
n_trials
==
1
)
printf
(
"sigma %f (%f dB), txlev_sum %f (factor %f)
\n
"
,
sigma
,
sigma_dB
,
10
*
log10
((
double
)
txlev_sum
),(
double
)(
double
)
frame_parms
->
ofdm_symbol_size
/
(
12
*
nb_rb
));
for
(
i
=
0
;
i
<
slot_length
;
i
++
)
{
for
(
int
aa
=
0
;
aa
<
UE
->
frame_parms
.
nb_antennas_tx
;
aa
++
)
{
s_re
[
aa
][
i
]
=
((
double
)(((
short
*
)
&
UE
->
common_vars
.
txdata
[
aa
][
slot_offset
]))[(
i
<<
1
)
]);
s_im
[
aa
][
i
]
=
((
double
)(((
short
*
)
&
UE
->
common_vars
.
txdata
[
aa
][
slot_offset
]))[(
i
<<
1
)
+
1
]);
///////////
/////////////////////////////////////////
///////////
tx_offset
=
frame_parms
->
get_samples_slot_timestamp
(
slot
,
frame_parms
,
0
);
txlev_sum
=
0
;
for
(
int
aa
=
0
;
aa
<
UE
->
frame_parms
.
nb_antennas_tx
;
aa
++
)
{
atxlev
[
aa
]
=
signal_energy
(
&
UE
->
common_vars
.
txdata
[
aa
][
tx_offset
+
5
*
frame_parms
->
ofdm_symbol_size
+
4
*
frame_parms
->
nb_prefix_samples
+
frame_parms
->
nb_prefix_samples0
],
frame_parms
->
ofdm_symbol_size
+
frame_parms
->
nb_prefix_samples
);
txlev_sum
+=
atxlev
[
aa
];
if
(
n_trials
==
1
)
printf
(
"txlev[%d] = %d (%f dB) txlev_sum %d
\n
"
,
aa
,
atxlev
[
aa
],
10
*
log10
((
double
)
atxlev
[
aa
]),
txlev_sum
);
}
}
else
n_trials
=
1
;
if
(
input_fd
==
NULL
)
{
// Justification of division by precod_nbr_layers:
// When the channel is the identity matrix, the results in terms of SNR should be almost equal for 2x2 and 4x4.
sigma_dB
=
10
*
log10
((
double
)
txlev_sum
/
precod_nbr_layers
*
((
double
)
frame_parms
->
ofdm_symbol_size
/
(
12
*
nb_rb
)))
-
SNR
;
;
sigma
=
pow
(
10
,
sigma_dB
/
10
);
if
(
n_trials
==
1
)
printf
(
"sigma %f (%f dB), txlev_sum %f (factor %f)
\n
"
,
sigma
,
sigma_dB
,
10
*
log10
((
double
)
txlev_sum
),
(
double
)(
double
)
frame_parms
->
ofdm_symbol_size
/
(
12
*
nb_rb
));
for
(
i
=
0
;
i
<
slot_length
;
i
++
)
{
for
(
int
aa
=
0
;
aa
<
UE
->
frame_parms
.
nb_antennas_tx
;
aa
++
)
{
s_re
[
aa
][
i
]
=
((
double
)(((
short
*
)
&
UE
->
common_vars
.
txdata
[
aa
][
slot_offset
]))[(
i
<<
1
)]);
s_im
[
aa
][
i
]
=
((
double
)(((
short
*
)
&
UE
->
common_vars
.
txdata
[
aa
][
slot_offset
]))[(
i
<<
1
)
+
1
]);
}
}
}
if
(
UE2gNB
->
max_Doppler
==
0
)
{
multipath_channel
(
UE2gNB
,
s_re
,
s_im
,
r_re
,
r_im
,
slot_length
,
0
,
(
n_trials
==
1
)
?
1
:
0
);
}
else
{
multipath_tv_channel
(
UE2gNB
,
s_re
,
s_im
,
r_re
,
r_im
,
2
*
slot_length
,
0
);
}
add_noise
(
rxdata
,
(
const
double
**
)
r_re
,
(
const
double
**
)
r_im
,
sigma
,
slot_length
,
slot_offset
,
ts
,
delay
,
pdu_bit_map
,
frame_parms
->
nb_antennas_rx
);
if
(
UE2gNB
->
max_Doppler
==
0
)
{
multipath_channel
(
UE2gNB
,
s_re
,
s_im
,
r_re
,
r_im
,
slot_length
,
0
,
(
n_trials
==
1
)
?
1
:
0
);
}
else
{
multipath_tv_channel
(
UE2gNB
,
s_re
,
s_im
,
r_re
,
r_im
,
2
*
slot_length
,
0
);
}
add_noise
(
rxdata
,
(
const
double
**
)
r_re
,
(
const
double
**
)
r_im
,
sigma
,
slot_length
,
slot_offset
,
ts
,
delay
,
pdu_bit_map
,
frame_parms
->
nb_antennas_rx
);
}
/*End input_fd */
}
/*End input_fd */
if
(
pusch_pdu
->
pdu_bit_map
&
PUSCH_PDU_BITMAP_PUSCH_PTRS
)
{
set_ptrs_symb_idx
(
&
ptrsSymPos
,
pusch_pdu
->
nr_of_symbols
,
pusch_pdu
->
start_symbol_index
,
1
<<
ptrs_time_density
,
pusch_pdu
->
ul_dmrs_symb_pos
);
ptrsSymbPerSlot
=
get_ptrs_symbols_in_slot
(
ptrsSymPos
,
pusch_pdu
->
start_symbol_index
,
pusch_pdu
->
nr_of_symbols
);
ptrsRePerSymb
=
((
pusch_pdu
->
rb_size
+
ptrs_freq_density
-
1
)
/
ptrs_freq_density
);
LOG_D
(
PHY
,
"[ULSIM] PTRS Symbols in a slot: %2u, RE per Symbol: %3u, RE in a slot %4d
\n
"
,
ptrsSymbPerSlot
,
ptrsRePerSymb
,
ptrsSymbPerSlot
*
ptrsRePerSymb
);
}
if
(
pusch_pdu
->
pdu_bit_map
&
PUSCH_PDU_BITMAP_PUSCH_PTRS
)
{
set_ptrs_symb_idx
(
&
ptrsSymPos
,
pusch_pdu
->
nr_of_symbols
,
pusch_pdu
->
start_symbol_index
,
1
<<
ptrs_time_density
,
pusch_pdu
->
ul_dmrs_symb_pos
);
ptrsSymbPerSlot
=
get_ptrs_symbols_in_slot
(
ptrsSymPos
,
pusch_pdu
->
start_symbol_index
,
pusch_pdu
->
nr_of_symbols
);
ptrsRePerSymb
=
((
pusch_pdu
->
rb_size
+
ptrs_freq_density
-
1
)
/
ptrs_freq_density
);
LOG_D
(
PHY
,
"[ULSIM] PTRS Symbols in a slot: %2u, RE per Symbol: %3u, RE in a slot %4d
\n
"
,
ptrsSymbPerSlot
,
ptrsRePerSymb
,
ptrsSymbPerSlot
*
ptrsRePerSymb
);
}
////////////////////////////////////////////////////////////
//----------------------------------------------------------
//------------------- gNB phy procedures -------------------
//----------------------------------------------------------
gNB
->
UL_INFO
.
rx_ind
.
number_of_pdus
=
0
;
gNB
->
UL_INFO
.
crc_ind
.
number_crcs
=
0
;
//----------------------------------------------------------
//------------------- gNB phy procedures -------------------
//----------------------------------------------------------
gNB
->
UL_INFO
.
rx_ind
.
number_of_pdus
=
0
;
gNB
->
UL_INFO
.
crc_ind
.
number_crcs
=
0
;
for
(
uint8_t
symbol
=
0
;
symbol
<
(
gNB
->
frame_parms
.
Ncp
==
EXTENDED
?
12
:
14
);
symbol
++
)
{
for
(
int
aa
=
0
;
aa
<
gNB
->
frame_parms
.
nb_antennas_rx
;
aa
++
)
...
...
@@ -1359,209 +1333,252 @@ int main(int argc, char **argv)
gNB
->
frame_parms
.
Ncp
==
EXTENDED
?
12
:
14
);
}
ul_proc_error
=
phy_procedures_gNB_uespec_RX
(
gNB
,
frame
,
slot
);
if
(
n_trials
==
1
&&
round
==
0
)
{
LOG_M
(
"rxsig0.m"
,
"rx0"
,
&
rxdata
[
0
][
slot_offset
],
slot_length
,
1
,
1
);
LOG_M
(
"rxsigF0.m"
,
"rxsF0"
,
gNB
->
common_vars
.
rxdataF
[
0
],
14
*
frame_parms
->
ofdm_symbol_size
,
1
,
1
);
if
(
precod_nbr_layers
>
1
)
{
LOG_M
(
"rxsig1.m"
,
"rx1"
,
&
rxdata
[
1
][
slot_offset
],
slot_length
,
1
,
1
);
LOG_M
(
"rxsigF1.m"
,
"rxsF1"
,
gNB
->
common_vars
.
rxdataF
[
1
],
14
*
frame_parms
->
ofdm_symbol_size
,
1
,
1
);
if
(
precod_nbr_layers
==
4
)
{
LOG_M
(
"rxsig2.m"
,
"rx2"
,
&
rxdata
[
2
][
slot_offset
],
slot_length
,
1
,
1
);
LOG_M
(
"rxsig3.m"
,
"rx3"
,
&
rxdata
[
3
][
slot_offset
],
slot_length
,
1
,
1
);
LOG_M
(
"rxsigF2.m"
,
"rxsF2"
,
gNB
->
common_vars
.
rxdataF
[
2
],
14
*
frame_parms
->
ofdm_symbol_size
,
1
,
1
);
LOG_M
(
"rxsigF3.m"
,
"rxsF3"
,
gNB
->
common_vars
.
rxdataF
[
3
],
14
*
frame_parms
->
ofdm_symbol_size
,
1
,
1
);
}
}
}
if
(
n_trials
==
1
&&
round
==
0
)
{
__attribute__
((
unused
))
int
off
=
((
nb_rb
&
1
)
==
1
)
?
4
:
0
;
LOG_M
(
"rxsigF0_ext.m"
,
"rxsF0_ext"
,
&
gNB
->
pusch_vars
[
0
]
->
rxdataF_ext
[
0
][
start_symbol
*
NR_NB_SC_PER_RB
*
pusch_pdu
->
rb_size
],
nb_symb_sch
*
(
off
+
(
NR_NB_SC_PER_RB
*
pusch_pdu
->
rb_size
)),
1
,
1
);
LOG_M
(
"chestF0.m"
,
"chF0"
,
&
gNB
->
pusch_vars
[
0
]
->
ul_ch_estimates
[
0
][
start_symbol
*
frame_parms
->
ofdm_symbol_size
],
frame_parms
->
ofdm_symbol_size
,
1
,
1
);
LOG_M
(
"chestT0.m"
,
"chT0"
,
&
gNB
->
pusch_vars
[
0
]
->
ul_ch_estimates_time
[
0
][
0
],
frame_parms
->
ofdm_symbol_size
,
1
,
1
);
LOG_M
(
"chestF0_ext.m"
,
"chF0_ext"
,
&
gNB
->
pusch_vars
[
0
]
->
ul_ch_estimates_ext
[
0
][(
start_symbol
+
1
)
*
(
off
+
(
NR_NB_SC_PER_RB
*
pusch_pdu
->
rb_size
))],
(
nb_symb_sch
-
1
)
*
(
off
+
(
NR_NB_SC_PER_RB
*
pusch_pdu
->
rb_size
)),
1
,
1
);
LOG_M
(
"rxsigF0_comp.m"
,
"rxsF0_comp"
,
&
gNB
->
pusch_vars
[
0
]
->
rxdataF_comp
[
0
][
start_symbol
*
(
off
+
(
NR_NB_SC_PER_RB
*
pusch_pdu
->
rb_size
))],
nb_symb_sch
*
(
off
+
(
NR_NB_SC_PER_RB
*
pusch_pdu
->
rb_size
)),
1
,
1
);
LOG_M
(
"chmagF0.m"
,
"chmF0"
,
&
gNB
->
pusch_vars
[
0
]
->
ul_ch_mag
[
0
][
start_symbol
*
(
off
+
(
NR_NB_SC_PER_RB
*
pusch_pdu
->
rb_size
))],
nb_symb_sch
*
(
off
+
(
NR_NB_SC_PER_RB
*
pusch_pdu
->
rb_size
)),
1
,
1
);
LOG_M
(
"chmagbF0.m"
,
"chmbF0"
,
&
gNB
->
pusch_vars
[
0
]
->
ul_ch_magb
[
0
][
start_symbol
*
(
off
+
(
NR_NB_SC_PER_RB
*
pusch_pdu
->
rb_size
))],
nb_symb_sch
*
(
off
+
(
NR_NB_SC_PER_RB
*
pusch_pdu
->
rb_size
)),
1
,
1
);
LOG_M
(
"rxsigF0_llrlayers0.m"
,
"rxsF0_llrlayers0"
,
&
gNB
->
pusch_vars
[
0
]
->
llr_layers
[
0
][
0
],(
nb_symb_sch
-
1
)
*
NR_NB_SC_PER_RB
*
pusch_pdu
->
rb_size
*
mod_order
,
1
,
0
);
if
(
precod_nbr_layers
==
2
)
{
LOG_M
(
"rxsigF1_ext.m"
,
"rxsF1_ext"
,
&
gNB
->
pusch_vars
[
0
]
->
rxdataF_ext
[
1
][
start_symbol
*
NR_NB_SC_PER_RB
*
pusch_pdu
->
rb_size
],
nb_symb_sch
*
(
off
+
(
NR_NB_SC_PER_RB
*
pusch_pdu
->
rb_size
)),
1
,
1
);
LOG_M
(
"chestF3.m"
,
"chF3"
,
&
gNB
->
pusch_vars
[
0
]
->
ul_ch_estimates
[
3
][
start_symbol
*
frame_parms
->
ofdm_symbol_size
],
frame_parms
->
ofdm_symbol_size
,
1
,
1
);
LOG_M
(
"chestF3_ext.m"
,
"chF3_ext"
,
&
gNB
->
pusch_vars
[
0
]
->
ul_ch_estimates_ext
[
3
][(
start_symbol
+
1
)
*
(
off
+
(
NR_NB_SC_PER_RB
*
pusch_pdu
->
rb_size
))],
(
nb_symb_sch
-
1
)
*
(
off
+
(
NR_NB_SC_PER_RB
*
pusch_pdu
->
rb_size
)),
1
,
1
);
LOG_M
(
"rxsigF2_comp.m"
,
"rxsF2_comp"
,
&
gNB
->
pusch_vars
[
0
]
->
rxdataF_comp
[
2
][
start_symbol
*
(
off
+
(
NR_NB_SC_PER_RB
*
pusch_pdu
->
rb_size
))],
nb_symb_sch
*
(
off
+
(
NR_NB_SC_PER_RB
*
pusch_pdu
->
rb_size
)),
1
,
1
);
LOG_M
(
"rxsigF0_llrlayers1.m"
,
"rxsF0_llrlayers1"
,
&
gNB
->
pusch_vars
[
0
]
->
llr_layers
[
1
][
0
],(
nb_symb_sch
-
1
)
*
NR_NB_SC_PER_RB
*
pusch_pdu
->
rb_size
*
mod_order
,
1
,
0
);
ul_proc_error
=
phy_procedures_gNB_uespec_RX
(
gNB
,
frame
,
slot
);
if
(
n_trials
==
1
&&
round
==
0
)
{
LOG_M
(
"rxsig0.m"
,
"rx0"
,
&
rxdata
[
0
][
slot_offset
],
slot_length
,
1
,
1
);
LOG_M
(
"rxsigF0.m"
,
"rxsF0"
,
gNB
->
common_vars
.
rxdataF
[
0
],
14
*
frame_parms
->
ofdm_symbol_size
,
1
,
1
);
if
(
precod_nbr_layers
>
1
)
{
LOG_M
(
"rxsig1.m"
,
"rx1"
,
&
rxdata
[
1
][
slot_offset
],
slot_length
,
1
,
1
);
LOG_M
(
"rxsigF1.m"
,
"rxsF1"
,
gNB
->
common_vars
.
rxdataF
[
1
],
14
*
frame_parms
->
ofdm_symbol_size
,
1
,
1
);
if
(
precod_nbr_layers
==
4
)
{
LOG_M
(
"rxsig2.m"
,
"rx2"
,
&
rxdata
[
2
][
slot_offset
],
slot_length
,
1
,
1
);
LOG_M
(
"rxsig3.m"
,
"rx3"
,
&
rxdata
[
3
][
slot_offset
],
slot_length
,
1
,
1
);
LOG_M
(
"rxsigF2.m"
,
"rxsF2"
,
gNB
->
common_vars
.
rxdataF
[
2
],
14
*
frame_parms
->
ofdm_symbol_size
,
1
,
1
);
LOG_M
(
"rxsigF3.m"
,
"rxsF3"
,
gNB
->
common_vars
.
rxdataF
[
3
],
14
*
frame_parms
->
ofdm_symbol_size
,
1
,
1
);
}
}
}
if
(
precod_nbr_layers
==
4
)
{
LOG_M
(
"rxsigF1_ext.m"
,
"rxsF1_ext"
,
&
gNB
->
pusch_vars
[
0
]
->
rxdataF_ext
[
1
][
start_symbol
*
NR_NB_SC_PER_RB
*
pusch_pdu
->
rb_size
],
nb_symb_sch
*
(
off
+
(
NR_NB_SC_PER_RB
*
pusch_pdu
->
rb_size
)),
1
,
1
);
LOG_M
(
"rxsigF2_ext.m"
,
"rxsF2_ext"
,
&
gNB
->
pusch_vars
[
0
]
->
rxdataF_ext
[
2
][
start_symbol
*
NR_NB_SC_PER_RB
*
pusch_pdu
->
rb_size
],
nb_symb_sch
*
(
off
+
(
NR_NB_SC_PER_RB
*
pusch_pdu
->
rb_size
)),
1
,
1
);
LOG_M
(
"rxsigF3_ext.m"
,
"rxsF3_ext"
,
&
gNB
->
pusch_vars
[
0
]
->
rxdataF_ext
[
3
][
start_symbol
*
NR_NB_SC_PER_RB
*
pusch_pdu
->
rb_size
],
nb_symb_sch
*
(
off
+
(
NR_NB_SC_PER_RB
*
pusch_pdu
->
rb_size
)),
1
,
1
);
LOG_M
(
"chestF5.m"
,
"chF5"
,
&
gNB
->
pusch_vars
[
0
]
->
ul_ch_estimates
[
5
][
start_symbol
*
frame_parms
->
ofdm_symbol_size
],
frame_parms
->
ofdm_symbol_size
,
1
,
1
);
LOG_M
(
"chestF10.m"
,
"chF10"
,
&
gNB
->
pusch_vars
[
0
]
->
ul_ch_estimates
[
10
][
start_symbol
*
frame_parms
->
ofdm_symbol_size
],
frame_parms
->
ofdm_symbol_size
,
1
,
1
);
LOG_M
(
"chestF15.m"
,
"chF15"
,
&
gNB
->
pusch_vars
[
0
]
->
ul_ch_estimates
[
15
][
start_symbol
*
frame_parms
->
ofdm_symbol_size
],
frame_parms
->
ofdm_symbol_size
,
1
,
1
);
LOG_M
(
"chestF5_ext.m"
,
"chF5_ext"
,
&
gNB
->
pusch_vars
[
0
]
->
ul_ch_estimates_ext
[
5
][(
start_symbol
+
1
)
*
(
off
+
(
NR_NB_SC_PER_RB
*
pusch_pdu
->
rb_size
))],
(
nb_symb_sch
-
1
)
*
(
off
+
(
NR_NB_SC_PER_RB
*
pusch_pdu
->
rb_size
)),
1
,
1
);
LOG_M
(
"chestF10_ext.m"
,
"chF10_ext"
,
&
gNB
->
pusch_vars
[
0
]
->
ul_ch_estimates_ext
[
10
][(
start_symbol
+
1
)
*
(
off
+
(
NR_NB_SC_PER_RB
*
pusch_pdu
->
rb_size
))],
(
nb_symb_sch
-
1
)
*
(
off
+
(
NR_NB_SC_PER_RB
*
pusch_pdu
->
rb_size
)),
1
,
1
);
LOG_M
(
"chestF15_ext.m"
,
"chF15_ext"
,
&
gNB
->
pusch_vars
[
0
]
->
ul_ch_estimates_ext
[
15
][(
start_symbol
+
1
)
*
(
off
+
(
NR_NB_SC_PER_RB
*
pusch_pdu
->
rb_size
))],
(
nb_symb_sch
-
1
)
*
(
off
+
(
NR_NB_SC_PER_RB
*
pusch_pdu
->
rb_size
)),
1
,
1
);
LOG_M
(
"rxsigF4_comp.m"
,
"rxsF4_comp"
,
&
gNB
->
pusch_vars
[
0
]
->
rxdataF_comp
[
4
][
start_symbol
*
(
off
+
(
NR_NB_SC_PER_RB
*
pusch_pdu
->
rb_size
))],
nb_symb_sch
*
(
off
+
(
NR_NB_SC_PER_RB
*
pusch_pdu
->
rb_size
)),
1
,
1
);
LOG_M
(
"rxsigF8_comp.m"
,
"rxsF8_comp"
,
&
gNB
->
pusch_vars
[
0
]
->
rxdataF_comp
[
8
][
start_symbol
*
(
off
+
(
NR_NB_SC_PER_RB
*
pusch_pdu
->
rb_size
))],
nb_symb_sch
*
(
off
+
(
NR_NB_SC_PER_RB
*
pusch_pdu
->
rb_size
)),
1
,
1
);
LOG_M
(
"rxsigF12_comp.m"
,
"rxsF12_comp"
,
&
gNB
->
pusch_vars
[
0
]
->
rxdataF_comp
[
12
][
start_symbol
*
(
off
+
(
NR_NB_SC_PER_RB
*
pusch_pdu
->
rb_size
))],
nb_symb_sch
*
(
off
+
(
NR_NB_SC_PER_RB
*
pusch_pdu
->
rb_size
)),
1
,
1
);
LOG_M
(
"rxsigF0_llrlayers1.m"
,
"rxsF0_llrlayers1"
,
&
gNB
->
pusch_vars
[
0
]
->
llr_layers
[
1
][
0
],(
nb_symb_sch
-
1
)
*
NR_NB_SC_PER_RB
*
pusch_pdu
->
rb_size
*
mod_order
,
1
,
0
);
LOG_M
(
"rxsigF0_llrlayers2.m"
,
"rxsF0_llrlayers2"
,
&
gNB
->
pusch_vars
[
0
]
->
llr_layers
[
2
][
0
],(
nb_symb_sch
-
1
)
*
NR_NB_SC_PER_RB
*
pusch_pdu
->
rb_size
*
mod_order
,
1
,
0
);
LOG_M
(
"rxsigF0_llrlayers3.m"
,
"rxsF0_llrlayers3"
,
&
gNB
->
pusch_vars
[
0
]
->
llr_layers
[
3
][
0
],(
nb_symb_sch
-
1
)
*
NR_NB_SC_PER_RB
*
pusch_pdu
->
rb_size
*
mod_order
,
1
,
0
);
}
if
(
n_trials
==
1
&&
round
==
0
)
{
__attribute__
((
unused
))
int
off
=
((
nb_rb
&
1
)
==
1
)
?
4
:
0
;
LOG_M
(
"rxsigF0_ext.m"
,
"rxsF0_ext"
,
&
gNB
->
pusch_vars
[
0
]
->
rxdataF_ext
[
0
][
start_symbol
*
NR_NB_SC_PER_RB
*
pusch_pdu
->
rb_size
],
nb_symb_sch
*
(
off
+
(
NR_NB_SC_PER_RB
*
pusch_pdu
->
rb_size
)),
1
,
1
);
LOG_M
(
"chestF0.m"
,
"chF0"
,
&
gNB
->
pusch_vars
[
0
]
->
ul_ch_estimates
[
0
][
start_symbol
*
frame_parms
->
ofdm_symbol_size
],
frame_parms
->
ofdm_symbol_size
,
1
,
1
);
LOG_M
(
"chestT0.m"
,
"chT0"
,
&
gNB
->
pusch_vars
[
0
]
->
ul_ch_estimates_time
[
0
][
0
],
frame_parms
->
ofdm_symbol_size
,
1
,
1
);
LOG_M
(
"chestF0_ext.m"
,
"chF0_ext"
,
&
gNB
->
pusch_vars
[
0
]
->
ul_ch_estimates_ext
[
0
][(
start_symbol
+
1
)
*
(
off
+
(
NR_NB_SC_PER_RB
*
pusch_pdu
->
rb_size
))],
(
nb_symb_sch
-
1
)
*
(
off
+
(
NR_NB_SC_PER_RB
*
pusch_pdu
->
rb_size
)),
1
,
1
);
LOG_M
(
"rxsigF0_comp.m"
,
"rxsF0_comp"
,
&
gNB
->
pusch_vars
[
0
]
->
rxdataF_comp
[
0
][
start_symbol
*
(
off
+
(
NR_NB_SC_PER_RB
*
pusch_pdu
->
rb_size
))],
nb_symb_sch
*
(
off
+
(
NR_NB_SC_PER_RB
*
pusch_pdu
->
rb_size
)),
1
,
1
);
LOG_M
(
"chmagF0.m"
,
"chmF0"
,
&
gNB
->
pusch_vars
[
0
]
->
ul_ch_mag
[
0
][
start_symbol
*
(
off
+
(
NR_NB_SC_PER_RB
*
pusch_pdu
->
rb_size
))],
nb_symb_sch
*
(
off
+
(
NR_NB_SC_PER_RB
*
pusch_pdu
->
rb_size
)),
1
,
1
);
LOG_M
(
"chmagbF0.m"
,
"chmbF0"
,
&
gNB
->
pusch_vars
[
0
]
->
ul_ch_magb
[
0
][
start_symbol
*
(
off
+
(
NR_NB_SC_PER_RB
*
pusch_pdu
->
rb_size
))],
nb_symb_sch
*
(
off
+
(
NR_NB_SC_PER_RB
*
pusch_pdu
->
rb_size
)),
1
,
1
);
LOG_M
(
"rxsigF0_llrlayers0.m"
,
"rxsF0_llrlayers0"
,
&
gNB
->
pusch_vars
[
0
]
->
llr_layers
[
0
][
0
],
(
nb_symb_sch
-
1
)
*
NR_NB_SC_PER_RB
*
pusch_pdu
->
rb_size
*
mod_order
,
1
,
0
);
if
(
precod_nbr_layers
==
2
)
{
LOG_M
(
"rxsigF1_ext.m"
,
"rxsF1_ext"
,
&
gNB
->
pusch_vars
[
0
]
->
rxdataF_ext
[
1
][
start_symbol
*
NR_NB_SC_PER_RB
*
pusch_pdu
->
rb_size
],
nb_symb_sch
*
(
off
+
(
NR_NB_SC_PER_RB
*
pusch_pdu
->
rb_size
)),
1
,
1
);
LOG_M
(
"chestF3.m"
,
"chF3"
,
&
gNB
->
pusch_vars
[
0
]
->
ul_ch_estimates
[
3
][
start_symbol
*
frame_parms
->
ofdm_symbol_size
],
frame_parms
->
ofdm_symbol_size
,
1
,
1
);
LOG_M
(
"chestF3_ext.m"
,
"chF3_ext"
,
&
gNB
->
pusch_vars
[
0
]
->
ul_ch_estimates_ext
[
3
][(
start_symbol
+
1
)
*
(
off
+
(
NR_NB_SC_PER_RB
*
pusch_pdu
->
rb_size
))],
(
nb_symb_sch
-
1
)
*
(
off
+
(
NR_NB_SC_PER_RB
*
pusch_pdu
->
rb_size
)),
1
,
1
);
LOG_M
(
"rxsigF2_comp.m"
,
"rxsF2_comp"
,
&
gNB
->
pusch_vars
[
0
]
->
rxdataF_comp
[
2
][
start_symbol
*
(
off
+
(
NR_NB_SC_PER_RB
*
pusch_pdu
->
rb_size
))],
nb_symb_sch
*
(
off
+
(
NR_NB_SC_PER_RB
*
pusch_pdu
->
rb_size
)),
1
,
1
);
LOG_M
(
"rxsigF0_llrlayers1.m"
,
"rxsF0_llrlayers1"
,
&
gNB
->
pusch_vars
[
0
]
->
llr_layers
[
1
][
0
],
(
nb_symb_sch
-
1
)
*
NR_NB_SC_PER_RB
*
pusch_pdu
->
rb_size
*
mod_order
,
1
,
0
);
}
LOG_M
(
"rxsigF0_llr.m"
,
"rxsF0_llr"
,
&
gNB
->
pusch_vars
[
0
]
->
llr
[
0
],
precod_nbr_layers
*
(
nb_symb_sch
-
1
)
*
NR_NB_SC_PER_RB
*
pusch_pdu
->
rb_size
*
mod_order
,
1
,
0
);
}
////////////////////////////////////////////////////////////
if
(
precod_nbr_layers
==
4
)
{
LOG_M
(
"rxsigF1_ext.m"
,
"rxsF1_ext"
,
&
gNB
->
pusch_vars
[
0
]
->
rxdataF_ext
[
1
][
start_symbol
*
NR_NB_SC_PER_RB
*
pusch_pdu
->
rb_size
],
nb_symb_sch
*
(
off
+
(
NR_NB_SC_PER_RB
*
pusch_pdu
->
rb_size
)),
1
,
1
);
LOG_M
(
"rxsigF2_ext.m"
,
"rxsF2_ext"
,
&
gNB
->
pusch_vars
[
0
]
->
rxdataF_ext
[
2
][
start_symbol
*
NR_NB_SC_PER_RB
*
pusch_pdu
->
rb_size
],
nb_symb_sch
*
(
off
+
(
NR_NB_SC_PER_RB
*
pusch_pdu
->
rb_size
)),
1
,
1
);
LOG_M
(
"rxsigF3_ext.m"
,
"rxsF3_ext"
,
&
gNB
->
pusch_vars
[
0
]
->
rxdataF_ext
[
3
][
start_symbol
*
NR_NB_SC_PER_RB
*
pusch_pdu
->
rb_size
],
nb_symb_sch
*
(
off
+
(
NR_NB_SC_PER_RB
*
pusch_pdu
->
rb_size
)),
1
,
1
);
LOG_M
(
"chestF5.m"
,
"chF5"
,
&
gNB
->
pusch_vars
[
0
]
->
ul_ch_estimates
[
5
][
start_symbol
*
frame_parms
->
ofdm_symbol_size
],
frame_parms
->
ofdm_symbol_size
,
1
,
1
);
LOG_M
(
"chestF10.m"
,
"chF10"
,
&
gNB
->
pusch_vars
[
0
]
->
ul_ch_estimates
[
10
][
start_symbol
*
frame_parms
->
ofdm_symbol_size
],
frame_parms
->
ofdm_symbol_size
,
1
,
1
);
LOG_M
(
"chestF15.m"
,
"chF15"
,
&
gNB
->
pusch_vars
[
0
]
->
ul_ch_estimates
[
15
][
start_symbol
*
frame_parms
->
ofdm_symbol_size
],
frame_parms
->
ofdm_symbol_size
,
1
,
1
);
LOG_M
(
"chestF5_ext.m"
,
"chF5_ext"
,
&
gNB
->
pusch_vars
[
0
]
->
ul_ch_estimates_ext
[
5
][(
start_symbol
+
1
)
*
(
off
+
(
NR_NB_SC_PER_RB
*
pusch_pdu
->
rb_size
))],
(
nb_symb_sch
-
1
)
*
(
off
+
(
NR_NB_SC_PER_RB
*
pusch_pdu
->
rb_size
)),
1
,
1
);
LOG_M
(
"chestF10_ext.m"
,
"chF10_ext"
,
&
gNB
->
pusch_vars
[
0
]
->
ul_ch_estimates_ext
[
10
][(
start_symbol
+
1
)
*
(
off
+
(
NR_NB_SC_PER_RB
*
pusch_pdu
->
rb_size
))],
(
nb_symb_sch
-
1
)
*
(
off
+
(
NR_NB_SC_PER_RB
*
pusch_pdu
->
rb_size
)),
1
,
1
);
LOG_M
(
"chestF15_ext.m"
,
"chF15_ext"
,
&
gNB
->
pusch_vars
[
0
]
->
ul_ch_estimates_ext
[
15
][(
start_symbol
+
1
)
*
(
off
+
(
NR_NB_SC_PER_RB
*
pusch_pdu
->
rb_size
))],
(
nb_symb_sch
-
1
)
*
(
off
+
(
NR_NB_SC_PER_RB
*
pusch_pdu
->
rb_size
)),
1
,
1
);
LOG_M
(
"rxsigF4_comp.m"
,
"rxsF4_comp"
,
&
gNB
->
pusch_vars
[
0
]
->
rxdataF_comp
[
4
][
start_symbol
*
(
off
+
(
NR_NB_SC_PER_RB
*
pusch_pdu
->
rb_size
))],
nb_symb_sch
*
(
off
+
(
NR_NB_SC_PER_RB
*
pusch_pdu
->
rb_size
)),
1
,
1
);
LOG_M
(
"rxsigF8_comp.m"
,
"rxsF8_comp"
,
&
gNB
->
pusch_vars
[
0
]
->
rxdataF_comp
[
8
][
start_symbol
*
(
off
+
(
NR_NB_SC_PER_RB
*
pusch_pdu
->
rb_size
))],
nb_symb_sch
*
(
off
+
(
NR_NB_SC_PER_RB
*
pusch_pdu
->
rb_size
)),
1
,
1
);
LOG_M
(
"rxsigF12_comp.m"
,
"rxsF12_comp"
,
&
gNB
->
pusch_vars
[
0
]
->
rxdataF_comp
[
12
][
start_symbol
*
(
off
+
(
NR_NB_SC_PER_RB
*
pusch_pdu
->
rb_size
))],
nb_symb_sch
*
(
off
+
(
NR_NB_SC_PER_RB
*
pusch_pdu
->
rb_size
)),
1
,
1
);
LOG_M
(
"rxsigF0_llrlayers1.m"
,
"rxsF0_llrlayers1"
,
&
gNB
->
pusch_vars
[
0
]
->
llr_layers
[
1
][
0
],
(
nb_symb_sch
-
1
)
*
NR_NB_SC_PER_RB
*
pusch_pdu
->
rb_size
*
mod_order
,
1
,
0
);
LOG_M
(
"rxsigF0_llrlayers2.m"
,
"rxsF0_llrlayers2"
,
&
gNB
->
pusch_vars
[
0
]
->
llr_layers
[
2
][
0
],
(
nb_symb_sch
-
1
)
*
NR_NB_SC_PER_RB
*
pusch_pdu
->
rb_size
*
mod_order
,
1
,
0
);
LOG_M
(
"rxsigF0_llrlayers3.m"
,
"rxsF0_llrlayers3"
,
&
gNB
->
pusch_vars
[
0
]
->
llr_layers
[
3
][
0
],
(
nb_symb_sch
-
1
)
*
NR_NB_SC_PER_RB
*
pusch_pdu
->
rb_size
*
mod_order
,
1
,
0
);
}
if
((
gNB
->
ulsch
[
0
]
->
last_iteration_cnt
>=
gNB
->
ulsch
[
0
]
->
max_ldpc_iterations
+
1
)
||
ul_proc_error
==
1
)
{
error_flag
=
1
;
n_errors
[
round
][
snrRun
]
++
;
crc_status
=
1
;
}
else
crc_status
=
0
;
if
(
n_trials
==
1
)
printf
(
"end of round %d rv_index %d
\n
"
,
round
,
rv_index
);
//----------------------------------------------------------
//----------------- count and print errors -----------------
//----------------------------------------------------------
if
((
pusch_pdu
->
pdu_bit_map
&
PUSCH_PDU_BITMAP_PUSCH_PTRS
)
&&
(
SNR
==
snr0
)
&&
(
trial
==
0
)
&&
(
round
==
0
))
{
ptrs_symbols
=
0
;
for
(
int
i
=
pusch_pdu
->
start_symbol_index
;
i
<
pusch_pdu
->
start_symbol_index
+
pusch_pdu
->
nr_of_symbols
;
i
++
)
ptrs_symbols
+=
((
gNB
->
pusch_vars
[
UE_id
]
->
ptrs_symbols
)
>>
i
)
&
1
;
/* 2*5*(50/2), for RB = 50,K = 2 for 5 OFDM PTRS symbols */
available_bits
-=
2
*
ptrs_symbols
*
((
nb_rb
+
ptrs_freq_density
-
1
)
/
ptrs_freq_density
);
printf
(
"[ULSIM][PTRS] Available bits are: %5u, removed PTRS bits are: %5d
\n
"
,
available_bits
,
(
ptrsSymbPerSlot
*
ptrsRePerSymb
*
2
)
);
}
LOG_M
(
"rxsigF0_llr.m"
,
"rxsF0_llr"
,
&
gNB
->
pusch_vars
[
0
]
->
llr
[
0
],
precod_nbr_layers
*
(
nb_symb_sch
-
1
)
*
NR_NB_SC_PER_RB
*
pusch_pdu
->
rb_size
*
mod_order
,
1
,
0
);
}
for
(
i
=
0
;
i
<
available_bits
;
i
++
)
{
if
((
gNB
->
ulsch
[
0
]
->
last_iteration_cnt
>=
gNB
->
ulsch
[
0
]
->
max_ldpc_iterations
+
1
)
||
ul_proc_error
==
1
)
{
error_flag
=
1
;
n_errors
[
round
]
++
;
crc_status
=
1
;
}
else
crc_status
=
0
;
if
(
n_trials
==
1
)
printf
(
"end of round %d rv_index %d
\n
"
,
round
,
rv_index
);
//----------------------------------------------------------
//----------------- count and print errors -----------------
//----------------------------------------------------------
if
((
pusch_pdu
->
pdu_bit_map
&
PUSCH_PDU_BITMAP_PUSCH_PTRS
)
&&
(
SNR
==
snr0
)
&&
(
trial
==
0
)
&&
(
round
==
0
))
{
ptrs_symbols
=
0
;
for
(
int
i
=
pusch_pdu
->
start_symbol_index
;
i
<
pusch_pdu
->
start_symbol_index
+
pusch_pdu
->
nr_of_symbols
;
i
++
)
ptrs_symbols
+=
((
gNB
->
pusch_vars
[
UE_id
]
->
ptrs_symbols
)
>>
i
)
&
1
;
/* 2*5*(50/2), for RB = 50,K = 2 for 5 OFDM PTRS symbols */
available_bits
-=
2
*
ptrs_symbols
*
((
nb_rb
+
ptrs_freq_density
-
1
)
/
ptrs_freq_density
);
printf
(
"[ULSIM][PTRS] Available bits are: %5u, removed PTRS bits are: %5d
\n
"
,
available_bits
,
(
ptrsSymbPerSlot
*
ptrsRePerSymb
*
2
));
}
if
(((
ulsch_ue
->
harq_processes
[
harq_pid
]
->
f
[
i
]
==
0
)
&&
(
gNB
->
pusch_vars
[
UE_id
]
->
llr
[
i
]
<=
0
))
||
((
ulsch_ue
->
harq_processes
[
harq_pid
]
->
f
[
i
]
==
1
)
&&
(
gNB
->
pusch_vars
[
UE_id
]
->
llr
[
i
]
>=
0
)))
{
for
(
i
=
0
;
i
<
available_bits
;
i
++
)
{
if
(((
ulsch_ue
->
harq_processes
[
harq_pid
]
->
f
[
i
]
==
0
)
&&
(
gNB
->
pusch_vars
[
UE_id
]
->
llr
[
i
]
<=
0
))
||
((
ulsch_ue
->
harq_processes
[
harq_pid
]
->
f
[
i
]
==
1
)
&&
(
gNB
->
pusch_vars
[
UE_id
]
->
llr
[
i
]
>=
0
)))
{
/*if(errors_scrambling == 0)
printf("\x1B[34m" "[frame %d][trial %d]\t1st bit in error in unscrambling = %d\n" "\x1B[0m", frame, trial, i);*/
errors_scrambling
[
round
]
++
;
}
}
round
++
;
}
// round
/*if(errors_scrambling == 0)
printf("\x1B[34m" "[frame %d][trial %d]\t1st bit in error in unscrambling = %d\n" "\x1B[0m", frame, trial, i);*/
errors_scrambling
[
round
][
snrRun
]
++
;
if
(
n_trials
==
1
&&
errors_scrambling
[
0
]
>
0
)
{
printf
(
"
\x1B
[31m""[frame %d][trial %d]
\t
number of errors in unscrambling = %u
\n
"
"
\x1B
[0m"
,
frame
,
trial
,
errors_scrambling
[
0
]);
}
}
round
++
;
}
// round
if
(
n_trials
==
1
&&
errors_scrambling
[
0
][
snrRun
]
>
0
)
{
printf
(
"
\x1B
[31m""[frame %d][trial %d]
\t
number of errors in unscrambling = %u
\n
"
"
\x1B
[0m"
,
frame
,
trial
,
errors_scrambling
[
0
][
snrRun
]);
}
for
(
i
=
0
;
i
<
TBS
;
i
++
)
{
for
(
i
=
0
;
i
<
TBS
;
i
++
)
{
estimated_output_bit
[
i
]
=
(
ulsch_gNB
->
harq_processes
[
harq_pid
]
->
b
[
i
/
8
]
&
(
1
<<
(
i
&
7
)))
>>
(
i
&
7
);
test_input_bit
[
i
]
=
(
ulsch_ue
->
harq_processes
[
harq_pid
]
->
b
[
i
/
8
]
&
(
1
<<
(
i
&
7
)))
>>
(
i
&
7
);
estimated_output_bit
[
i
]
=
(
ulsch_gNB
->
harq_processes
[
harq_pid
]
->
b
[
i
/
8
]
&
(
1
<<
(
i
&
7
)))
>>
(
i
&
7
);
test_input_bit
[
i
]
=
(
ulsch_ue
->
harq_processes
[
harq_pid
]
->
b
[
i
/
8
]
&
(
1
<<
(
i
&
7
)))
>>
(
i
&
7
);
if
(
estimated_output_bit
[
i
]
!=
test_input_bit
[
i
])
{
/*if(errors_decoding == 0)
printf("\x1B[34m""[frame %d][trial %d]\t1st bit in error in decoding = %d\n" "\x1B[0m", frame, trial, i);*/
errors_decoding
++
;
if
(
estimated_output_bit
[
i
]
!=
test_input_bit
[
i
])
{
/*if(errors_decoding == 0)
printf("\x1B[34m""[frame %d][trial %d]\t1st bit in error in decoding = %d\n" "\x1B[0m", frame, trial, i);*/
errors_decoding
++
;
}
}
}
if
(
n_trials
==
1
)
{
for
(
int
r
=
0
;
r
<
ulsch_ue
->
harq_processes
[
harq_pid
]
->
C
;
r
++
)
for
(
int
i
=
0
;
i
<
ulsch_ue
->
harq_processes
[
harq_pid
]
->
K
>>
3
;
i
++
)
{
if
((
ulsch_ue
->
harq_processes
[
harq_pid
]
->
c
[
r
][
i
]
^
ulsch_gNB
->
harq_processes
[
harq_pid
]
->
c
[
r
][
i
])
!=
0
)
printf
(
"************"
);
/*printf("r %d: in[%d] %x, out[%d] %x (%x)\n",r,
i,ulsch_ue->harq_processes[harq_pid]->c[r][i],
i,ulsch_gNB->harq_processes[harq_pid]->c[r][i],
ulsch_ue->harq_processes[harq_pid]->c[r][i]^ulsch_gNB->harq_processes[harq_pid]->c[r][i]);*/
}
}
if
(
errors_decoding
>
0
&&
error_flag
==
0
)
{
n_false_positive
++
;
if
(
n_trials
==
1
)
printf
(
"
\x1B
[31m""[frame %d][trial %d]
\t
number of errors in decoding = %u
\n
"
"
\x1B
[0m"
,
frame
,
trial
,
errors_decoding
);
}
roundStats
[
snrRun
]
+=
((
float
)
round
);
if
(
!
crc_status
)
effRate
[
snrRun
]
+=
((
double
)
TBS
)
/
(
double
)
round
;
if
(
n_trials
==
1
)
{
for
(
int
r
=
0
;
r
<
ulsch_ue
->
harq_processes
[
harq_pid
]
->
C
;
r
++
)
for
(
int
i
=
0
;
i
<
ulsch_ue
->
harq_processes
[
harq_pid
]
->
K
>>
3
;
i
++
)
{
if
((
ulsch_ue
->
harq_processes
[
harq_pid
]
->
c
[
r
][
i
]
^
ulsch_gNB
->
harq_processes
[
harq_pid
]
->
c
[
r
][
i
])
!=
0
)
printf
(
"************"
);
/*printf("r %d: in[%d] %x, out[%d] %x (%x)\n",r,
i,ulsch_ue->harq_processes[harq_pid]->c[r][i],
i,ulsch_gNB->harq_processes[harq_pid]->c[r][i],
ulsch_ue->harq_processes[harq_pid]->c[r][i]^ulsch_gNB->harq_processes[harq_pid]->c[r][i]);*/
}
}
if
(
errors_decoding
>
0
&&
error_flag
==
0
)
{
n_false_positive
++
;
if
(
n_trials
==
1
)
printf
(
"
\x1B
[31m""[frame %d][trial %d]
\t
number of errors in decoding = %u
\n
"
"
\x1B
[0m"
,
frame
,
trial
,
errors_decoding
);
}
roundStats
+=
((
float
)
round
);
if
(
!
crc_status
)
effRate
+=
((
double
)
TBS
)
/
(
double
)
round
;
}
// trial loop
roundStats
[
snrRun
]
/=
((
float
)
n_trials
);
effRate
[
snrRun
]
/=
(
double
)
n_trials
;
roundStats
/=
((
float
)
n_trials
);
effRate
/=
(
double
)
n_trials
;
printf
(
"*****************************************
\n
"
);
printf
(
"SNR %f: n_errors (%d/%d,%d/%d,%d/%d,%d/%d) (negative CRC), false_positive %d/%d, errors_scrambling (%u/%u,%u/%u,%u/%u,%u/%u
\n
"
,
SNR
,
n_errors
[
0
][
snrRun
],
round_trials
[
0
][
snrRun
],
n_errors
[
1
][
snrRun
],
round_trials
[
1
][
snrRun
],
n_errors
[
2
][
snrRun
],
round_trials
[
2
][
snrRun
],
n_errors
[
3
][
snrRun
],
round_trials
[
3
][
snrRun
],
n_false_positive
,
n_trials
,
errors_scrambling
[
0
][
snrRun
],
available_bits
*
n_trials
,
errors_scrambling
[
1
][
snrRun
],
available_bits
*
n_trials
,
errors_scrambling
[
2
][
snrRun
],
available_bits
*
n_trials
,
errors_scrambling
[
3
][
snrRun
],
available_bits
*
n_trials
);
printf
(
"SNR %f: n_errors (%d/%d"
,
SNR
,
n_errors
[
0
],
round_trials
[
0
]);
for
(
int
r
=
1
;
r
<
max_rounds
;
r
++
)
printf
(
",%d/%d"
,
n_errors
[
r
],
round_trials
[
r
]);
printf
(
") (negative CRC), false_positive %d/%d, errors_scrambling (%u/%u"
,
n_false_positive
,
n_trials
,
errors_scrambling
[
0
],
available_bits
*
n_trials
);
for
(
int
r
=
1
;
r
<
max_rounds
;
r
++
)
printf
(
",%u/%u"
,
errors_scrambling
[
r
],
available_bits
*
n_trials
);
printf
(
")
\n
"
);
printf
(
"
\n
"
);
blerStats
[
0
][
snrRun
]
=
(
double
)
n_errors
[
0
][
snrRun
]
/
round_trials
[
0
][
snrRun
];
blerStats
[
1
][
snrRun
]
=
(
double
)
n_errors
[
1
][
snrRun
]
/
round_trials
[
1
][
snrRun
];
blerStats
[
2
][
snrRun
]
=
(
double
)
n_errors
[
2
][
snrRun
]
/
round_trials
[
2
][
snrRun
];
blerStats
[
3
][
snrRun
]
=
(
double
)
n_errors
[
3
][
snrRun
]
/
round_trials
[
3
][
snrRun
];
berStats
[
0
][
snrRun
]
=
(
double
)
errors_scrambling
[
0
][
snrRun
]
/
available_bits
/
round_trials
[
0
][
snrRun
];
berStats
[
1
][
snrRun
]
=
(
double
)
errors_scrambling
[
1
][
snrRun
]
/
available_bits
/
round_trials
[
1
][
snrRun
];
berStats
[
2
][
snrRun
]
=
(
double
)
errors_scrambling
[
2
][
snrRun
]
/
available_bits
/
round_trials
[
2
][
snrRun
];
berStats
[
3
][
snrRun
]
=
(
double
)
errors_scrambling
[
3
][
snrRun
]
/
available_bits
/
round_trials
[
3
][
snrRun
];
effTP
[
snrRun
]
=
effRate
[
snrRun
]
/
(
double
)
TBS
*
(
double
)
100
;
printf
(
"SNR %f: Channel BLER (%e,%e,%e,%e), Channel BER (%e,%e,%e,%e) Avg round %.2f, Eff Rate %.4f bits/slot, Eff Throughput %.2f, TBS %u bits/slot
\n
"
,
SNR
,
blerStats
[
0
][
snrRun
],
blerStats
[
1
][
snrRun
],
blerStats
[
2
][
snrRun
],
blerStats
[
3
][
snrRun
],
berStats
[
0
][
snrRun
],
berStats
[
1
][
snrRun
],
berStats
[
2
][
snrRun
],
berStats
[
3
][
snrRun
],
roundStats
[
snrRun
],
effRate
[
snrRun
],
effTP
[
snrRun
],
TBS
);
for
(
int
r
=
0
;
r
<
max_rounds
;
r
++
)
{
blerStats
[
r
]
=
(
double
)
n_errors
[
r
]
/
round_trials
[
r
];
berStats
[
r
]
=
(
double
)
errors_scrambling
[
r
]
/
available_bits
/
round_trials
[
r
];
}
effTP
=
effRate
/
(
double
)
TBS
*
(
double
)
100
;
printf
(
"SNR %f: Channel BLER (%e"
,
SNR
,
blerStats
[
0
]);
for
(
int
r
=
1
;
r
<
max_rounds
;
r
++
)
printf
(
",%e"
,
blerStats
[
r
]);
printf
(
" Channel BER (%e"
,
berStats
[
0
]);
for
(
int
r
=
1
;
r
<
max_rounds
;
r
++
)
printf
(
",%e"
,
berStats
[
r
]);
printf
(
") Avg round %.2f, Eff Rate %.4f bits/slot, Eff Throughput %.2f, TBS %u bits/slot
\n
"
,
roundStats
,
effRate
,
effTP
,
TBS
);
FILE
*
fd
=
fopen
(
"nr_ulsim.log"
,
"w"
);
if
(
fd
==
NULL
)
{
...
...
@@ -1599,19 +1616,16 @@ int main(int argc, char **argv)
if
(
n_trials
==
1
)
break
;
if
((
float
)
effTP
[
snrRun
]
>=
eff_tp_check
)
{
if
((
float
)
effTP
>=
eff_tp_check
)
{
printf
(
"*************
\n
"
);
printf
(
"PUSCH test OK
\n
"
);
printf
(
"*************
\n
"
);
ret
=
0
;
break
;
}
snrStats
[
snrRun
]
=
SNR
;
snrRun
++
;
}
// SNR loop
printf
(
"
\n
"
);
printf
(
"
\n
"
);
printf
(
"Num RB:
\t
%d
\n
"
"Num symbols:
\t
%d
\n
"
"MCS:
\t
%d
\n
"
...
...
@@ -1629,20 +1643,6 @@ int main(int argc, char **argv)
length_dmrs
,
num_dmrs_cdm_grps_no_data
);
char
opStatsFile
[
50
];
sprintf
(
opStatsFile
,
"ulsimStats_z%d.m"
,
n_rx
);
LOG_M
(
opStatsFile
,
"SNR"
,
snrStats
,
snrRun
,
1
,
7
);
LOG_MM
(
opStatsFile
,
"BLER_round0"
,
blerStats
[
0
],
snrRun
,
1
,
7
);
LOG_MM
(
opStatsFile
,
"BLER_round1"
,
blerStats
[
1
],
snrRun
,
1
,
7
);
LOG_MM
(
opStatsFile
,
"BLER_round2"
,
blerStats
[
2
],
snrRun
,
1
,
7
);
LOG_MM
(
opStatsFile
,
"BLER_round3"
,
blerStats
[
3
],
snrRun
,
1
,
7
);
LOG_MM
(
opStatsFile
,
"BER_round0"
,
berStats
[
0
],
snrRun
,
1
,
7
);
LOG_MM
(
opStatsFile
,
"BER_round1"
,
berStats
[
1
],
snrRun
,
1
,
7
);
LOG_MM
(
opStatsFile
,
"BER_round2"
,
berStats
[
2
],
snrRun
,
1
,
7
);
LOG_MM
(
opStatsFile
,
"BER_round3"
,
berStats
[
3
],
snrRun
,
1
,
7
);
LOG_MM
(
opStatsFile
,
"EffRate"
,
effRate
,
snrRun
,
1
,
7
);
LOG_MM
(
opStatsFile
,
"EffTP"
,
effTP
,
snrRun
,
1
,
7
);
free
(
test_input_bit
);
free
(
estimated_output_bit
);
if
(
gNB
->
ldpc_offload_flag
)
...
...
This diff is collapsed.
Click to expand it.
openair2/LAYER2/NR_MAC_gNB/gNB_scheduler_RA.c
View file @
00106a7e
...
...
@@ -833,6 +833,7 @@ void nr_generate_Msg3_retransmission(module_id_t module_idP, int CC_id, frame_t
NULL
,
ra
->
Msg3_tda_id
,
ra
->
msg3_TPC
,
1
,
// Not toggling NDI in msg3 retransmissions
&
ra
->
UL_BWP
);
fill_dci_pdu_rel15
(
scc
,
...
...
@@ -1036,7 +1037,7 @@ void fill_msg3_pusch_pdu(nfapi_nr_pusch_pdu_t *pusch_pdu,
//Optional Data only included if indicated in pduBitmap
pusch_pdu
->
pusch_data
.
rv_index
=
nr_rv_round_map
[
round
%
4
];
pusch_pdu
->
pusch_data
.
harq_process_id
=
0
;
pusch_pdu
->
pusch_data
.
new_data_indicator
=
1
;
pusch_pdu
->
pusch_data
.
new_data_indicator
=
(
round
==
0
)
?
1
:
0
;
;
pusch_pdu
->
pusch_data
.
num_cb
=
0
;
int
num_dmrs_symb
=
0
;
for
(
int
i
=
start_symbol_index
;
i
<
start_symbol_index
+
nr_of_symbols
;
i
++
)
...
...
This diff is collapsed.
Click to expand it.
openair2/LAYER2/NR_MAC_gNB/gNB_scheduler_primitives.c
View file @
00106a7e
...
...
@@ -885,6 +885,7 @@ void config_uldci(const NR_SIB1_t *sib1,
nr_srs_feedback_t
*
srs_feedback
,
int
time_domain_assignment
,
uint8_t
tpc
,
uint8_t
ndi
,
NR_UE_UL_BWP_t
*
ul_bwp
)
{
int
bwp_id
=
ul_bwp
->
bwp_id
;
...
...
@@ -895,7 +896,7 @@ void config_uldci(const NR_SIB1_t *sib1,
dci_pdu_rel15
->
time_domain_assignment
.
val
=
time_domain_assignment
;
dci_pdu_rel15
->
frequency_hopping_flag
.
val
=
pusch_pdu
->
frequency_hopping
;
dci_pdu_rel15
->
mcs
=
pusch_pdu
->
mcs_index
;
dci_pdu_rel15
->
ndi
=
pusch_pdu
->
pusch_data
.
new_data_indicator
;
dci_pdu_rel15
->
ndi
=
ndi
;
dci_pdu_rel15
->
rv
=
pusch_pdu
->
pusch_data
.
rv_index
;
dci_pdu_rel15
->
harq_pid
=
pusch_pdu
->
pusch_data
.
harq_process_id
;
dci_pdu_rel15
->
tpc
=
tpc
;
...
...
This diff is collapsed.
Click to expand it.
openair2/LAYER2/NR_MAC_gNB/gNB_scheduler_ulsch.c
View file @
00106a7e
...
...
@@ -2171,7 +2171,7 @@ void nr_schedule_ulsch(module_id_t module_id, frame_t frame, sub_frame_t slot)
AssertFatal
(
cur_harq
->
round
<
nr_mac
->
ul_bler
.
harq_round_max
,
"Indexing nr_rv_round_map[%d] is out of bounds
\n
"
,
cur_harq
->
round
%
4
);
pusch_pdu
->
pusch_data
.
rv_index
=
nr_rv_round_map
[
cur_harq
->
round
%
4
];
pusch_pdu
->
pusch_data
.
harq_process_id
=
harq_id
;
pusch_pdu
->
pusch_data
.
new_data_indicator
=
cur_harq
->
ndi
;
pusch_pdu
->
pusch_data
.
new_data_indicator
=
(
cur_harq
->
round
==
0
)
?
1
:
0
;
// not NDI but indicator for new transmission
pusch_pdu
->
pusch_data
.
tb_size
=
sched_pusch
->
tb_size
;
pusch_pdu
->
pusch_data
.
num_cb
=
0
;
//CBG not supported
...
...
@@ -2275,6 +2275,7 @@ void nr_schedule_ulsch(module_id_t module_id, frame_t frame, sub_frame_t slot)
&
sched_ctrl
->
srs_feedback
,
sched_pusch
->
time_domain_allocation
,
UE
->
UE_sched_ctrl
.
tpc0
,
cur_harq
->
ndi
,
current_BWP
);
fill_dci_pdu_rel15
(
scc
,
...
...
This diff is collapsed.
Click to expand it.
openair2/LAYER2/NR_MAC_gNB/mac_proto.h
View file @
00106a7e
...
...
@@ -192,6 +192,7 @@ void config_uldci(const NR_SIB1_t *sib1,
nr_srs_feedback_t
*
srs_feedback
,
int
time_domain_assignment
,
uint8_t
tpc
,
uint8_t
ndi
,
NR_UE_UL_BWP_t
*
ul_bwp
);
void
nr_schedule_pucch
(
gNB_MAC_INST
*
nrmac
,
...
...
This diff is collapsed.
Click to expand it.
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment