Cedric Roux
56c66c09aa
Pre-ci test passed git-svn-id: http://svn.eurecom.fr/openair4G/trunk@4000 818b1a75-f10b-46b9-bf7c-635c3b92a50f
88 lines
1.9 KiB
Matlab
88 lines
1.9 KiB
Matlab
%system('source /opt/intel/cc/10.0.023/bin/iccvars.sh')
|
|
%system('./sync_user');
|
|
|
|
clear all
|
|
close all
|
|
|
|
% fd = fopen('rx_frame_2streams.dat','r');
|
|
% temp = fread(fd,20480*8,'int16');
|
|
% fclose(fd);
|
|
|
|
NRx=2;
|
|
|
|
%rxs = temp(1:2:length(temp)) + sqrt(-1)*temp(2:2:length(temp));
|
|
%rxs = reshape(rxs,[],NRx);
|
|
|
|
rxsig0
|
|
rxsig1
|
|
rxs(:,1) = rxs0;
|
|
rxs(:,2) = rxs1;
|
|
|
|
% do synchronization here
|
|
CHSCH0_sync_4xf0
|
|
CHSCH0_sync_4xf1
|
|
|
|
c0 = abs(conv(rxs(:,1),fliplr(ifft(chsch0_sync_f_4x0)')));
|
|
c1 = abs(conv(rxs(:,1),fliplr(ifft(chsch0_sync_f_4x1)')));
|
|
csum = (c0.^2) + (c1.^2);
|
|
[maxlev0,maxpos0] = max(csum);
|
|
%sync_pos = maxpos0-1024
|
|
%sync_pos = 16158 -1024
|
|
sync_pos=1
|
|
|
|
figure(1)
|
|
plot(csum);
|
|
|
|
% do Channel estimation here
|
|
|
|
CPL = 64;
|
|
SL = 256;
|
|
SLP = CPL + SL;
|
|
|
|
rxchsch = rxs(sync_pos + 1: sync_pos + 4*SLP,:);
|
|
rxchbch = rxs(sync_pos + 4*SLP + 1: sync_pos + 12*SLP,:);
|
|
plot_style = {'r','g','b','k'};
|
|
|
|
for i=0:3
|
|
RXchsch = fft(rxchsch(i*SLP+CPL+1 : (i+1)*SLP,:));
|
|
eval(sprintf('chsch%d_syncf',i));
|
|
chsch_sync_f = eval(sprintf('chsch%d_sync_f',i));
|
|
for a=0:NRx-1
|
|
Hest(:,a+1,i+1) = RXchsch(:,a+1) .* conj(chsch_sync_f);
|
|
Hest2(:,a+1,i+1) = fft(ifft(Hest(:,a+1,i+1)).*[zeros(1,160) ones(1,96)].');
|
|
end
|
|
figure(2)
|
|
plot(20*log10(1+abs(Hest2(:,1,i+1))),plot_style{i+1})
|
|
hold on
|
|
figure(3)
|
|
plot(abs(ifft(Hest(1:2:end,1,i+1))),plot_style{i+1})
|
|
hold on
|
|
%plot(imag(ifft(Hest)),'g')
|
|
%hold off
|
|
end
|
|
|
|
%%
|
|
symb_comp = zeros(8,SL);
|
|
mask = [true(1,80) false(1,96) true(1,80)];
|
|
|
|
for s = 0:7
|
|
symb = fft(rxchbch((s*(CPL+SL)+CPL+1):(((s+1)*(CPL+SL))),:));
|
|
for c=0:255
|
|
symb_comp(s+1,c+1) = conj(Hest2(c+1,:,2))*symb(c+1,:)';
|
|
end
|
|
end
|
|
|
|
|
|
|
|
figure(6)
|
|
|
|
plot(squeeze(symb_comp(1,:)),'rx')
|
|
hold on
|
|
plot(squeeze(symb_comp(2,:)),'gx')
|
|
% plot(symb_comp(3,:),'bx')
|
|
% plot(symb_comp(4,:),'kx')
|
|
% plot(symb_comp(5,:),'cx')
|
|
% plot(symb_comp(6,:),'mx')
|
|
% plot(symb_comp(7,:),'wx')
|
|
hold off
|