matlab 实现的RSA加解密算法

请运行rsa_pro.m

function out = decryption（cdn） 
global padd s1 s2
cut_length = 50;

out = [];
for j = 1:s1
    maple（‘m:=（（c&^d） mod n）‘）;
    m_out = maple（‘m‘）;

    if length（m_out） == （（cut_length*3）-1）
        m_out = [‘0‘ m_out];
    elseif length（m_out） == （（cut_length*3）-2）
        m_out = [‘0‘ ‘0‘ m_out];
    end
        
    l = 1;
    m_out_int = [];
    for k = 1:length（m_out）/3
        m_out_temp = [m_out（l） m_out（l+1） m_out（l+2）];
        m_out_int_temp = str2num（m_out_temp）;
        m_out_int = [m_out_int m_out_int_temp];
        l = l+3;
    end
    out = [out char（m_out_int）];
end

out = out（1:（（s1*cut_length）-padd））;

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     文件        654  2009-03-28 09:50  rsa\decryption.m

     文件        444  2009-03-28 09:50  rsa\encryption.m

     文件        322  2009-03-28 09:47  rsa\ex_decryption.m

     文件        620  2009-04-06 17:36  rsa\ex_encryption.m

     文件         29  2009-03-28 11:54  rsa\ex_exit.m

     文件         56  2009-03-28 11:46  rsa\ex_help.m

     文件       2291  2009-04-16 19:55  rsa\helpmsg.fig

     文件       2897  2009-03-28 11:44  rsa\helpmsg.m

     文件        456  2009-03-25 20:14  rsa\intconcat.m

     文件        530  2009-03-25 20:12  rsa\mesgcut.m

     文件        987  2009-03-26 18:42  rsa\rsa.m

     文件       3908  2009-04-06 22:26  rsa\rsa_pro.fig

     文件      12180  2009-04-10 22:38  rsa\rsa_pro.m

     目录          0  2009-04-16 19:56  rsa

 -rw-r--r--       227  2011-08-12 15:27  readme_verysource.com.txt

----------- ---------  ---------- -----  ----

                25601                    15