CasperXBlock/shift_mult_init_xblock.m at master · cs150bf/CasperXBlock · GitHub

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%                                                                             %
%   Center for Astronomy Signal Processing and Electronics Research           %
%   http://casper.berkeley.edu                                                %
%   Copyright (C) 2011    Hong Chen                                           %
%                                                                             %
%   This program 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 2 of the License, or         %
%   (at your option) any later version.                                       %
%                                                                             %
%   This program 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 this program; if not, write to the Free Software Foundation, Inc.,   %
%   51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.               %
%                                                                             %
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
function shift_mult_init_xblock(const,add_latency,n_bits,bin_pt)

inport = xInport('in');
outport = xOutport('out');

const_binary = dec2bin(const);
len = length(const_binary);
len1 = length(find(const_binary=='1'));  % the actually number of shift blocks

shifts = cell(1,len1);
shift_out = cell(1,len1);
k=1;
for i = 1:len
    if strcmp(const_binary(len-i+1) ,'1')
        shift_out{k} = xSignal(['shift_out',num2str(i)]);
        shifts{k} = xBlock(struct('source','Shift','name', ['shift',num2str(i)]), ...
                            struct('shift_dir', 'Left', ...
                                    'shift_bits', i-1, ...
                                    'latency', 0, ...
                                    'Precision','User Defined', ...
                                    'arith_type', 'Signed  (2''s comp)', ...
                                    'n_bits', n_bits+(i-1), ...
                                    'bin_pt', bin_pt), ...
                                    {inport}, ...
                                    {shift_out{k}});

        k=k+1;
    end
end

if len1==1
    outport.bind(shift_out{1});

else
    xlsub3_addertree = xBlock(struct('source', str2func('adder_tree_init_xblock'),'name', 'adder_tree'), ...
                             {len1, add_latency, 'Round  (unbiased: +/- Inf)', 'Saturate', 'Behavioral'}, ...
                             [{inport},shift_out], ...
                             {{},outport});

end
end