mirror of
https://github.com/gnss-sdr/gnss-sdr
synced 2024-10-30 14:46:23 +00:00
58 lines
1.5 KiB
Mathematica
58 lines
1.5 KiB
Mathematica
|
%
|
||
|
|
% Copyright 2001 Free Software Foundation, Inc.
|
||
|
|
%
|
||
|
|
% This file is part of GNU Radio
|
||
|
|
%
|
||
|
|
% GNU Radio is free software; you can redistribute it and/or modify
|
||
|
|
% it under the terms of the GNU General Public License as published by
|
||
|
|
% the Free Software Foundation; either version 3, or (at your option)
|
||
|
|
% any later version.
|
||
|
|
%
|
||
|
|
% GNU Radio 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 General Public License for more details.
|
||
|
|
%
|
||
|
|
% You should have received a copy of the GNU General Public License
|
||
|
|
% along with GNU Radio; see the file COPYING. If not, write to
|
||
|
|
% the Free Software Foundation, Inc., 51 Franklin Street,
|
||
|
|
% Boston, MA 02110-1301, USA.
|
||
|
|
%
|
||
|
|
|
||
|
|
function v = read_complex_binary (filename, count, start_sample)
|
||
|
|
|
||
|
|
%% usage: read_complex_binary (filename, [count], [start_sample])
|
||
|
|
%%
|
||
|
|
%% open filename and return the contents as a column vector,
|
||
|
|
%% treating them as 32 bit complex numbers
|
||
|
|
%%
|
||
|
|
|
||
|
|
m = nargchk (1,2,nargin);
|
||
|
|
if (m)
|
||
|
|
%usage (m);
|
||
|
|
end
|
||
|
|
|
||
|
|
if (nargin < 2)
|
||
|
|
count = Inf;
|
||
|
|
start_sample=0;
|
||
|
|
end
|
||
|
|
|
||
|
|
if (nargin < 3)
|
||
|
|
start_sample=0;
|
||
|
|
end
|
||
|
|
|
||
|
|
f = fopen (filename, 'rb');
|
||
|
|
if (f < 0)
|
||
|
|
v = 0;
|
||
|
|
else
|
||
|
|
if (start_sample>0)
|
||
|
|
bytes_per_sample=4;
|
||
|
|
fseek(f,start_sample*bytes_per_sample,'bof');
|
||
|
|
end
|
||
|
|
t = fread (f, [2, count], 'float');
|
||
|
|
fclose (f);
|
||
|
|
v = t(1,:) + t(2,:)*i;
|
||
|
|
[r, c] = size (v);
|
||
|
|
v = reshape (v, c, r);
|
||
|
|
end
|