2018-03-30 08:33:11 +00:00
|
|
|
% Usage: read_complex_binary (filename, [count])
|
2018-01-23 16:36:32 +00:00
|
|
|
%
|
2018-03-30 08:33:11 +00:00
|
|
|
% Opens filename and returns the contents as a column vector,
|
|
|
|
% treating them as 32 bit complex numbers
|
|
|
|
%
|
|
|
|
|
|
|
|
% -------------------------------------------------------------------------
|
|
|
|
%
|
|
|
|
% Copyright (C) 2010-2018 (see AUTHORS file for a list of contributors)
|
|
|
|
%
|
|
|
|
% GNSS-SDR is a software defined Global Navigation
|
|
|
|
% Satellite Systems receiver
|
|
|
|
%
|
|
|
|
% This file is part of GNSS-SDR.
|
|
|
|
%
|
|
|
|
% GNSS-SDR is free software: you can redistribute it and/or modify
|
2018-01-23 16:36:32 +00:00
|
|
|
% it under the terms of the GNU General Public License as published by
|
2018-03-30 08:33:11 +00:00
|
|
|
% the Free Software Foundation, either version 3 of the License, or
|
|
|
|
% at your option) any later version.
|
|
|
|
%
|
|
|
|
% GNSS-SDR is distributed in the hope that it will be useful,
|
2018-01-23 16:36:32 +00:00
|
|
|
% 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.
|
2018-03-30 08:33:11 +00:00
|
|
|
%
|
2018-01-23 16:36:32 +00:00
|
|
|
% You should have received a copy of the GNU General Public License
|
2018-03-30 08:33:11 +00:00
|
|
|
% along with GNSS-SDR. If not, see <http://www.gnu.org/licenses/>.
|
|
|
|
%
|
|
|
|
% -------------------------------------------------------------------------
|
|
|
|
%
|
2018-01-23 16:36:32 +00:00
|
|
|
|
|
|
|
function v = read_complex_char_binary (filename, count)
|
|
|
|
|
2018-03-30 08:33:11 +00:00
|
|
|
m = nargchk (1,2,nargin);
|
|
|
|
if (m)
|
2018-01-23 16:36:32 +00:00
|
|
|
usage (m);
|
2018-03-30 08:33:11 +00:00
|
|
|
end
|
2018-01-23 16:36:32 +00:00
|
|
|
|
2018-03-30 08:33:11 +00:00
|
|
|
if (nargin < 2)
|
2018-01-23 16:36:32 +00:00
|
|
|
count = Inf;
|
2018-03-30 08:33:11 +00:00
|
|
|
end
|
2018-01-23 16:36:32 +00:00
|
|
|
|
2018-03-30 08:33:11 +00:00
|
|
|
f = fopen (filename, 'rb');
|
|
|
|
if (f < 0)
|
2018-01-23 16:36:32 +00:00
|
|
|
v = 0;
|
2018-03-30 08:33:11 +00:00
|
|
|
else
|
2018-01-23 16:36:32 +00:00
|
|
|
t = fread (f, [2, count], 'int8');
|
|
|
|
fclose (f);
|
|
|
|
v = t(1,:) + t(2,:)*i;
|
|
|
|
[r, c] = size (v);
|
|
|
|
v = reshape (v, c, r);
|
2018-03-30 08:33:11 +00:00
|
|
|
end
|