bitshift_circular_right_64.m

%
% bitshift circular right function
%
function out = bitshift_circular_right_64(a, num)
    % string input to be shift
    a_left  = a(1:8);
    a_right = a(9:16);
    a_left_dec  = uint32(hex2dec(a_left));
    a_right_dec = uint32(hex2dec(a_right));

    if num < 32
        temp_left  = bitget(a_left_dec, 1 : num);
        temp_right = bitget(a_right_dec, 1 : num);
        a_left_dec  = bitshift(a_left_dec,  -num);
        a_right_dec = bitshift(a_right_dec, -num);
        for i = 1 : num
            a_left_dec  = bitset(a_left_dec,  32 - num + i, temp_right(i));
            a_right_dec = bitset(a_right_dec, 32 - num + i, temp_left(i));
        end
        a_left = dec2hex(a_left_dec, 8);
        a_right = dec2hex(a_right_dec, 8);
        a_hex = strcat(a_left, a_right);
        out = a_hex;
    elseif num == 32
    %   temp=a_left_dec;
    %   a_left_dec=a_right_dec;
    %   a_right_dec=temp;
    %   a_left_hex=dec2hex(a_left_dec,8);
    %   a_right_hex=dec2hex(a_right_dec,8);
    %   a_hex=strcat(a_left_hex,a_right_hex);
    %   out=a_hex;
    %
        out = strcat(a_right, a_left);
    else
        out = bitshift_circular_left_64(a, 64 - num);
    end
return