?? rsawang1.cpp
字號:
IntCpy(Prm,B); //將B拷貝到prm中 C=N result prime
Substract(B,ONEVALUE,buf1); //將B-ONEVALUE的結果放到buf1中
SetMode(buf1,TWOVALUE,buf2,B); //B=(B-1)/2的商,buf2=(B-1)/2的余數=0
TransBi(B,flag); //將B轉換為二進制大數
ok=1;
for(i=0;i<TESTNUM;i++)
{
LoadInt(A,Model[i]); //將數組Model中的第i+1個數讀取到A中
k=PowerMode(A,Prm,D,flag); //(A^flag) mod Prm ->D
if(k!=1 && k!=2) //不符合判定規則
{
ok=0;
break;
}
if(k==1) //判定條件1，G=A^(n-1)/2=1
{
}
if(k==2) //判定條件2，G=A^(n-1)/2=p-1
{
}
}
if (ok)//if(ok && pass_2)
{
return 0;
}//for循環用來檢測IntRandom(B,MLENGTH)產生的數B是否是一個素數
}
}
/*---------------------------------------------------------------------------
功能：計算公鑰PK
入口參數：$(r)的值在Rvalue中，私鑰SK，公鑰PK
返回值：成功找到，返回1
----------------------------------------------------------------------------*/
int CRsaA::ComputingPK(byteint Rvalue,byteint SK,byteint PK)
{
register i;
byteint PA,PB,PC,buf1,temp,buf2;
SetZero(PK); SetZero(PA); SetZero(PB); SetZero(PC); SetZero(buf1); //清零初始化
SetZero(temp); SetZero(buf2);
while(1)
{
IntRandom(SK,SKLENGTH); //隨機產生一個大數奇數作為Generated secret key
IntCpy(PB,SK);
IntCpy(PA,Rvalue);
while(1)
{
SetMode(PA,PB,PC,PK); //PA=PB*PK+PC
i=IntCmp(PC,ONEVALUE);
if(i==0) //PC=1, i=0
break; //滿足條件，是互質的
i=IntCmp(PC,ZEROVALUE);
if(i==0)
{
i=-1; //PC=0,i=-1
break; //不滿足互質條件，跳出循環，從新生成一個隨機數
}
IntCpy(PA,PB); //按照歐幾里的定理繼續判斷
IntCpy(PB,PC);
}
if(i==0) //滿足，跳出查找循環
break;
}
IntCpy(temp,ONEVALUE);
IntCpy(PA,Rvalue);
IntCpy(PB,SK);
while(1)
{
Multiply(PA,temp,buf1); //buf1=PA*temp
Plus(buf1,ONEVALUE,buf2);//buf2=(PA*temp)+1
SetMode(buf2,PB,buf1,PK);//buf=((PA*temp)+1)%PB
if(IntCmp(buf1,ZEROVALUE)==0)
break;
Plus(temp,ONEVALUE,buf1);
IntCpy(temp,buf1);
}
return 1; //SK and PK found
}
/*---------------------------------------------------------------------------
功能：計算模R
入口參數：產生的質數p，q，模R
返回值：無
----------------------------------------------------------------------------*/
void CRsaA::ComputingR(byteint p,byteint q,byteint R)
{
Multiply(p,q,R); // R=p*q, public mode number
}
/*---------------------------------------------------------------------------
功能：計算$(r)
入口參數：質數p，質數q，模$(r)放在Rvalue
返回值：無
----------------------------------------------------------------------------*/
void CRsaA::ComputingRvalue(byteint p,byteint q,byteint Rvalue)
{
byteint buf1,buf2;
SetZero(buf1); SetZero(buf2);
Substract(p,ONEVALUE,buf1); // buf1=p-1
Substract(q,ONEVALUE,buf2); // buf2=q-1
Multiply(buf1,buf2,Rvalue); // Rvalue=(p-1)*(q-1)
}
/*---------------------------------------------------------------------------
功能：將接受的字符串轉換為大數類型
入口參數：大數result,字符串input
返回值：數的長度
----------------------------------------------------------------------------*/
int CRsaA::Getinput(byteint result,CString input)
{
int i=DATALENGTH,m=0;
long strlen;
strlen=input.GetLength();
if(strlen==0) return 0;
else
{
for(int j=0;j<strlen;j++)
{
result[i-strlen+j] = (input.GetAt(j)-'0');
}
return j;
}
}
/*---------------------------------------------------------------------------
功能：實現加密，解密運算功能
入口參數：明文(大數類型source)，模R，秘鑰key，結果desti
返回值：無
----------------------------------------------------------------------------*/
void CRsaA::RsaDo(byteint source,byteint R,byteint key,byteint desti)
{
TransBi(key,flag);
PowerMode(source,R,desti,flag);
}
/*---------------------------------------------------------------------------
功能：將長整形的數轉換為大數類型
入口參數：大數類型result,長整形input
返回值：成功，返回數的長度，否則返回0；
----------------------------------------------------------------------------*/
int CRsaA::Getinput1(byteint result,unsigned long input)
{
int i=DATALENGTH-1,m=0;
long j=0;
int k=0;
if(input)
{
do
{
j=input/10;
k=input-j*10;
result[i]=k;
i--;
m++;
input=j;
}while(j);
return m;
}
else
return 0;
}
/*---------------------------------------------------------------------------
功能：將十六進制的串轉換為數值
入口參數：字符串指針
返回值：成功，返回數
----------------------------------------------------------------------------*/
unsigned long CRsaA::Os2ip(unsigned char* pstr)
{
unsigned long ch=0;
unsigned int j=0;
unsigned long k=1;
for(int i=0;i<4;i++)
{
j = (unsigned int) (*(pstr+3-i));
/* if( (*(pstr+3-i))>='0'&&(*(pstr+3-i))<='9')
j = (*(pstr+3-i)) - '0';
if( (*(pstr+3-i))>='a'&&(*(pstr+3-i))<='f')
j = (*(pstr+3-i)) - 'a'+10;
if( (*(pstr+3-i))>='A'&&(*(pstr+3-i))<='F')
j = (*(pstr+3-i)) - 'A'+10;*/
ch += j*k;
k*=256;
}
return ch;
}
/*---------------------------------------------------------------------------
功能：將數串轉換為相應的字符串
入口參數：字符串str
返回值：返回轉換的結果；
----------------------------------------------------------------------------*/
CString CRsaA::Ip2os(CString str)
{
int strlen=str.GetLength(),quotient=0,remainder=0;
unsigned long num=0,temp=0;
unsigned int k=1;
CString strResult="";
for(int i=strlen;i>0;i--) //得到相應的數字串,存放在num中
{
temp = (str.GetAt(i-1) - '0');
num += temp*k;
k *= 10;
}
//采用模除的方式,求得相應的十六進制數
for(int j=0;j<4;j++)
{
quotient = num/256;
remainder = num - quotient*256;
/*if(remainder>=0&&remainder<=9)
strResult.Insert(0,(remainder+'0'));
if(remainder>=10&&remainder<=15)
strResult.Insert(0,(remainder-10+'a'));*/
strResult.Insert(0,(unsigned char)remainder);
num = quotient;
}
return strResult;
}
/*---------------------------------------------------------------------------
功能：產生RSA秘鑰對
入口參數：存放結果的字符串地址
返回值：無
----------------------------------------------------------------------------*/
void CRsaA::GenKeys(CString& pk,CString& sk,CString& R)
{
byteint m_p,m_q,m_R,m_Rvalue,m_PK,m_SK;
SetZero(m_p); //對大數變量進行清零初始化
SetZero(m_q);
SetZero(m_R);
SetZero(m_Rvalue);
SetZero(m_PK);
SetZero(m_SK);
Mdata(); //生成比較數表
AfxMessageBox("開始計算質數P...");
Prime(m_p); //生成素數p q
AfxMessageBox("開始計算質數Q...");
Prime(m_q);
AfxMessageBox("開始計算模R...");
ComputingR(m_p,m_q,m_R); //計算模R
AfxMessageBox("開始計算模r");
ComputingRvalue(m_p,m_q,m_Rvalue); //計算r
AfxMessageBox("開始計算秘鑰SK,PK");
ComputingPK(m_Rvalue,m_PK,m_SK); // Generate PK and SK
//CGenKeyBusyDlg dlg1;
//g1.DoModal();
R=PrtInt(m_R);
pk=PrtInt(m_PK);
sk=PrtInt(m_SK);
return ;
}
/*---------------------------------------------------------------------------
功能：實現加密功能接口
入口參數：明文字符串source，模字符串R，秘鑰字符串key，結果字符串數組result
返回值：無
----------------------------------------------------------------------------*/
int CRsaA::RsaEncrypt(CString& source,const char *key,const char *R,CStringArray& result)
{
unsigned char* pstr;
int j;//sourcelen,j;
byteint m_key,m_R,desti,aa;
SetZero(desti); //將大數變量清零初始化
SetZero(aa);
//SetZero(bb);
SetZero(m_key);
SetZero(m_R);
pstr = (unsigned char*)(LPCTSTR)source; //得到字符串數據的指針
j = source.GetLength()/4; //得到數組的元素個數
result.SetSize(j,1);
Getinput(m_key,key); //將字符串轉換為大數類型
Getinput(m_R,R);
for(int i=0;i<j;i++)
{
Getinput1(desti,Os2ip(pstr)); //將四個字節的輸入轉換為大數類型數值
RsaDo(desti,m_R,m_key,aa); //進行加密運算
result.SetAt(i,PrtInt(aa)); //將結果存放到數組中
SetZero(desti); SetZero(aa);
pstr += 4;
}
return j;
}
/*---------------------------------------------------------------------------
功能：實現解密功能接口
入口參數：密文字符串數組source，秘鑰字符串sk，模字符串R，
返回值：結果字符串數組result
----------------------------------------------------------------------------*/
CString CRsaA::RsaDecrypt(CStringArray& source,const char* sk,const char* R)
{
int index=0;
CString result;
byteint m_sk,m_r,desti,aa;
SetZero(m_sk); SetZero(m_r); SetZero(desti); SetZero(aa); //SetZero(bb);
index=source.GetSize(); //得到數組的元素個數
Getinput(m_sk,sk); //將字符串轉換為大數類型
Getinput(m_r,R);
for(int i=0;i<index;i++)
{
Getinput(desti,source.GetAt(i)); //將加密結果轉換為大數類型
RsaDo(desti,m_r,m_sk,aa); //解密運算
result += Ip2os(PrtInt(aa)); //組合初始明文
SetZero(aa); SetZero(desti);
}
return result; //返回明文串
}
/*---------------------------------------------------------------------------
功能：生成一個秘鑰存貯文件
入口參數：無
返回值：無
----------------------------------------------------------------------------*/
void CRsaA::GenKeysTable()
{
CStringArray RArray,SKArray,PKArray;
CString r,pk,sk;
int j=1,i; //參數j表示產生的秘鑰對的個數
unsigned char strlength;
//設置數組的元素個數
RArray.SetSize(j,1); SKArray.SetSize(j,1); PKArray.SetSize(j,1);
/*-----------------------------------------------------------------------
文件格式為：
長度 秘鑰 長度 秘鑰......
---- ---- ---- ----
1byte nbyte 1byte nbyte (中間無空格,R,SK,PK)
*/
CFile file;
for(i=0;i<j;i++)
{
GenKeys(pk,sk,r); //循環產生秘鑰
RArray.SetAt(i,r); SKArray.SetAt(i,sk); PKArray.SetAt(i,pk);
}
if(file.Open("c:\\key.txt",CFile::modeCreate|CFile::modeReadWrite)==0)
{
AfxMessageBox("open file error!"); //打開文件失敗
return;
}
for(i=0;i<j;i++)
{ //循環寫入結果
strlength = (unsigned char)(RArray.GetAt(i)).GetLength();
file.Write(&strlength,1);
file.Write(RArray.GetAt(i),(RArray.GetAt(i)).GetLength());
strlength = (unsigned char)(SKArray.GetAt(i)).GetLength();
file.Write(&strlength,1);
file.Write(SKArray.GetAt(i),(SKArray.GetAt(i)).GetLength());
strlength = (unsigned char)(PKArray.GetAt(i)).GetLength();
file.Write(&strlength,1);
file.Write(PKArray.GetAt(i),(PKArray.GetAt(i)).GetLength());
}
file.Close();
}
void CRsaA::LoadKeysFromFile(CString& r,CString& sk,CString& pk)
{
int j=10,len;
char *pbuffer;
unsigned char strlen1;
CFile file;
CFileException e;
CString strFileName;
if(file.Open("c:\\key.txt",CFile::modeRead)==0)
{
AfxMessageBox("File(key.txt)could not be opened" );
}
file.Read(&strlen1,1); //讀出R長度
len = (int)strlen1;
pbuffer = new char[len+1];
pbuffer[len]='\0';
file.Read(pbuffer,len); //讀出R
r=pbuffer;
delete pbuffer;
file.Read(&strlen1,1); //讀出SK長度
len = (int)strlen1;
pbuffer = new char[len+1];
pbuffer[len]='\0';
file.Read(pbuffer,len); //讀出SK
sk=pbuffer;
delete pbuffer;
file.Read(&strlen1,1); //讀出PK長度
len = (int)strlen1;
pbuffer = new char[len+1];
pbuffer[len]='\0';
file.Read(pbuffer,len); //讀出PK
pk=pbuffer;
delete pbuffer;
file.Close();
}//
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -