rsa公钥加密程序，可加密文件

rsa加密程序，可加密文件，vc6下编写，使用的密钥格式见rsa密钥生成程序

/******************************************************************************/
/*                                                                            */
/*  Requirements:                                                             */
/*                                                                            */
/*  sizeof （ULONG）  == 4                                                      */
/*  sizeof （USHORT） == 2                                                      */
/*                                                                            */
/******************************************************************************/

#ifndef FLINT_ANSI
#define FLINT_ANSI
#endif

#include 
#include 
#include 
#include 

#include “flint.h“

#define NO_ASSERTS 1



#ifdef FLINT_DEBUG
#undef NO_ASSERTS
#define ASSERT_LOG_AND_QUIT
#include “_assert.h“
#include “_alloc.h“
#ifdef COVERAGE
#include “utclog.h“
#endif
#endif

#ifdef NO_ASSERTS
#define Assert（a） （void）0
#endif


/* Mute wrap up error messages of PC-lint */
/*lint -esym（14addsubmulumulsqr）   */
/*lint -esym（15addsubmulumulsqr）   */
/*lint -esym（515addsubmulumulsqr）  */
/*lint -esym（516addsubmulumulsqr）  */
/*lint -esym（532addsubmulumulsqr）  */
/*lint -esym（533addsubmulumulsqr）  */
/*lint -esym（1066addsubmulumulsqr） */
/*lint -esym（534add_lsub_lmul_lsqr_ldiv_lmmul_lmsub_ldec_lmadd_l） */
/*lint -esym（534msqr_lmexp_lmexp5_lmexpk_lmod_lmod2_lmexp2_l） */


/***********  Prototypes of local functions ***********************************/

/* Private register functions */
static void
destroy_reg_l （void）;
static int
allocate_reg_l （void）;
/* Integer square roots from ULONG values */
static ULONG
ul_iroot （unsigned long n）;

#ifdef FLINT_SECURE
#define PURGEVARS_L（X） purgevars_l X
/* Function to purge variables */
static void purgevars_l （int noofvars ...）;
#ifdef FLINT_DEBUG
#define ISPURGED_L（X） Assert（ispurged_l X）
/* Function to check whether variables have been purged */
static int ispurged_l （int noofvars ...）;
#else
#define ISPURGED_L（X） （void）0
#endif /* FLINT_DEBUG */
#else
#define PURGEVARS_L（X） （void）0
#define ISPURGED_L（X） （void）0
#endif /* FLINT_SECURE */
/******************************************************************************/

/* CLINT-Constant Values */
clint __FLINT_API_DATA
nul_l[] = {0 0 0 0 0};
clint __FLINT_API_DATA
one_l[] = {1 1 0 0 0};
clint __FLINT_API_DATA
two_l[] = {1 2 0 0 0};



/******************************************************************************/
/*                                                                            */
/*  Function:   Initialization of FLINT/C-Library                             */
/*              If the FLINT/C functions are provided as DLL                  */
/*              the function initializing the DLL e. g. DllMain（）

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

     文件       8290  2007-10-21 19:29  rsa公钥加密\RSAencrp\cipher.txt

     文件     222889  2007-08-09 12:54  rsa公钥加密\RSAencrp\flint.c

     文件      21944  2007-08-09 12:54  rsa公钥加密\RSAencrp\flint.h

     文件      73806  2007-08-09 12:54  rsa公钥加密\RSAencrp\flintpp.cpp

     文件      20694  2007-08-09 12:54  rsa公钥加密\RSAencrp\flintpp.h

     文件       3615  2007-10-20 18:00  rsa公钥加密\RSAencrp\ReadMe.txt

     文件       1078  2007-10-20 18:00  rsa公钥加密\RSAencrp\res\RSAencrp.ico

     文件        400  2007-10-20 18:00  rsa公钥加密\RSAencrp\res\RSAencrp.rc2

     文件        962  2007-10-20 18:08  rsa公钥加密\RSAencrp\Resource.h

     文件      33815  2007-08-09 12:54  rsa公钥加密\RSAencrp\ripemd.c

     文件       6177  2007-08-09 12:54  rsa公钥加密\RSAencrp\ripemd.h

     文件      21348  2007-10-22 16:17  rsa公钥加密\RSAencrp\RSAencrp.aps

     文件       1422  2007-10-22 17:05  rsa公钥加密\RSAencrp\RSAencrp.clw

     文件       2091  2007-10-20 18:00  rsa公钥加密\RSAencrp\RSAencrp.cpp

     文件       4701  2007-10-20 18:12  rsa公钥加密\RSAencrp\RSAencrp.dsp

     文件        541  2007-10-20 18:00  rsa公钥加密\RSAencrp\RSAencrp.dsw

     文件       1346  2007-10-20 18:00  rsa公钥加密\RSAencrp\RSAencrp.h

     文件     140288  2007-10-22 17:06  rsa公钥加密\RSAencrp\RSAencrp.ncb

     文件     173568  2007-10-22 17:06  rsa公钥加密\RSAencrp\RSAencrp.opt

     文件       1191  2007-10-22 17:05  rsa公钥加密\RSAencrp\RSAencrp.plg

     文件       5726  2007-10-21 19:27  rsa公钥加密\RSAencrp\RSAencrp.rc

     文件       8898  2007-10-22 17:05  rsa公钥加密\RSAencrp\RSAencrpDlg.cpp

     文件       1634  2007-10-20 18:10  rsa公钥加密\RSAencrp\RSAencrpDlg.h

     文件      17568  2007-10-21 12:37  rsa公钥加密\RSAencrp\rsakey.cpp

     文件       2439  2007-10-21 10:56  rsa公钥加密\RSAencrp\rsakey.h

     文件        210  2007-10-20 18:00  rsa公钥加密\RSAencrp\StdAfx.cpp

     文件       1054  2007-10-20 18:00  rsa公钥加密\RSAencrp\StdAfx.h

     目录          0  2007-10-23 12:24  rsa公钥加密\RSAencrp\res

     目录          0  2007-10-23 12:24  rsa公钥加密\RSAencrp

     目录          0  2007-10-23 12:24  rsa公钥加密

............此处省略3个文件信息