mirror of https://github.com/pvnis/srsRAN_4G.git
Merged with #51
ismagom
10 years ago
parent
1e44b31fb3
commit
fb6eb4f9d1
@ -0,0 +1,218 @@
|
|||||||
|
/**
|
||||||
|
*
|
||||||
|
* \section COPYRIGHT
|
||||||
|
*
|
||||||
|
* Copyright 2013-2014 The libLTE Developers. See the
|
||||||
|
* COPYRIGHT file at the top-level directory of this distribution.
|
||||||
|
*
|
||||||
|
* \section LICENSE
|
||||||
|
*
|
||||||
|
* This file is part of the libLTE library.
|
||||||
|
*
|
||||||
|
* libLTE is free software: you can redistribute it and/or modify
|
||||||
|
* it under the terms of the GNU Lesser General Public License as
|
||||||
|
* published by the Free Software Foundation, either version 3 of
|
||||||
|
* the License, or (at your option) any later version.
|
||||||
|
*
|
||||||
|
* libLTE 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 Lesser General Public License for more details.
|
||||||
|
*
|
||||||
|
* A copy of the GNU Lesser General Public License can be found in
|
||||||
|
* the LICENSE file in the top-level directory of this distribution
|
||||||
|
* and at http://www.gnu.org/licenses/.
|
||||||
|
*
|
||||||
|
*/
|
||||||
|
|
||||||
|
#include <stdio.h>
|
||||||
|
#include <stdlib.h>
|
||||||
|
#include <string.h>
|
||||||
|
#include <strings.h>
|
||||||
|
#include <unistd.h>
|
||||||
|
#include <math.h>
|
||||||
|
#include <sys/time.h>
|
||||||
|
#include <unistd.h>
|
||||||
|
#include <assert.h>
|
||||||
|
#include <signal.h>
|
||||||
|
|
||||||
|
#include "liblte/phy/phy.h"
|
||||||
|
#include "liblte/cuhd/cuhd.h"
|
||||||
|
#include "cell_search_utils.h"
|
||||||
|
|
||||||
|
/**********************************************************************
|
||||||
|
* Program arguments processing
|
||||||
|
***********************************************************************/
|
||||||
|
typedef struct {
|
||||||
|
int nof_subframes;
|
||||||
|
bool disable_plots;
|
||||||
|
int force_N_id_2;
|
||||||
|
char *uhd_args;
|
||||||
|
float uhd_freq;
|
||||||
|
float uhd_gain;
|
||||||
|
}prog_args_t;
|
||||||
|
|
||||||
|
void args_default(prog_args_t *args) {
|
||||||
|
args->nof_subframes = -1;
|
||||||
|
args->force_N_id_2 = -1; // Pick the best
|
||||||
|
args->uhd_args = "";
|
||||||
|
args->uhd_freq = -1.0;
|
||||||
|
args->uhd_gain = 60.0;
|
||||||
|
}
|
||||||
|
|
||||||
|
void usage(prog_args_t *args, char *prog) {
|
||||||
|
printf("Usage: %s [aglnv] -f rx_frequency (in Hz)\n", prog);
|
||||||
|
printf("\t-a UHD args [Default %s]\n", args->uhd_args);
|
||||||
|
printf("\t-g UHD RX gain [Default %.2f dB]\n", args->uhd_gain);
|
||||||
|
printf("\t-l Force N_id_2 [Default best]\n");
|
||||||
|
printf("\t-n nof_subframes [Default %d]\n", args->nof_subframes);
|
||||||
|
printf("\t-v [set verbose to debug, default none]\n");
|
||||||
|
}
|
||||||
|
|
||||||
|
void parse_args(prog_args_t *args, int argc, char **argv) {
|
||||||
|
int opt;
|
||||||
|
args_default(args);
|
||||||
|
while ((opt = getopt(argc, argv, "aglnvf")) != -1) {
|
||||||
|
switch (opt) {
|
||||||
|
case 'a':
|
||||||
|
args->uhd_args = argv[optind];
|
||||||
|
break;
|
||||||
|
case 'g':
|
||||||
|
args->uhd_gain = atof(argv[optind]);
|
||||||
|
break;
|
||||||
|
case 'f':
|
||||||
|
args->uhd_freq = atof(argv[optind]);
|
||||||
|
break;
|
||||||
|
case 'n':
|
||||||
|
args->nof_subframes = atoi(argv[optind]);
|
||||||
|
break;
|
||||||
|
case 'l':
|
||||||
|
args->force_N_id_2 = atoi(argv[optind]);
|
||||||
|
break;
|
||||||
|
case 'v':
|
||||||
|
verbose++;
|
||||||
|
break;
|
||||||
|
default:
|
||||||
|
usage(args, argv[0]);
|
||||||
|
exit(-1);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
if (args->uhd_freq < 0) {
|
||||||
|
usage(args, argv[0]);
|
||||||
|
exit(-1);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
/**********************************************************************/
|
||||||
|
|
||||||
|
/* TODO: Do something with the output data */
|
||||||
|
char data[10000];
|
||||||
|
|
||||||
|
int cuhd_recv_wrapper(void *h, void *data, uint32_t nsamples) {
|
||||||
|
DEBUG(" ---- Receive %d samples ---- \n", nsamples);
|
||||||
|
return cuhd_recv(h, data, nsamples, 1);
|
||||||
|
}
|
||||||
|
|
||||||
|
|
||||||
|
int main(int argc, char **argv) {
|
||||||
|
int ret;
|
||||||
|
cf_t *sf_buffer;
|
||||||
|
prog_args_t prog_args;
|
||||||
|
lte_cell_t cell;
|
||||||
|
int64_t sf_cnt;
|
||||||
|
pbch_mib_t mib;
|
||||||
|
ue_sync_t ue_sync;
|
||||||
|
void *uhd;
|
||||||
|
|
||||||
|
parse_args(&prog_args, argc, argv);
|
||||||
|
|
||||||
|
printf("Opening UHD device...\n");
|
||||||
|
if (cuhd_open(prog_args.uhd_args, &uhd)) {
|
||||||
|
fprintf(stderr, "Error opening uhd\n");
|
||||||
|
exit(-1);
|
||||||
|
}
|
||||||
|
/* Set receiver gain */
|
||||||
|
cuhd_set_rx_gain(uhd, prog_args.uhd_gain);
|
||||||
|
|
||||||
|
/* set receiver frequency */
|
||||||
|
cuhd_set_rx_freq(uhd, (double) prog_args.uhd_freq);
|
||||||
|
cuhd_rx_wait_lo_locked(uhd);
|
||||||
|
printf("Tunning receiver to %.3f MHz\n", (double ) prog_args.uhd_freq/1000000);
|
||||||
|
|
||||||
|
if (cell_search(uhd, prog_args.force_N_id_2, &cell, &mib)) {
|
||||||
|
fprintf(stderr, "Cell not found\n");
|
||||||
|
exit(-1);
|
||||||
|
}
|
||||||
|
|
||||||
|
cuhd_start_rx_stream(uhd);
|
||||||
|
|
||||||
|
if (ue_sync_init(&ue_sync, cell, cuhd_recv_wrapper, uhd)) {
|
||||||
|
fprintf(stderr, "Error initiating ue_sync\n");
|
||||||
|
exit(-1);
|
||||||
|
}
|
||||||
|
|
||||||
|
/* Initialize subframe counter */
|
||||||
|
sf_cnt = 0;
|
||||||
|
|
||||||
|
lte_fft_t fft;
|
||||||
|
chest_t chest;
|
||||||
|
|
||||||
|
if (lte_fft_init(&fft, cell.cp, cell.nof_prb)) {
|
||||||
|
fprintf(stderr, "Error initiating FFT\n");
|
||||||
|
return -1;
|
||||||
|
}
|
||||||
|
if (chest_init_LTEDL(&chest, cell)) {
|
||||||
|
fprintf(stderr, "Error initiating channel estimator\n");
|
||||||
|
return -1;
|
||||||
|
}
|
||||||
|
|
||||||
|
int sf_re = SF_LEN_RE(cell.nof_prb, cell.cp);
|
||||||
|
cf_t *sf_symbols = vec_malloc(sf_re * sizeof(cf_t));
|
||||||
|
unsigned int nframes=0;
|
||||||
|
|
||||||
|
/* Main loop */
|
||||||
|
while (sf_cnt < prog_args.nof_subframes || prog_args.nof_subframes == -1) {
|
||||||
|
|
||||||
|
ret = ue_sync_get_buffer(&ue_sync, &sf_buffer);
|
||||||
|
if (ret < 0) {
|
||||||
|
fprintf(stderr, "Error calling ue_sync_work()\n");
|
||||||
|
}
|
||||||
|
|
||||||
|
float rssi=0, rsrp=0, rsrq=0;
|
||||||
|
|
||||||
|
/* iodev_receive returns 1 if successfully read 1 aligned subframe */
|
||||||
|
if (ret == 1) {
|
||||||
|
|
||||||
|
/* Run FFT for all subframe data */
|
||||||
|
lte_fft_run_sf(&fft, sf_buffer, sf_symbols);
|
||||||
|
|
||||||
|
chest_measure_sf(&chest, sf_symbols, ue_sync_get_sfidx(&ue_sync));
|
||||||
|
rssi = VEC_CMA(chest_rssi_sf(&chest, sf_symbols),rssi,nframes);
|
||||||
|
rsrq = VEC_CMA(chest_rsrq_sf(&chest, sf_symbols, ue_sync_get_sfidx(&ue_sync)),rsrq,nframes);
|
||||||
|
rsrp = VEC_CMA(chest_rsrp_sf(&chest, ue_sync_get_sfidx(&ue_sync)),rsrp,nframes);
|
||||||
|
nframes++;
|
||||||
|
|
||||||
|
// Plot and Printf
|
||||||
|
if ((nframes%10) == 0) {
|
||||||
|
printf("CFO: %+6.4f KHz, SFO: %+6.4f Khz, RSSI: %+5.2f dBm, RSRP: %+4.2f dBm, RSRQ: %4.2f dB\r",
|
||||||
|
ue_sync_get_cfo(&ue_sync)/1000, ue_sync_get_sfo(&ue_sync)/1000,
|
||||||
|
10*log10(rssi*1000/4/cell.nof_prb/12/2)-prog_args.uhd_gain,
|
||||||
|
10*log10(rsrp*1000)-prog_args.uhd_gain,
|
||||||
|
10*log10(rsrq));
|
||||||
|
}
|
||||||
|
|
||||||
|
} else if (ret == 0) {
|
||||||
|
printf("Finding PSS... Peak: %8.1f, FrameCnt: %d, State: %d\r",
|
||||||
|
sync_get_peak_value(&ue_sync.sfind),
|
||||||
|
ue_sync.frame_total_cnt, ue_sync.state);
|
||||||
|
}
|
||||||
|
sf_cnt++;
|
||||||
|
} // Main loop
|
||||||
|
|
||||||
|
ue_sync_free(&ue_sync);
|
||||||
|
cuhd_close(uhd);
|
||||||
|
printf("\nBye\n");
|
||||||
|
exit(0);
|
||||||
|
}
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
@ -1,253 +0,0 @@
|
|||||||
/**
|
|
||||||
*
|
|
||||||
* \section COPYRIGHT
|
|
||||||
*
|
|
||||||
* Copyright 2013-2014 The libLTE Developers. See the
|
|
||||||
* COPYRIGHT file at the top-level directory of this distribution.
|
|
||||||
*
|
|
||||||
* \section LICENSE
|
|
||||||
*
|
|
||||||
* This file is part of the libLTE library.
|
|
||||||
*
|
|
||||||
* libLTE is free software: you can redistribute it and/or modify
|
|
||||||
* it under the terms of the GNU Lesser General Public License as
|
|
||||||
* published by the Free Software Foundation, either version 3 of
|
|
||||||
* the License, or (at your option) any later version.
|
|
||||||
*
|
|
||||||
* libLTE 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 Lesser General Public License for more details.
|
|
||||||
*
|
|
||||||
* A copy of the GNU Lesser General Public License can be found in
|
|
||||||
* the LICENSE file in the top-level directory of this distribution
|
|
||||||
* and at http://www.gnu.org/licenses/.
|
|
||||||
*
|
|
||||||
*/
|
|
||||||
|
|
||||||
#include <stdio.h>
|
|
||||||
#include <stdlib.h>
|
|
||||||
#include <strings.h>
|
|
||||||
#include <unistd.h>
|
|
||||||
#include <complex.h>
|
|
||||||
|
|
||||||
#include "liblte/phy/phy.h"
|
|
||||||
|
|
||||||
lte_cell_t cell = {
|
|
||||||
6, // nof_prb
|
|
||||||
1, // nof_ports
|
|
||||||
1000, // cell_id
|
|
||||||
CPNORM // cyclic prefix
|
|
||||||
};
|
|
||||||
|
|
||||||
char *output_matlab = NULL;
|
|
||||||
|
|
||||||
void usage(char *prog) {
|
|
||||||
printf("Usage: %s [recov]\n", prog);
|
|
||||||
|
|
||||||
printf("\t-r nof_prb [Default %d]\n", cell.nof_prb);
|
|
||||||
printf("\t-e extended cyclic prefix [Default normal]\n");
|
|
||||||
|
|
||||||
printf("\t-c cell_id (1000 tests all). [Default %d]\n", cell.id);
|
|
||||||
|
|
||||||
printf("\t-o output matlab file [Default %s]\n",output_matlab?output_matlab:"None");
|
|
||||||
printf("\t-v increase verbosity\n");
|
|
||||||
}
|
|
||||||
|
|
||||||
void parse_args(int argc, char **argv) {
|
|
||||||
int opt;
|
|
||||||
while ((opt = getopt(argc, argv, "recov")) != -1) {
|
|
||||||
switch(opt) {
|
|
||||||
case 'r':
|
|
||||||
cell.nof_prb = atoi(argv[optind]);
|
|
||||||
break;
|
|
||||||
case 'e':
|
|
||||||
cell.cp = CPEXT;
|
|
||||||
break;
|
|
||||||
case 'c':
|
|
||||||
cell.id = atoi(argv[optind]);
|
|
||||||
break;
|
|
||||||
case 'o':
|
|
||||||
output_matlab = argv[optind];
|
|
||||||
break;
|
|
||||||
case 'v':
|
|
||||||
verbose++;
|
|
||||||
break;
|
|
||||||
default:
|
|
||||||
usage(argv[0]);
|
|
||||||
exit(-1);
|
|
||||||
}
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
|
|
||||||
int main(int argc, char **argv) {
|
|
||||||
chest_dl_t est;
|
|
||||||
precoding_t cheq;
|
|
||||||
cf_t *input = NULL, *ce = NULL, *h = NULL, *output = NULL;
|
|
||||||
int i, j, n_port, sf_idx, cid, num_re;
|
|
||||||
int ret = -1;
|
|
||||||
int max_cid;
|
|
||||||
FILE *fmatlab = NULL;
|
|
||||||
|
|
||||||
parse_args(argc,argv);
|
|
||||||
|
|
||||||
if (output_matlab) {
|
|
||||||
fmatlab=fopen(output_matlab, "w");
|
|
||||||
if (!fmatlab) {
|
|
||||||
perror("fopen");
|
|
||||||
goto do_exit;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
num_re = 2 * cell.nof_prb * RE_X_RB * CP_NSYMB(cell.cp);
|
|
||||||
|
|
||||||
input = malloc(num_re * sizeof(cf_t));
|
|
||||||
if (!input) {
|
|
||||||
perror("malloc");
|
|
||||||
goto do_exit;
|
|
||||||
}
|
|
||||||
output = malloc(num_re * sizeof(cf_t));
|
|
||||||
if (!output) {
|
|
||||||
perror("malloc");
|
|
||||||
goto do_exit;
|
|
||||||
}
|
|
||||||
h = malloc(num_re * sizeof(cf_t));
|
|
||||||
if (!h) {
|
|
||||||
perror("malloc");
|
|
||||||
goto do_exit;
|
|
||||||
}
|
|
||||||
ce = malloc(num_re * sizeof(cf_t));
|
|
||||||
if (!ce) {
|
|
||||||
perror("malloc");
|
|
||||||
goto do_exit;
|
|
||||||
}
|
|
||||||
|
|
||||||
if (cell.id == 1000) {
|
|
||||||
cid = 0;
|
|
||||||
max_cid = 504;
|
|
||||||
} else {
|
|
||||||
cid = cell.id;
|
|
||||||
max_cid = cell.id;
|
|
||||||
}
|
|
||||||
|
|
||||||
precoding_init(&cheq, num_re);
|
|
||||||
|
|
||||||
while(cid <= max_cid) {
|
|
||||||
cell.id = cid;
|
|
||||||
if (chest_dl_init(&est, cell)) {
|
|
||||||
fprintf(stderr, "Error initializing equalizer\n");
|
|
||||||
goto do_exit;
|
|
||||||
}
|
|
||||||
|
|
||||||
for (sf_idx=0;sf_idx<1;sf_idx++) {
|
|
||||||
for (n_port=0;n_port<cell.nof_ports;n_port++) {
|
|
||||||
|
|
||||||
bzero(input, sizeof(cf_t) * num_re);
|
|
||||||
for (i=0;i<num_re;i++) {
|
|
||||||
input[i] = 0.5-rand()/RAND_MAX+I*(0.5-rand()/RAND_MAX);
|
|
||||||
}
|
|
||||||
|
|
||||||
bzero(ce, sizeof(cf_t) * num_re);
|
|
||||||
bzero(h, sizeof(cf_t) * num_re);
|
|
||||||
|
|
||||||
refsignal_cs_put_sf(cell, n_port,
|
|
||||||
est.csr_signal.pilots[n_port/2][sf_idx], input);
|
|
||||||
|
|
||||||
for (i=0;i<2*CP_NSYMB(cell.cp);i++) {
|
|
||||||
for (j=0;j<cell.nof_prb * RE_X_RB;j++) {
|
|
||||||
float x = -1+(float) i/CP_NSYMB(cell.cp) + cosf(2 * M_PI * (float) j/cell.nof_prb/RE_X_RB);
|
|
||||||
h[i*cell.nof_prb * RE_X_RB+j] = (3+x) * cexpf(I * x);
|
|
||||||
input[i*cell.nof_prb * RE_X_RB+j] *= h[i*cell.nof_prb * RE_X_RB+j];
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
struct timeval t[3];
|
|
||||||
gettimeofday(&t[1], NULL);
|
|
||||||
for (int j=0;j<100;j++) {
|
|
||||||
chest_dl_estimate_port(&est, input, ce, sf_idx, n_port);
|
|
||||||
}
|
|
||||||
gettimeofday(&t[2], NULL);
|
|
||||||
get_time_interval(t);
|
|
||||||
printf("CHEST: %f us\n", (float) t[0].tv_usec/100);
|
|
||||||
|
|
||||||
gettimeofday(&t[1], NULL);
|
|
||||||
for (int j=0;j<100;j++) {
|
|
||||||
predecoding_single(&cheq, input, ce, output, num_re, 0);
|
|
||||||
}
|
|
||||||
gettimeofday(&t[2], NULL);
|
|
||||||
get_time_interval(t);
|
|
||||||
printf("CHEQ-ZF: %f us\n", (float) t[0].tv_usec/100);
|
|
||||||
|
|
||||||
float mse = 0;
|
|
||||||
for (i=0;i<num_re;i++) {
|
|
||||||
mse += cabsf(input[i]-output[i]);
|
|
||||||
}
|
|
||||||
mse /= num_re;
|
|
||||||
printf("MSE: %f\n", mse);
|
|
||||||
|
|
||||||
gettimeofday(&t[1], NULL);
|
|
||||||
for (int j=0;j<100;j++) {
|
|
||||||
predecoding_single(&cheq, input, ce, output, num_re, chest_dl_get_noise_estimate(&est));
|
|
||||||
}
|
|
||||||
gettimeofday(&t[2], NULL);
|
|
||||||
get_time_interval(t);
|
|
||||||
printf("CHEQ-MMSE: %f us\n", (float) t[0].tv_usec/100);
|
|
||||||
|
|
||||||
mse = 0;
|
|
||||||
for (i=0;i<num_re;i++) {
|
|
||||||
mse += cabsf(input[i]-output[i]);
|
|
||||||
}
|
|
||||||
mse /= num_re;
|
|
||||||
printf("MSE: %f\n", mse);
|
|
||||||
|
|
||||||
if (mse > 1.7) {
|
|
||||||
goto do_exit;
|
|
||||||
}
|
|
||||||
|
|
||||||
if (fmatlab) {
|
|
||||||
fprintf(fmatlab, "input=");
|
|
||||||
vec_fprint_c(fmatlab, input, num_re);
|
|
||||||
fprintf(fmatlab, ";\n");
|
|
||||||
fprintf(fmatlab, "h=");
|
|
||||||
vec_fprint_c(fmatlab, h, num_re);
|
|
||||||
fprintf(fmatlab, ";\n");
|
|
||||||
fprintf(fmatlab, "ce=");
|
|
||||||
vec_fprint_c(fmatlab, ce, num_re);
|
|
||||||
fprintf(fmatlab, ";\n");
|
|
||||||
}
|
|
||||||
}
|
|
||||||
}
|
|
||||||
chest_dl_free(&est);
|
|
||||||
cid+=10;
|
|
||||||
INFO("cid=%d\n", cid);
|
|
||||||
}
|
|
||||||
|
|
||||||
|
|
||||||
ret = 0;
|
|
||||||
|
|
||||||
do_exit:
|
|
||||||
|
|
||||||
precoding_free(&cheq);
|
|
||||||
|
|
||||||
if (output) {
|
|
||||||
free(output);
|
|
||||||
}
|
|
||||||
if (ce) {
|
|
||||||
free(ce);
|
|
||||||
}
|
|
||||||
if (input) {
|
|
||||||
free(input);
|
|
||||||
}
|
|
||||||
if (h) {
|
|
||||||
free(h);
|
|
||||||
}
|
|
||||||
|
|
||||||
if (!ret) {
|
|
||||||
printf("OK\n");
|
|
||||||
} else {
|
|
||||||
printf("Error at cid=%d, slot=%d, port=%d\n",cid, sf_idx, n_port);
|
|
||||||
}
|
|
||||||
|
|
||||||
exit(ret);
|
|
||||||
}
|
|
||||||
@ -1,249 +0,0 @@
|
|||||||
/**
|
|
||||||
*
|
|
||||||
* \section COPYRIGHT
|
|
||||||
*
|
|
||||||
* Copyright 2013-2014 The libLTE Developers. See the
|
|
||||||
* COPYRIGHT file at the top-level directory of this distribution.
|
|
||||||
*
|
|
||||||
* \section LICENSE
|
|
||||||
*
|
|
||||||
* This file is part of the libLTE library.
|
|
||||||
*
|
|
||||||
* libLTE is free software: you can redistribute it and/or modify
|
|
||||||
* it under the terms of the GNU Lesser General Public License as
|
|
||||||
* published by the Free Software Foundation, either version 3 of
|
|
||||||
* the License, or (at your option) any later version.
|
|
||||||
*
|
|
||||||
* libLTE 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 Lesser General Public License for more details.
|
|
||||||
*
|
|
||||||
* A copy of the GNU Lesser General Public License can be found in
|
|
||||||
* the LICENSE file in the top-level directory of this distribution
|
|
||||||
* and at http://www.gnu.org/licenses/.
|
|
||||||
*
|
|
||||||
*/
|
|
||||||
|
|
||||||
#include <stdio.h>
|
|
||||||
#include <stdlib.h>
|
|
||||||
#include <strings.h>
|
|
||||||
#include <unistd.h>
|
|
||||||
#include <complex.h>
|
|
||||||
|
|
||||||
#include "liblte/phy/phy.h"
|
|
||||||
|
|
||||||
lte_cell_t cell = {
|
|
||||||
6, // nof_prb
|
|
||||||
MAX_PORTS, // nof_ports
|
|
||||||
1000, // cell_id
|
|
||||||
CPNORM // cyclic prefix
|
|
||||||
};
|
|
||||||
|
|
||||||
uint8_t *output_matlab = NULL;
|
|
||||||
|
|
||||||
void usage(char *prog) {
|
|
||||||
printf("Usage: %s [recov]\n", prog);
|
|
||||||
|
|
||||||
printf("\t-r nof_prb [Default %d]\n", cell.nof_prb);
|
|
||||||
printf("\t-e extended cyclic prefix [Default normal]\n");
|
|
||||||
|
|
||||||
printf("\t-c cell_id (1000 tests all). [Default %d]\n", cell.id);
|
|
||||||
|
|
||||||
printf("\t-o output matlab file [Default %s]\n",output_matlab?output_matlab:"None");
|
|
||||||
printf("\t-v increase verbosity\n");
|
|
||||||
}
|
|
||||||
|
|
||||||
void parse_args(int argc, char **argv) {
|
|
||||||
int opt;
|
|
||||||
while ((opt = getopt(argc, argv, "recov")) != -1) {
|
|
||||||
switch(opt) {
|
|
||||||
case 'r':
|
|
||||||
cell.nof_prb = atoi(argv[optind]);
|
|
||||||
break;
|
|
||||||
case 'e':
|
|
||||||
cell.cp = CPEXT;
|
|
||||||
break;
|
|
||||||
case 'c':
|
|
||||||
cell.id = atoi(argv[optind]);
|
|
||||||
break;
|
|
||||||
case 'o':
|
|
||||||
output_matlab = argv[optind];
|
|
||||||
break;
|
|
||||||
case 'v':
|
|
||||||
verbose++;
|
|
||||||
break;
|
|
||||||
default:
|
|
||||||
usage(argv[0]);
|
|
||||||
exit(-1);
|
|
||||||
}
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
int check_mse(float mod, float arg, int n_port) {
|
|
||||||
INFO("mod=%.4f, arg=%.4f, n_port=%d\n", mod, arg, n_port);
|
|
||||||
switch(n_port) {
|
|
||||||
case 0:
|
|
||||||
if (mod > 0.029) {
|
|
||||||
return -1;
|
|
||||||
}
|
|
||||||
if (arg > 0.029) {
|
|
||||||
return -1;
|
|
||||||
}
|
|
||||||
break;
|
|
||||||
case 1:
|
|
||||||
if (mod > 0.012) {
|
|
||||||
return -1;
|
|
||||||
}
|
|
||||||
if (arg > 0.012) {
|
|
||||||
return -1;
|
|
||||||
}
|
|
||||||
break;
|
|
||||||
case 2:
|
|
||||||
case 3:
|
|
||||||
if (mod > 3.33) {
|
|
||||||
return -1;
|
|
||||||
}
|
|
||||||
if (arg > 0.63) {
|
|
||||||
return -1;
|
|
||||||
}
|
|
||||||
break;
|
|
||||||
default:
|
|
||||||
return -1;
|
|
||||||
}
|
|
||||||
return 0;
|
|
||||||
}
|
|
||||||
|
|
||||||
int main(int argc, char **argv) {
|
|
||||||
chest_t eq;
|
|
||||||
cf_t *input = NULL, *ce = NULL, *h = NULL;
|
|
||||||
refsignal_t refs;
|
|
||||||
int i, j, n_port, n_slot, cid, num_re;
|
|
||||||
int ret = -1;
|
|
||||||
int max_cid;
|
|
||||||
FILE *fmatlab = NULL;
|
|
||||||
float mse_mag, mse_phase;
|
|
||||||
|
|
||||||
parse_args(argc,argv);
|
|
||||||
|
|
||||||
if (output_matlab) {
|
|
||||||
fmatlab=fopen(output_matlab, "w");
|
|
||||||
if (!fmatlab) {
|
|
||||||
perror("fopen");
|
|
||||||
goto do_exit;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
num_re = cell.nof_prb * RE_X_RB * CP_NSYMB(cell.cp);
|
|
||||||
|
|
||||||
input = malloc(num_re * sizeof(cf_t));
|
|
||||||
if (!input) {
|
|
||||||
perror("malloc");
|
|
||||||
goto do_exit;
|
|
||||||
}
|
|
||||||
h = malloc(num_re * sizeof(cf_t));
|
|
||||||
if (!h) {
|
|
||||||
perror("malloc");
|
|
||||||
goto do_exit;
|
|
||||||
}
|
|
||||||
ce = malloc(num_re * sizeof(cf_t));
|
|
||||||
if (!ce) {
|
|
||||||
perror("malloc");
|
|
||||||
goto do_exit;
|
|
||||||
}
|
|
||||||
|
|
||||||
if (cell.id == 1000) {
|
|
||||||
cid = 0;
|
|
||||||
max_cid = 504;
|
|
||||||
} else {
|
|
||||||
cid = cell.id;
|
|
||||||
max_cid = cell.id;
|
|
||||||
}
|
|
||||||
|
|
||||||
while(cid <= max_cid) {
|
|
||||||
cell.id = cid;
|
|
||||||
if (chest_init_LTEUL(&eq, cell)) {
|
|
||||||
fprintf(stderr, "Error initializing equalizer\n");
|
|
||||||
goto do_exit;
|
|
||||||
}
|
|
||||||
|
|
||||||
for (n_slot=0;n_slot<NSLOTS_X_FRAME;n_slot++) {
|
|
||||||
for (n_port=0;n_port<cell.nof_ports;n_port++) {
|
|
||||||
|
|
||||||
if (refsignal_init_LTEDL(&refs, n_port, n_slot, cell)) {
|
|
||||||
fprintf(stderr, "Error initiating CRS slot=%d\n", i);
|
|
||||||
return -1;
|
|
||||||
}
|
|
||||||
|
|
||||||
bzero(input, sizeof(cf_t) * num_re);
|
|
||||||
for (i=0;i<num_re;i++) {
|
|
||||||
input[i] = 0.5-rand()/RAND_MAX+I*(0.5-rand()/RAND_MAX);
|
|
||||||
}
|
|
||||||
|
|
||||||
bzero(ce, sizeof(cf_t) * num_re);
|
|
||||||
bzero(h, sizeof(cf_t) * num_re);
|
|
||||||
|
|
||||||
refsignal_put(&refs, input);
|
|
||||||
|
|
||||||
for (i=0;i<CP_NSYMB(cell.cp);i++) {
|
|
||||||
for (j=0;j<cell.nof_prb * RE_X_RB;j++) {
|
|
||||||
float x = -1+(float) i/CP_NSYMB(cell.cp) + cosf(2 * M_PI * (float) j/cell.nof_prb/RE_X_RB);
|
|
||||||
h[i*cell.nof_prb * RE_X_RB+j] = (3+x) * cexpf(I * x);
|
|
||||||
input[i*cell.nof_prb * RE_X_RB+j] *= h[i*cell.nof_prb * RE_X_RB+j];
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
chest_ce_slot_port(&eq, input, ce, n_slot, n_port);
|
|
||||||
|
|
||||||
mse_mag = mse_phase = 0;
|
|
||||||
for (i=0;i<num_re;i++) {
|
|
||||||
mse_mag += (cabsf(h[i]) - cabsf(ce[i])) * (cabsf(h[i]) - cabsf(ce[i])) / num_re;
|
|
||||||
mse_phase += (cargf(h[i]) - cargf(ce[i])) * (cargf(h[i]) - cargf(ce[i])) / num_re;
|
|
||||||
}
|
|
||||||
|
|
||||||
if (check_mse(mse_mag, mse_phase, n_port)) {
|
|
||||||
goto do_exit;
|
|
||||||
}
|
|
||||||
|
|
||||||
if (fmatlab) {
|
|
||||||
fprintf(fmatlab, "input=");
|
|
||||||
vec_fprint_c(fmatlab, input, num_re);
|
|
||||||
fprintf(fmatlab, ";\n");
|
|
||||||
fprintf(fmatlab, "h=");
|
|
||||||
vec_fprint_c(fmatlab, h, num_re);
|
|
||||||
fprintf(fmatlab, ";\n");
|
|
||||||
fprintf(fmatlab, "ce=");
|
|
||||||
vec_fprint_c(fmatlab, ce, num_re);
|
|
||||||
fprintf(fmatlab, ";\n");
|
|
||||||
chest_fprint(&eq, fmatlab, n_slot, n_port);
|
|
||||||
}
|
|
||||||
}
|
|
||||||
}
|
|
||||||
chest_free(&eq);
|
|
||||||
cid+=10;
|
|
||||||
INFO("cid=%d\n", cid);
|
|
||||||
}
|
|
||||||
|
|
||||||
|
|
||||||
ret = 0;
|
|
||||||
|
|
||||||
do_exit:
|
|
||||||
|
|
||||||
if (ce) {
|
|
||||||
free(ce);
|
|
||||||
}
|
|
||||||
if (input) {
|
|
||||||
free(input);
|
|
||||||
}
|
|
||||||
if (h) {
|
|
||||||
free(h);
|
|
||||||
}
|
|
||||||
|
|
||||||
if (!ret) {
|
|
||||||
printf("OK\n");
|
|
||||||
} else {
|
|
||||||
printf("Error at cid=%d, slot=%d, port=%d\n",cid, n_slot, n_port);
|
|
||||||
}
|
|
||||||
|
|
||||||
exit(ret);
|
|
||||||
}
|
|
||||||
Loading…
Reference in New Issue