condor_plot_stat.m

来自「一个UWB仿真程序包」· M 代码 · 共 95 行

%
%
%function condor_plot(varargin)
%
%

clear all;

basedir = 'results';

% $$$ if nargin == 0
% $$$   basedir = 'results';
% $$$ else
% $$$   basedir = varargin{1};
% $$$ end

cmd = strcat('grep RSCODE', ...
             sprintf(' %s/CONFIG.txt',basedir), ...
             ' |  sed -e "s/^[$|@]RSCODE.*= //" -e "s/;//"');
[s,w]=system(cmd);
RSCODE = str2num(w);

if isempty(RSCODE)
  fprintf('No RSCODE\n');
  DATALENGTH = 1016;
elseif RSCODE == 0
  fprintf('No RSCODE\n');
  DATALENGTH = 870;
elseif RSCODE == 1
  fprintf('RSCODE is defined\n');
  DATALENGTH = 1016;
end

cmd = strcat('grep "^[@|$]snr_dB"', ...
	     sprintf(' %s/CONFIG.txt',basedir), ...
	     ' | sed -e "s/^[$|@]snr_dB = (//" -e "s/);//"');
[s,w]=system(cmd);
snr_dB = str2num(w);

cmd = strcat('grep "^[@|$]BURST_LENGTH"', ...
	     sprintf(' %s/CONFIG.txt', basedir), ...
	     ' | sed -r -e "s/[$|@]BURST_LENGTH  = \(?//" -e "s/\)?;//"');
[s,w]=system(cmd);
BURST_LENGTH = str2num(w);

cmd = strcat('grep "^[@|$]Nu"', ...
	     sprintf(' %s/CONFIG.txt', basedir), ...
	     ' | sed -r -e "s/[$|@]Nu            = \(?//" -e "s/\)?;//"');
[s,w]=system(cmd);
Nu = str2num(w);

cmd = strcat('grep "^[@|$]LAMBDA"', ...
	     sprintf(' %s/CONFIG.txt', basedir), ...
	     ' | sed -r -e "s/[$|@]LAMBDA        = \(?//" -e "s/\)?;//"');
[s,w]=system(cmd);
LAMBDA = str2num(w);

cmd = strcat('grep "^[@|$]channel_est"', ...
	     sprintf(' %s/CONFIG.txt', basedir), ...
	     ' | sed -r -e "s/[$|@]channel_est    = \(?//" -e "s/\)?;//"');
[s,w]=system(cmd);
channel_est = str2num(w);


fprintf('Parameters:\n')
fprintf('BURST_LENGTH = %d, Nu = %d, LAMBDA = %d\n',BURST_LENGTH,Nu,LAMBDA);
if isempty(RSCODE) || RSCODE == 0
  fprintf('Uncoded simulation\n');
  code_str = 'Uncoded,';
elseif RSCODE == 1
  fprintf('Simulation with RS code\n');
  code_str = 'RS code,';
end
if isempty(channel_est) || channel_est == 0
  fprintf('No channel estimation\n');
  chan_str = ' ';
elseif channel_est == 1
  fprintf('Channel estimation\n');
  chan_str = ' channel mask,';
end

snr_dB = 16;

for k = 1:1:length(snr_dB)
  filename = sprintf('stat-%d-%d-%d-%d.txt',snr_dB(k),BURST_LENGTH,Nu,LAMBDA);
  data = load(strcat(basedir,'/',filename));

  mui      = data(:,1);
  preamble = data(:,2);
  payload  = data(:,3);
  num_err  = data(:,4);

  stat = [mui preamble payload num_err];
end