RSA-C实现

最新推荐文章于 2021-11-06 14:36:47 发布
最新推荐文章于 2021-11-06 14:36:47 发布
阅读量3.8k 收藏 6
点赞数
分类专栏： 2.1结构与算法 文章标签： 解密 struct fp c null
版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。
本文链接：https://blog.csdn.net/chinayaosir/article/details/3119147
版权

 /*@file rsatest.c
rsa for c
it complied ok with mingGW with chinayaosir
*/
#include "rsa.h"

void main()
{
    int  i;
   char  c;
       int  p[MAX],q[MAX],n[MAX],d[MAX],e[MAX],m[MAX],p1[MAX],q1[MAX];
 struct slink *head,*h1,*h2;
  for(i=0;i<MAX;i++)
     m[i]=p[i]=q[i]=n[i]=d[i]=e[i]=0;/*/简单初始化一下*/
 
  while (1)
  {
   menu();
   c=getchar();
   getchar();//接受回车符
 if ((c=='r') || (c=='R'))//操作r产生密钥对
 {       
   for(i=0;i<MAX;i++)
             m[i]=p[i]=q[i]=n[i]=d[i]=e[i]=0;
      printf("/n/n/n/n");
   printf("/n/n随机密钥对产生如下：/n/n");
         prime_random(p,q);/*/随机产生两个大素数*/
         mul(p,q,n);
   printf("由 p、q 得出 n :");
   print(n);
         mov(p,p1);
         p1[0]--;     
            mov(q,q1);
         q1[0]--;      /*/q-1;*/
         mul(p1,q1,m);//m=(p-1)*(q-1)
         erand(e,m);
         rsad(e,m,d);
   printf("密钥对产生完成，现在可以直接进行加解密文件!/n");
    printf("/n按任意键回主菜单…………");
   getchar();
 }
  else if((c=='l') || (c=='L'))
  {
   printf("/n/n选择导入密钥类型：加密密钥(P)还是解密密钥(S)?");
   c=getchar();
     getchar();
   if ((c=='p')||(c=='P'))
    loadpkey(e,n);
   else if((c=='s')||(c=='S'))
    loadskey(d,n); 
   printf("/n按任意键回主菜单…………");
   getchar();
  }
     else if ((c=='e') || (c=='E'))
  {
       tencrypto( e,  n);
    printf("/n加密文件操作完成!/n");
    printf("/n按任意键回主菜单…………");
    getchar();
    getchar();
  }
     else if ((c=='d') || (c=='D'))
    {
      tdecrypto( d, n);
   printf("/n解密文件操作完成!/n");
   printf("/n按任意键回主菜单…………");
   getchar();
   getchar();
    }
  else if ((c=='s')||(c=='S'))
  {
   savepkey(e,n);
    printf("/n");
   saveskey(d,n);
   printf("/n按任意键回主菜单…………");
   getchar();
   getchar();
  }
  else if((c=='T') || (c=='t'))
  {
     head=input();
              h1=jiami(  e,  n, head);
                 jiemi(  d,  n, h1);
     printf("/nRSA测试工作完成!/n");
    printf("/n按任意键回主菜单…………");
    getchar();
  }
  else if ((c=='Q') || (c=='q'))
   break;
  }  
}

/**********************************************************************/

/*@ file rsa.h
rsa with c,not c++
complied ok with minggw by chinayaosir
*/
#include<stdio.h>
#include<string.h>
#include <stdlib.h>  
#include <time.h> 
#include <math.h>
#include <malloc.h>

#define MAX 100
#define LEN sizeof(struct slink)
void sub(int a[MAX],int b[MAX] ,int c[MAX] );

struct slink
{
 int  bignum[MAX];
 /*bignum[98]用来标记正负号，1正，0负bignum[99]来标记实际长度*/
    struct slink *next;
};

/*/--------------------------------------RSA大数运算库-------------------------------------*/

void  print(  int a[MAX] )
   {
    int i;
    for(i=0;i<a[99];i++)
     printf("%d",a[a[99]-i-1]);
    printf("/n/n");
    return;
   }


int  cmp(int a1[MAX],int a2[MAX])
{   int l1, l2;
 int i;
 l1=a1[99];
 l2=a2[99];
 if (l1>l2)
     return 1;
    if (l1<l2)
       return -1;
    for(i=(l1-1);i>=0;i--)
   {
    if (a1[i]>a2[i])
     return 1 ;
    if (a1[i]<a2[i])
     return -1;
   }
    return 0;
}

void mov(int a[MAX],int *b)
{
 int j;
  for(j=0;j<MAX;j++)
   b[j]=a[j];
  
  return ;
}


void mul(int a1[MAX],int a2[MAX],int *c)
{
 int i,j;
 int y;
 int x;
 int z;
 int w;
 int l1, l2;
 l1=a1[MAX-1];
 l2=a2[MAX-1];
 if (a1[MAX-2]=='-'&& a2[MAX-2]=='-')
  c[MAX-2]=0;
 else if (a1[MAX-2]=='-')
  c[MAX-2]='-';
 else if (a2[MAX-2]=='-')
  c[MAX-2]='-';
 for(i=0;i<l1;i++)
 {
  for(j=0;j<l2;j++)
  {
     x=a1[i]*a2[j];
     y=x/10;
     z=x%10;
     w=i+j;
     c[w]=c[w]+z;
     c[w+1]=c[w+1]+y+c[w]/10;
     c[w]=c[w]%10;
  }
 }
 w=l1+l2;
 if(c[w-1]==0)w=w-1;
 c[MAX-1]=w;
 return;
}

void add(int a1[MAX],int a2[MAX],int *c)
{

 int i,l1,l2;
 int len,temp[MAX];
 int k=0;
l1=a1[MAX-1];
l2=a2[MAX-1];
if((a1[MAX-2]=='-')&&(a2[MAX-2]=='-'))
{
 c[MAX-2]='-';
}
else if (a1[MAX-2]=='-')
{
 mov(a1,temp);
 temp[MAX-2]=0;
 sub(a2,temp,c);
 return;
}
else if (a2[MAX-2]=='-')
{
 mov(a2,temp);
 temp[98]=0;
 sub(a1,temp,c);
 return;
}

 if(l1<l2)len=l1;
 else len=l2;
 for(i=0;i<len;i++)
 {
  c[i]=(a1[i]+a2[i]+k)%10;
  k=(a1[i]+a2[i]+k)/10;
 }
 if(l1>len)
 {
  for(i=len;i<l1;i++)
  {
   c[i]=(a1[i]+k)%10;
      k=(a1[i]+k)/10;  
  }
  if(k!=0)
  {
   c[l1]=k;
   len=l1+1;
  }
  else len=l1;
 }
 else
 {
  for(i=len;i<l2;i++)
  {
   c[i]=(a2[i]+k)%10;
   k=(a2[i]+k)/10;  
  }
  if(k!=0)
  {
   c[l2]=k;
   len=l2+1;
  }
  else len=l2;
 }
  c[99]=len;
  return;
}


void sub(int a1[MAX],int a2[MAX],int *c)
{
 int i,l1,l2;
 int len,t1[MAX],t2[MAX];
 int k=0;
l1=a1[MAX-1];
l2=a2[MAX-1];
if ((a1[MAX-2]=='-') && (a2[MAX-2]=='-'))
{
 mov(a1,t1);
        mov(a2,t2);
 t1[MAX-2]=0;
        t2[MAX-2]=0;
 sub(t2,t1,c);
 return;
}
else if( a2[MAX-2]=='-')
{
 mov(a2,t2);
 t2[MAX-2]=0;
 add(a1,t2,c);
 return;
}
else if (a1[MAX-2]=='-')
{
 mov(a2,t2);
 t2[MAX-2]='-';
 add(a1,t2,c);
 return;
}

 if(cmp(a1,a2)==1)
 {
 
  len=l2;
 for(i=0;i<len;i++)
 {
  if ((a1[i]-k-a2[i])<0)
 {
  c[i]=(a1[i]-a2[i]-k+10)%10;
     k=1;
 }
     else
  {
   c[i]=(a1[i]-a2[i]-k)%10;
      k=0;
  }
 }


  for(i=len;i<l1;i++)
  {
   if ((a1[i]-k)<0)
 {
  c[i]=(a1[i]-k+10)%10;
     k=1;
 }
     else
  {
   c[i]=(a1[i]-k)%10;
      k=0;
  }
  }
  if(c[l1-1]==0)/*使得数组C中的前面所以0字符不显示了，如1000-20=0980--->显示为980了*/
  {
      len=l1-1;
   i=2;
   while (c[l1-i]==0)/*111456-111450=00006，消除0后变成了6；*/
   {
     len=l1-i;
    i++;
   }

  }

  else
  {
   len=l1;
  }
 }
else
if(cmp(a1,a2)==(-1))
 {
  c[MAX-2]='-';
  len=l1;
  for(i=0;i<len;i++)
 {
  if ((a2[i]-k-a1[i])<0)
 {
  c[i]=(a2[i]-a1[i]-k+10)%10;
     k=1;
 }
     else
  {
   c[i]=(a2[i]-a1[i]-k)%10;
      k=0;
  }
 }
  for(i=len;i<l2;i++)
  {
    if ((a2[i]-k)<0)
 {
  c[i]=(a2[i]-k+10)%10;
     k=1;
 }
     else
  {
   c[i]=(a2[i]-k)%10;
      k=0;
  }  
  }
  if(c[l2-1]==0)
  { 
   len=l2-1;
   i=2;
   while (c[l1-i]==0)
   {
     len=l1-i;
     i++;
   }

  }

  else len=l2;
 
 }

else if(cmp(a1,a2)==0)
   {
    len=1;
    c[len-1]=0;
   }
 c[MAX-1]=len;
return;
}

void  mod(int a[MAX],int b[MAX],int  *c)/*/c=a mod b//注意：经检验知道此处A和C的数组都改变了。*/
{ int d[MAX];
 mov (a,d);
 while (cmp(d,b)!=(-1))/*/c=a-b-b-b-b-b.......until(c<b)*/
 {
  sub(d,b,c);
  mov(c,d);/*/c复制给a*/
 } 
 return ;
}


void  divt(int t[MAX],int b[MAX],int  *c ,int *w)/*//试商法//调用以后w为a mod b, C为a  div b;*/
{

 int a1,b1,i,j,m;/*w用于暂时保存数据*/
 int d[MAX],e[MAX],f[MAX],g[MAX],a[MAX];
 
 mov(t,a);
  for(i=0;i<MAX;i++)
    e[i]=0;
 for(i=0;i<MAX;i++)
    d[i]=0;
 for(i=0;i<MAX;i++) g[i]=0;
 a1=a[MAX-1];
    b1=b[MAX-1];
 if (cmp(a,b)==(-1))
 {
  c[0]=0;
  c[MAX-1]=1;
  mov(t,w);
  return;
 }
 else if (cmp(a,b)==0)
 {
  c[0]=1;
        c[MAX-1]=1;
  w[0]=0;
  w[MAX-1]=1;
  return;
 }
  m=(a1-b1);
    for(i=m;i>=0;i--)/*341245/3=341245-300000*1--->41245-30000*1--->11245-3000*3--->2245-300*7--->145-30*4=25--->25-3*8=1*/
 {
      for(j=0;j<MAX;j++)
        d[j]=0;
  d[i]=1;
  d[MAX-1]=i+1;
  mov(b,g);
        mul(g,d,e);

 
  while (cmp(a,e)!=(-1))
  {
   c[i]++;
   sub(a,e,f);
      mov(f,a);/*f复制给g*/
  }

     for(j=i;j<MAX;j++)/*高位清零*/
        e[j]=0;
 
 }
 mov(a,w);
 if (c[m]==0) c[MAX-1]=m;
 else c[MAX-1]=m+1;

 return;
}

void mulmod(int a[MAX] ,int b[MAX] ,int n[MAX],int *m)/*解决 了 m=a*b mod n;*/
{
 int c[MAX],d[MAX];
 int i;
 for(i=0;i<MAX;i++)
  d[i]=c[i]=0;
 mul(a,b,c);
   divt(c,n, d,m);
   for(i=0;i<m[MAX-1];i++)
  printf("%d",m[m[MAX-1]-i-1]);
     printf("/nm  length is :  %d /n",m[MAX-1]);
}

/*接下来的重点任务是要着手解决 m=a^p  mod n的函数问题。*/

void expmod(int a[MAX] ,int p[MAX] ,int n[MAX],int *m)
{
 int t[MAX],l[MAX],temp[MAX]; /*/t放入2，l放入1；*/
 int w[MAX],s[MAX],c[MAX],b[MAX],i;
 for(i=0;i<MAX-1;i++)
  b[i]=l[i]=t[i]=w[i]=0;
 t[0]=2;t[MAX-1]=1;
 l[0]=1;l[MAX-1]=1;
    mov(l,temp);
 mov(a,m);
    mov(p,b);

while(cmp(b,l)!=0)
{
    for(i=0;i<MAX;i++)
 w[i]=c[i]=0;

    divt(b,t,w,c);/*// c=p mod 2  w= p /2*/
 
    mov(w,b);/*//p=p/2*/

if(cmp(c,l)==0) /*/余数c==1*/
{
 for(i=0;i<MAX;i++)
 w[i]=0;

 mul(temp,m,w);

 mov(w,temp);
 
 for(i=0;i<MAX;i++)
 w[i]=c[i]=0;

  divt(temp,n,w,c);/* /c为余c=temp % n，w为商w=temp/n */

  mov(c,temp);
}

for(i=0;i<MAX;i++)
 s[i]=0;

mul(m,m,s);//s=a*a

for(i=0;i<MAX;i++)
 c[i]=0;

divt(s,n,w,c);/*/w=s/n;c=s mod n*/

mov (c,m);

}

for(i=0;i<MAX;i++)
 s[i]=0;

mul(m,temp,s);

for(i=0;i<MAX;i++)
 c[i]=0;

divt(s,n,w,c);

mov (c,m);/*余数s给m*/

m[MAX-2]=a[MAX-2];/*为后面的汉字显示需要，用第99位做为标记*/

return;
/*/k=temp*k%n;*/

}


int   is_prime_san(int p[MAX] )
{
 
   int i,a[MAX],t[MAX],s[MAX],o[MAX];
   for(i=0;i<MAX;i++)
    s[i]=o[i]=a[i]=t[i]=0;
   t[0]=1;
   t[MAX-1]=1;
   a[0]=2;// { 2,3,5,7 }
   a[MAX-1]=1;

   sub(p,t,s);

   expmod ( a, s, p ,o);
       if ( cmp(o,t) != 0 )
    {
   return 0;
    }

   a[0]=3;
   for(i=0;i<MAX;i++)  o[i]=0;

   expmod ( a, s, p ,o);
       if ( cmp(o,t) != 0 )    
    {
   return 0;
    }

      a[0]=5;
   for(i=0;i<MAX;i++)  o[i]=0;

   expmod ( a, s, p ,o);
   if ( cmp(o,t) != 0 )
   {   
   return 0;
   }

     a[0]=7;
   for(i=0;i<MAX;i++)  o[i]=0;

   expmod ( a, s, p ,o);

  if ( cmp(o,t) != 0 )
  {

   return 0;
  }

  return 1;
}


int coprime(int e[MAX],int s[MAX]) /* 求两个大数之间是否互质*/

{
    int a[MAX],b[MAX],c[MAX],d[MAX],o[MAX],l[MAX];
    int i;
 for(i=0;i<MAX;i++)
  l[i]=o[i]=c[i]=d[i]=0;
 o[0]=0;o[MAX-1]=1;
 l[0]=1;l[MAX-1]=1;
 mov(e,b);
 mov(s,a);
do
{
if(cmp(b,l)==0)
{
    return 1;
}
for(i=0;i<MAX;i++)
 c[i]=0;
 divt(a,b,d,c);
 mov(b,a);/*b--->a*/
 mov(c,b);/*c--->b*/

}while(cmp(c,o)!=0);
/* printf("Ihey are  not coprime!/n");*/
return 0;
}


void prime_random(int *p,int *q)
{
 int i,k;
 time_t t;
  p[0]=1;
  q[0]=3;
 
// p[19]=1;
// q[18]=2;
 
 p[MAX-1]=10;
    q[MAX-1]=11;

 
 do
 {
   t=time(NULL);
    srand((unsigned long)t);
 for(i=1;i<p[MAX-1]-1;i++)
 {
 k=rand()%10;
 p[i]=k;
 }
 k=rand()%10;
 while (k==0)
 {
  k=rand()%10;
 }
 p[p[MAX-1]-1]=k;

 }while((is_prime_san(p))!=1);
  printf("素数 p 为  : ");
    for(i=0;i<p[MAX-1];i++)
 {
 printf("%d",p[p[MAX-1]-i-1]);
 }
    printf("/n/n");
  do
 {
   t=time(NULL);
    srand((unsigned long)t);
 for(i=1;i<q[MAX-1];i++)
 {
 k=rand()%10;
 q[i]=k;
 }

 }while((is_prime_san(q))!=1);
  printf("素数 q 为 : ");
    for(i=0;i<q[MAX-1];i++)
 {
 printf("%d",q[q[MAX-1]-i-1]);
 }
    printf("/n/n");
 return;
}
 
void  erand(int e[MAX],int m[MAX])
{
 int i,k;
 time_t t;
 e[MAX-1]=5;
 printf("随机产生一个与(p-1)*(q-1)互素的 e :");
  do
 {
   t=time(NULL);
    srand((unsigned long)t);
 for(i=0;i<e[MAX-1]-1;i++)
 {
 k=rand()%10;
 e[i]=k;
 }
 while((k=rand()%10)==0)
  k=rand()%10;
 e[e[MAX-1]-1]=k;
 }while(coprime( e, m)!=1);
    for(i=0;i<e[MAX-1];i++)
 {
 printf("%d",e[e[MAX-1]-i-1]);
 }
    printf("/n/n");
 return ;
}

void rsad(int e[MAX],int g[MAX],int *d)
{
 int   r[MAX],n1[MAX],n2[MAX],k[MAX],w[MAX];
 int     i,t[MAX],b1[MAX],b2[MAX],temp[MAX];
 mov(g,n1);
 mov(e,n2);
 for(i=0;i<MAX;i++)
  k[i]=w[i]=r[i]=temp[i]=b1[i]=b2[i]=t[i]=0;
 b1[MAX-1]=0;b1[0]=0;/*/b1=0;*/
 b2[MAX-1]=1;b2[0]=1;/*/b2=1;*/
 while(1)
 {

  for(i=0;i<MAX;i++)
    k[i]=w[i]=0;
  divt(n1,n2,k,w);/*/k=n1/n2;*/
  for(i=0;i<MAX;i++)
  temp[i]=0;
  mul(k,n2,temp);/*/temp=k*n2;*/
    for(i=0;i<MAX;i++)
  r[i]=0;
        sub(n1,temp,r);

  if((r[MAX-1]==1) && (r[0]==0))/*/r=0*/
  {
   break;
  }
  else
  {
   mov(n2,n1);/*/n1=n2;*/
   mov( r,n2);/*/n2=r;*/
   mov(b2, t);/*/t=b2;*/
   for(i=0;i<MAX;i++)
        temp[i]=0;
   mul(k,b2,temp);/*/b2=b1-k*b2;*/
   for(i=0;i<MAX;i++)
        b2[i]=0;
   sub(b1,temp,b2);
   mov(t,b1);
  }
 }

   for(i=0;i<MAX;i++)
    t[i]=0;
   add(b2,g,t);
   for(i=0;i<MAX;i++)
    temp[i]=d[i]=0;
      divt(t,g,temp,d);
    printf("由以上的(p-1)*(q-1)和 e 计算得出的 d : ");
    for(i=0;i<d[MAX-1];i++)
 printf("%d",d[d[MAX-1]-i-1]);
    printf("/n/n");
}

 

 

/*/求解密密钥d的函数(根据Euclid算法)96403770511368768000*/
/*/求解密密钥d的函数(根据Euclid算法)*/
unsigned long  rsa(unsigned long p,unsigned long q,unsigned long e) 

{
unsigned long g,k,r,n1,n2,t;
unsigned long b1=0,b2=1;

 g=(p-1)*(q-1);
 n1=g;
 n2=e;
   
    while(1)
 {
        k=n1/n2;
        r=n1-k*n2;
  if(r!=0)
  {
     n1=n2;
     n2=r;
     t=b2;
     b2=b1-k*b2;
     b1=t;
  }

  else
  {
   break;
  }

 }

    return (g+b2)%g;
}
/*/------------------------------------------导入导出公钥和私钥------------------------------------/*/
void loadpkey(int e[MAX],int n[MAX])  //导入公钥
{
 FILE *fp;
 char filename[25],str[MAX],ch;
 int i,k;
 for(i=0;i<MAX;i++)
  e[i]=n[i]=0;
 while(1)
 {
    printf("/n");
 printf("为导入(e,n)，请输入加密密钥对文件路径: /n");
    scanf("%s",filename);
  if((fp=fopen(filename,"r"))==NULL)
   printf("输入的文件不存在，请重新输入!/n");
  else break;
 }
  k=0;
  while((ch=fgetc(fp))!=EOF)
  { 
  if(ch!=' ')
  {
  str[k]=ch;
              k++;
  }
     else
  {
    for(i=0;i<k;i++)
    {
  e[i]=str[k-i-1]-48;
    }
     e[MAX-1]=k;
     k=0;
  }
 }
   for(i=0;i<k;i++)
  n[i]=str[k-i-1]-48;
  n[MAX-1]=k;
  printf("/n加密密钥 e : ");
  for(i=0;i<e[MAX-1];i++)
  printf("%d",e[e[MAX-1]-i-1]);
  printf("/n");
  printf("/n    公钥 n : ");
  for(i=0;i<n[MAX-1];i++)
  printf("%d",n[n[MAX-1]-i-1]);
  printf("/n");
  fclose(fp);
  printf("/n导入(e,n)成功!/n");
  getchar();
}

void loadskey(int d[MAX],int n[MAX]) //导入私钥
{
 {
 FILE *fp;
 char filename[25],str[MAX],ch;
 int i,k;
 for(i=0;i<MAX;i++)
  d[i]=n[i]=0;
 while(1)
 {
 printf("为导入(d,n)，请输入解密密钥对文件的路径: /n");
    scanf("%s",filename);
  if((fp=fopen(filename,"r"))==NULL)
  {
    printf("输入的文件不存在，请重新输入!/n");  
  }
  else break;
 }
  k=0;
  while((ch=fgetc(fp))!=EOF)
  { 
  if(ch!=' ')
  {
  str[k]=ch;
        k++;
  }
     else
  {
    for(i=0;i<k;i++)
    {
  d[i]=str[k-i-1]-48;
    }
     d[MAX-1]=k;
     k=0;
  }
 }
   for(i=0;i<k;i++)
      n[i]=str[k-i-1]-48;
  n[MAX-1]=k;
  printf("/n解密密钥 d : ");
  for(i=0;i<d[MAX-1];i++)
      printf("%d",d[d[MAX-1]-i-1]);
  printf("/n");
  printf("/n    公钥 n : ");
  for(i=0;i<n[MAX-1];i++)
      printf("%d",n[n[MAX-1]-i-1]);
  printf("/n");
  fclose(fp);
  printf("/n导入(d,n)成功!/n");
  getchar();
}
}

void savepkey(int e[MAX],int n[MAX])//导出公钥
{
    FILE *fp;
  int  i;
 char  savefile[25],ch;
 printf("导出加密密钥(e,n)，存放的文件路径为: ");
    scanf("%s",savefile);
 printf("/n");
    fp=fopen(savefile,"w");
 for(i=0;i<e[MAX-1];i++)
 {
  ch=e[e[MAX-1]-i-1]+48;
  fputc(ch,fp);
 }
 ch=' ';
 fputc(ch,fp);
 for(i=0;i<n[MAX-1];i++)
 {
  ch=n[n[MAX-1]-i-1]+48;
  fputc(ch,fp);
 }
 fclose(fp);
 printf("/n保存(e,n)操作完成!/n");
}

void saveskey(int d[MAX],int n[MAX])//导出私钥
{
    FILE *fp;
  int  i;
 char  savefile[25],ch;
 printf("导出解密密钥(d,n)，存放的文件路径为: ");
    scanf("%s",savefile);
 printf("/n");
    fp=fopen(savefile,"w");
 for(i=0;i<d[MAX-1];i++)
 {
  ch=d[d[MAX-1]-i-1]+48;
  fputc(ch,fp);
 }
 ch=' ';
 fputc(ch,fp);
 for(i=0;i<n[MAX-1];i++)
 {
  ch=n[n[MAX-1]-i-1]+48;
  fputc(ch,fp);
 }
 fclose(fp);
 printf("/n保存(d,n)操作完成!/n");


}

/*/------------------------------------------加密和解密的块------------------------------------/*/

void  printbig(struct slink *h)
{
  struct slink *p;
     int i;
  p=(struct slink * )malloc(LEN);
  p=h;
   if(h!=NULL)
 do
 {
  for(i=0;i<p->bignum[MAX-1];i++)
        printf("%d",p->bignum[p->bignum[MAX-1]-i-1]);
        p=p->next;
 }

 while(p!=NULL);
    printf("/n/n");

 }

void  tencrypto(int e[MAX], int n[MAX])/*//对有需要的文件进行加密*/
{
   FILE *fp;
    int i,k,count,temp,c;
   char filename[25],ch,encryfile[25];
   struct slink  *p,*p1,*p2;
   struct slink  *h;
   h=p=p1=p2=(struct slink * )malloc(LEN);
   h=NULL;
   printf("/n输入需要加密的文件路径 : ");
   scanf("%s",filename);
   if((fp=fopen(filename,"r"))==NULL)
   {
    printf("Cannot open file !/n");
    exit(0);
   }
printf("/n文件的原文内容：/n/n");
   count=0;
   while((ch=fgetc(fp))!=EOF)
   { 
    putchar(ch);
       c=ch;
       k=0;
 if(c<0)
 {
  c=abs(c);/*/把负数取正并且做一个标记*/
  p1->bignum[MAX-2]='0';
 }
 else
 {
  p1->bignum[MAX-2]='1';
 }

 while(c/10!=0)
 {
  temp=c%10;
  c=c/10;
  p1->bignum[k]=temp;
  k++;
 }
 p1->bignum[k]=c;
    p1->bignum[MAX-1]=k+1;
 count=count+1;
 if(count==1)
  h=p1;
 else p2->next=p1;
 p2=p1;
    p1=(struct slink * )malloc(LEN);
 }
    p2->next=NULL;
    printf("/n");
    fclose(fp);

//   printf("加密后文件的保存路径 : /n");
//   scanf("%s",encryfile);
//   fp=fopen(encryfile,"w");
   fp=fopen(filename,"w");
   p=p1=(struct slink * )malloc(LEN);
   p=h;
   printf("/n加密后文件中所形成密文：/n/n");
   if(h!=NULL)
 do
 {
  expmod( p->bignum , e ,n ,p1->bignum);
  ch=p1->bignum[MAX-2];
  printf("%c",ch);
     fputc(ch,fp);
  if ((p1->bignum[MAX-1]/10) ==0)/*/判断p1->bignum[99]的是否大于十；*/
  {
   ch=0+48;
   printf("%c",ch);
   fputc(ch,fp);
   ch=p1->bignum[MAX-1]+48;
   printf("%c",ch);
   fputc(ch,fp);
  }
  else
  {
   ch=p1->bignum[MAX-1]/10+48;
            printf("%c",ch);
   fputc(ch,fp);
   ch=p1->bignum[MAX-1]%10+48;
   printf("%c",ch);
   fputc(ch,fp);
  }

     for(i=0;i<p1->bignum[MAX-1];i++)
     {
   printf("%d",p1->bignum[i]);
         ch=p1->bignum[i]+48;
      fputc(ch,fp);
  }
     p=p->next;
  p1=(struct slink * )malloc(LEN);
 }while(p!=NULL);
 printf("/n/n");
    fclose(fp);
 return;
}

void  tdecrypto(int d[MAX], int n[MAX])
{
 
   FILE *fp;  
 struct slink *h,*p1,*p2;
   char ch,encryfile[25],decryfile[25];
    int i,j,k,c,count,temp;
   printf("/n输入加密过的文件路径 : ");
   scanf("%s",encryfile);
   if((fp=fopen(encryfile,"r"))==NULL)
   {
    printf("此文件不存在!/n");
    exit(0);
   }
   printf("/n文件中密文内容：/n/n");
   i=0;
   j=3;
   count=0;
   h=p1=p2=(struct slink * )malloc(LEN);
  
      while((ch=fgetc(fp))!=EOF)
   { 
    putchar(ch);
       c=ch;   
    if(j==3)
    {
    p1->bignum[MAX-2]=c;
    j--;
    }
    else if(j==2)
    {
     temp=c-48;
     j--;
    }
    else if(j==1)
    {
     p1->bignum[MAX-1]=temp*10+c-48;
     j--;
    }
    else if (j==0)
    {
      p1->bignum[i]=c-48;
         i++;
      if(i==p1->bignum[MAX-1])
     {
      i=0;
      j=3;
      count++;
         if (count==1)
      h=p1;
            else p2->next=p1;
            p2=p1;
               p1=(struct slink * )malloc(LEN);
     }
    }
   }
  p2->next=NULL;
  printf("/n");
    fclose(fp);

 

   fp=fopen(encryfile,"w");
 printf("/n解密密文后文件中的明文:/n/n");
 p2=(struct slink * )malloc(LEN);
    p1=h;
 k=0;
 if(h!=NULL)/*/temp为暂存ASIIC码的int值*/
   do
   {
    for(i=0;i<MAX;i++)
     p2->bignum[i]=0;
    expmod( p1->bignum , d ,n ,p2->bignum);   
    temp=p2->bignum[0]+p2->bignum[1]*10+p2->bignum[2]*100;
  if (( p2->bignum[MAX-2])=='0')
  {
   temp=0-temp;
  }/*/转化为正确的ASIIC码，如-78-96形成汉字 */ 
  ch=temp;/*  str[k]--->ch */
  printf("%c",ch);/*  str[k]--->ch */
  fputc(ch,fp);/*/写入文件str[k]--->ch*/
  k++;
     p1=p1->next;
  p2=(struct slink * )malloc(LEN);
  }while (p1!=NULL);
     printf("/n/n");
        fclose(fp);
return;

}


 struct slink *input(void)/*/输入明文并且返回头指针，没有加密时候转化的数字*/
{  
  struct  slink *head;
  struct  slink *p1,*p2;
     int  i,n,c,temp;
    char  ch;
     n=0;
 p1=p2=(struct slink * )malloc(LEN);
 head=NULL;
 printf("/n请输入你所要加密的内容 : /n");
while((ch=getchar())!='/n')
   {
 i=0;
 c=ch;
 if(c<0)
 {
  c=abs(c);/*/把负数取正并且做一个标记*/
  p1->bignum[MAX-2]='0';
 }
    else
 {
  p1->bignum[MAX-2]='1';
 }
 while(c/10!=0)
 {
  temp=c%10;
  c=c/10;
  p1->bignum[i]=temp;
  i++;
 }
 p1->bignum[i]=c;
    p1->bignum[MAX-1]=i+1;
 n=n+1;
 if(n==1)
  head=p1;
 else p2->next=p1;
 p2=p1;
    p1=(struct slink * )malloc(LEN);
 }
    p2->next=NULL;
 return(head);
}

 

struct slink *jiami(int  e[MAX],int  n[MAX],struct  slink *head)
{
  struct  slink *p;
  struct  slink *h;
     struct  slink *p1,*p2;
     int  m=0,i;
 printf("/n");
  printf("加密后形成的密文内容：/n");
 p1=p2=(struct slink* )malloc(LEN);
 h=NULL;
    p=head;
   if(head!=NULL)
 do
 {
     
  expmod( p->bignum , e ,n ,p1->bignum);

 for(i=0;i<p1->bignum[MAX-1];i++)
 {
  printf("%d",p1->bignum[p1->bignum[MAX-1]-1-i]);
 }

  m=m+1;
 if(m==1)
  h=p1;
 else p2->next=p1;
 p2=p1;
    p1=(struct slink * )malloc(LEN);
    p=p->next;
 } while(p!=NULL);
 p2->next=NULL;  
     p=h;
    printf("/n");

 return(h);
   
}

void jiemi(int d[MAX],int n[MAX],struct  slink *h)
{
     int   i,j,temp;
  struct slink *p,*p1;
  char ch[65535];
  p1=(struct slink* )malloc(LEN);
  p=h;
  j=0;
 
  if(h!=NULL)
  do
 {
  for(i=0;i<MAX;i++)
            p1->bignum[i]=0;

  expmod( p->bignum , d ,n ,p1->bignum);

  temp=p1->bignum[0]+p1->bignum[1]*10+p1->bignum[2]*100;
  if (( p1->bignum[MAX-2])=='0')
  {
   temp=0-temp;
  }
  
   ch[j]=temp;
  j++;
     p=p->next;
 }while (p!=NULL);
 printf("/n");
 printf("解密密文后所生成的明文:/n");
 for(i=0;i<j;i++)
  printf("%c",ch[i]);
 printf("/n");
 return;
 
}


void menu()

{
printf("/n/n/n");
 printf("               R--------产生密钥对      /n/n");
 printf("               S--------保存密钥对      /n/n");
 printf("               L--------载入密钥对      /n/n");
 printf("               E--------对文件加密      /n/n");
 printf("               D--------对文件解密      /n/n");
 printf("               T--------简单测试        /n/n");
 printf("               Q--------退出            /n/n");
 printf("请选择一种操作：");

}

姚军权
关注
  • 0
    点赞
  • 踩
  • 6
    收藏
    觉得还不错? 一键收藏
  • 3
    评论
专栏目录
RSA算法C语言实现
极客剑
11-13 4320
一、源文件三个rsa.h , rsa.c  , main.c //rsa.h #include #define MAX_NUM 63001 #define MAX_PRIME 251 //! 返回代码 #define OK 100 #define ERROR_NOEACHPRIME 101 #define ERROR_NOPUBLICKEY 102 #define ERROR_GENERROR
RSA C语言实现
u012582383的博客
05-14 2354
RSA密钥生成和加解密，前面的C语言实现
RSA加密算法C语言实现
11-11
RSA算法是一种非对称密码算法，所谓非对称，就是指该算法需要一对密钥，使用其中一个加密，则需要用另一个才能解密。 RSA的算法涉及三个参数，n、e1、e2。 其中，n是两个大质数p、q的积，n的二进制表示时所占用的位数，就是所谓的密钥长度。 e1和e2是一对相关的值，e1可以任意取，但要求e1与(p-1)*(q-1)互质;再选择e2，要求(e2×e1)≡1(mod(p-1)×(q-1))。 (n，e1),(n，e2)就是密钥对。其中(n，e1)为公钥，(n，e2)为私钥。 RSA加解密的算法完全相同，设A为明文，B为密文，则:A≡B^e2( mod n);B≡A^e1 (mod n);(公钥加密体制中，一般用公钥加密，私钥解密) e1和e2可以互换使用，即: A≡B^e1 (mod n);B≡A^e2( mod n);
RSA加密算法的C语言实现
01-10
RSA加密算法的C语言实现
RSA加密 C语言实现
04-07
配套博客：https://blog.csdn.net/qq_41739364/article/details/86775886
完整word版-C语言实现RSA算法.doc
11-24
RSA算法C语言实现详解 RSA算法是一种非对称加密算法，由Ron Rivest、Adi Shamir和 Leonard Adleman三人于1977年提出。该算法基于大数分解难题，安全性高，广泛应用于数据加密和数字签名领域。 标题解释 完整word版...
RSA-Tool2 by tE!.zip
08-14
”看起来是一个专门用于处理RSA相关任务的工具集，可能包含有实现RSA算法的各种实用程序。 在RSA算法中，有两个重要的概念：公钥和私钥。公钥可以公开给任何人，用于加密信息；而私钥必须保密，用于解密信息。这种...
RSA-2048算法代码（C++）
07-31
这个C++实现的RSA算法无需依赖外部库，如OpenSSL，使得它更适用于轻量级环境或者自定义安全需求的项目。 RSA算法基于数论中的两个大素数乘积难以分解的原理，即费马小定理和欧拉定理。其基本步骤包括： 1. **密钥...
RSA-Library-C.rar
11-11
非对称加密经典算法REA的C语言实现方式，附带测试Demo。 可以直接被进行调用。 原理： RSA算法是一种非对称密码算法，所谓非对称，就是指该算法需要一对密钥，使用其中一个加密，则需要用另一个才能解密。 RSA...
小巧而快速的RSA公钥算法C语言实现
04-10
通过这份源码，也许不能让你彻底明白RSA原理，但是足可以让你彻底学会如何使用RSA。 精品源码，你值得拥有！ 源文件列表如下： bignum.cpp, bignum.h bn_mul.h md.cpp, md.h md_wrap.cpp, md_wrap.h md2.cpp, ...
RSA算法纯C语言代码实现，带测试demo
11-13
非对称加密算法，RSA算法纯C语言代码实现，带测试demo
rsa用c语言实现
11-23
很好用！可以试试看！
RSA算法C语言实现.zip
09-25
C语言实现的RSA算法源码 Visual Studio工程 支持公钥加解密 私钥加解密
RSA密码基于C的code实现
07-16
包含三个文件夹，①ProducePerim是素数的产生实现，为大素数p、q提供来源②ProduceKey是RSA秘钥的产生过程实现③EnDeCryption为加密解密过程（以文件加密为例，虽然文件加密不是RSA的主要用途）
RSA算法1024位C语言实现
05-17
RSA算法的C实现，支持1024。RSA算法的C实现，支持1024。
RSA加密算法(C语言实现）
热门推荐
萧海的博客
07-02 1万+
这次轮到RSA加密算法了。RSA加密过程相对DES和MD5要简单很多，但作为现在还在使用的加密算法之一，它还是有需要认真思索的地方哒~ 首先是密钥对的生成： （1）选取两个大素数p和q（目前两个数的长度都接近512bit是安全的） （2）计算乘积n=p*q，Φ(n)=(p-1)(q-1)，其中Φ(n)为n的欧拉函数（因为两素数乘积的欧拉函数等于两数分别减一后的乘积） （3）随机选取整数e（1<e<Φ(n)）作为公钥d，要求满足e与Φ(n)的最大公约数为1，即两者互素 （4）用Eucli
C语言实现简单的RSA算法
weixin_45935838的博客
05-22 1万+
C语言实现简单的RSA算法 实验内容： 1、输入两个素数，然后生成一个随机数，计算出随机数的逆元，然后保存这些信息； 2、选择加密，则输入明文，输出密文； 3、选择解密，则输入密文，输出明文。 （要求有必要的文字说明，比如选取的两个素数，随机数，逆元等都需要显示） 代码： #include<stdio.h> #include<stdlib.h> #include <time.h> #include<math.h> char text[100]; int res
rsa算法c 语言实现,(完整版)RSA算法C语言代码
weixin_34312149的博客
05-19 3278
《(完整版)RSA算法C语言代码》由会员分享，可在线阅读，更多相关《(完整版)RSA算法C语言代码(5页珍藏版)》请在人人文库网上搜索。1、include #include #include #include #include char s100,*c; int n,e,d,i,C,j,k=0,len; int str100,b30; unsigned gcd(unsigned a, unsign...
C语言RSA算法实现（基于Mbedtls）
m0_63099094的博客
11-06 935
ADD_LIBRARY(authoal STATIC ${SRC_LIST_DECRYPT_LIB}) ADD_EXECUTABLE(eaidkAuth ${SRC_LIST_ENCRYPT_BIN}) 工程结构如下： 引入完成之后我们就可以开始RSA代码编写。 3、RSA代码编写 authref.h 头文件代码如下： #ifndef AUTHREF_H #define AUTHREF_H #include <assert.h> #include <stdio.h> #includ
rsa-crt算法实现代码
最新发布
02-07
下面是 RSA-CRT 算法的 Python 代码实现： ```python # RSA-CRT 算法 # 首先，需要安装 python-gmpy2 库 # 可以使用 pip install gmpy2 命令安装 import gmpy2 # 计算 dp、dq 和 qinv def rsa_crt_params(p, q, e...
评论 3
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值