encryption.m

能够用matlab实现RSA算法中加密解密的功能

function c = encryption(val,e,n)
global padd s1 s2
cut_length = 50;
c=[];

m = val;%接下来的这段程序是将要加密的字符串截成cut_length长的矩阵
[m_int2 padd] = mesgcut(m,cut_length);
m_int2 = double(m_int2);
m_char = intconcat(m_int2);
[s1 s2] = size(m_char);

maple('e:=',e);
maple('n:=',n);

for j = 1:s1    
    maple('m:=',m_char(j,:));    
    maple('c:=((m&^e) mod n)');
    c_temp = maple('c');
    c = [c c_temp];   
end