开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > Internet/网络编程 > 网格计算 > 查看源码
des.c
资源名称：339068DESDemo.zip　[点击查看]
上传用户：sunzhixin
上传日期：2013-05-29
资源大小：17k
文件大小：10k
源码类别：

网格计算

开发平台：

Visual C++

des.c：源码内容
  1. /*********************************************************************/
  2. /*-文件名：des.c  */
  3. /*-  */
  4. /*-功能： 实现DES加密算法的加密解密功能       */
  5. /*-  */
  6. /*-说明：des算法的实现代码  */
  7. /*- 能够实现56位或56*n密钥的des算法，可以通过该程序提供的接口    */
  8. /*- 进行数据的加密，保证数据在传送过程的安全性  */
  9. /*-  */
  10. /*-  */
  11. /*-该程序的所有权利由作者保留                  */
  12. /*-      */
  13. /*-      */
  14. /*-版本号：1.0.0(2002.4)  */
  15. /*-  */
  16. /*-  */
  17. /*-AUTHOR:吴真(WUZHEN)  */
  18. /*-  */
  19. /*********************************************************************/
  20. #include <stdlib.h>
  21. #include <stdio.h>
  22. #include <string.h>
  23. #include <memory.h>
  24. #include <malloc.h>
  25. #include "des.h"
  27. #define SUCCESS 0 
  28. #define FAIL -1
  30. #define READFILESIZE 512
  32. #define WZ_COMMEND_NUM 4
  33. #define WZUSEHELPNUM 19
  34. #define DESONE 1
  35. #define DESTHREE 2
  36. #define DESMULTI 3
  37. INT8 *WZ_Commend_Help[] =
  38. {
  40. "基于DES的加密解密工具v1.0  ",/*0*/
  41. "追求卓越,勇于创新  ",
  42. "----著者 :  吴真---  ",
  43. "     "
  44. };
  46. INT8 *WZ_USE_HELP[]={
  47. "输入5+n个参数:",
  48. "t1.可执行文件名 *.exe",
  49. "t2.操作类型 1:一层加密;2:一层解密;",
  50. "tt13:N层单密钥加密;23:N层单密钥解密;",
  51. "tt39:N层多密钥加密;49:N层多密钥解密",
  52. "t3.读出数据的文件名*.txt",
  53. "t4.写入数据的文件名*.txt",
  54. "t5.密钥(8字节例如:wuzhen12)",
  55. "t[6].N层单密钥的层数或者...二层加密|解密密钥",
  56. "t[7].三层加密|解密密钥",
  57. "t[8]. ...",
  58. "t[N].N层加密|解密密钥",
  59. "t 例1: des 1 1.txt 2.txt 12345678",
  60. "t    : des 2 2.txt 3.txt 12345678",
  61. "t 例2: des 13 1.txt 2.txt tiantian 5",
  62. "t    : des 23 2.txt 3.txt tiantian 5",
  63. "t 例3: des 39 1.txt 2.txt 12345678 tiantian gaoxinma",
  64. "t    : des 49 2.txt 3.txt 12345678 tiantian gaoxinma",
  65. "******************************"
  66. };
  70. INT32 hextofile( ULONG8 *buf ,FILE *writefile, ULONG32 length);/*以16进制写入文件*/
  71. INT32 encodehex(ULONG8 *tobuf,ULONG8 *frombuf,ULONG32 len);/*16进制解码*/
  73. INT32 file_enc(FILE *readfile,FILE *writefile,
  74.    ULONG8 *key,ULONG32 keynum,
  75.    ULONG8 **superkey,ULONG32 n_superkey,
  76.    ULONG8 flag);
  77. INT32 file_dec(FILE *readfile,FILE *writefile,
  78.    ULONG8 *key,ULONG32 keynum,
  79.    ULONG8 **superkey,ULONG32 n_superkey,
  80.    ULONG8 flag);
  81. void wz_print_help();
  84. INT32 main(INT32 argc,INT8 *argv[])
  85. {
  86. INT8 *FILENAME1,*FILENAME2;    
  87. FILE *fp, *fp2;
  88. ULONG8 *key ;
  89. ULONG8 **superkey ;/*n层加密解密密钥*/
  90. ULONG8 n_superkey ;
  91. ULONG32 num;     
  94. if ( argc >= 5 && (atoi(argv[1]) == 39 || atoi(argv[1]) == 49 ) )
  95. {
  96. n_superkey = argc - 4 ;
  97. superkey = ( INT8 **)calloc(1, n_superkey*sizeof( void *) ) ;
  98. for ( num = 0 ; num < n_superkey ; num++)
  99. {
  100. superkey[num] = argv[4+num] ;
  101. }
  103. }
  104. else if ( argc == 6 && (atoi(argv[1]) == 13 || atoi(argv[1]) == 23 ) && (atoi(argv[5])) > 0)
  105. {
  107. }
  108. else if ( argc == 5 && ( atoi(argv[1]) == 1 || atoi(argv[1]) == 2 ))
  109. {
  111. }
  112. else
  113. {
  114. wz_print_help();
  115. return FAIL;
  116. }
  117. FILENAME1 = argv[2];
  118. FILENAME2 = argv[3];
  119. if ((fp= fopen(FILENAME1,"rb")) == NULL || (fp2 = fopen(FILENAME2,"wb"))==NULL)
  120. {
  122. printf("Can't open filen");
  123. return FAIL;
  124. }  
  126.     key = argv[4] ;
  127. switch( atoi(argv[1] ))
  128. {
  129. case 1: /*加密*/
  130. file_enc(fp,fp2,key,0, NULL,0, DESONE);
  131. printf("n tDES 一层加密完毕,密文存于%s文件n",FILENAME2);
  132. break;
  133. case 2:
  134. file_dec(fp,fp2,key,0, NULL, 0,DESONE);
  135. printf("n tDES 一层解密完毕,密文存于%s文件n",FILENAME2);
  136. break;
  137. case 13:
  138. file_enc(fp,fp2,key,atoi(argv[5]),NULL,0,DESTHREE);
  139. printf("n tDES %u层单密钥加密完毕,密文存于%s文件n",atoi(argv[5]),FILENAME2);
  140. break;
  141. case 23:
  142. file_dec(fp,fp2,key,atoi(argv[5]),NULL,0,DESTHREE);
  143. printf("n tDES %u层单密钥解密完毕,密文存于%s文件n",atoi(argv[5]),FILENAME2);
  144. break;
  145. case 39:
  146. file_enc(fp,fp2,NULL,0,superkey,n_superkey,DESMULTI);
  147. printf("n tDES 多密钥加密完毕,密文存于%s文件n",FILENAME2);
  148. free(superkey);
  149. superkey = NULL;
  150. break;
  151. case 49:
  152. file_dec(fp,fp2,NULL,0,superkey,n_superkey,DESMULTI);
  153. printf("n tDES 多密钥加密完毕,密文存于%s文件n",FILENAME2);
  154. free(superkey);
  155. superkey = NULL;
  156. break;
  157. default:
  158. printf("请选择是加密|解密 plese choose encrypt|deencryptn");
  159. break;
  160. }
  162. fclose(fp);
  163. fclose(fp2);
  164. return SUCCESS;
  166. }
  168. void wz_print_help()
  169. {
  170. INT32 i ;
  171. printf("t");
  172. for (  i = 0 ; i < 22 ; i++)
  173. {
  174. printf("%c ",5);
  175. }
  176. printf("n");
  177. for( i = 0 ; i < WZ_COMMEND_NUM ; i++)
  178. {
  179. printf("t%ct%s %cn",5,WZ_Commend_Help[i],5);
  180. }
  181. printf("t");
  182. for (  i = 0 ; i < 22 ; i++)
  183. {
  184. printf("%c ",5);
  185. }
  186. printf("n");
  187. for( i = 0 ; i < WZUSEHELPNUM ; i++)
  188. {
  189. printf("t%sn",WZ_USE_HELP[i]);
  190. }
  191. return ;
  192. }
  194. INT32 file_enc(FILE *readfile,FILE *writefile,
  195.    ULONG8 *key,ULONG32 keynum,
  196.    ULONG8 **superkey,ULONG32 n_superkey,
  197.    ULONG8 flag)
  198. {
  199. INT32 filelen = 0,readlen = 0,writelen = 0;
  200. ULONG32 totalfilelen = 0 ;/*统计实际的文件的长度*/
  201. ULONG8 readbuf[READFILESIZE] = { 0 };
  202. filelen = fread( readbuf, sizeof( INT8 ), READFILESIZE, readfile );
  203. while( filelen == READFILESIZE )
  204. {
  205. totalfilelen += READFILESIZE;
  206. switch(flag)
  207. {
  208. case DESONE:
  209. des( readbuf,key,READFILESIZE);
  210. break;
  211. case DESTHREE:
  212. des3( readbuf, key ,keynum,READFILESIZE);
  213. break;
  214. case DESMULTI:
  215. desN( readbuf, superkey ,n_superkey,READFILESIZE);
  216. break;
  217. }
  218. hextofile( readbuf, writefile, READFILESIZE );/*以16进制形式写入文件*/
  219. memset(readbuf,0,READFILESIZE);
  220. filelen = fread( readbuf, sizeof( INT8 ), READFILESIZE, readfile );
  221. }
  222. /*这是从文件中读出的最后一批数据,长度可能会等于0,所以要先判断*/
  224. if ( filelen > 0 )
  225. {
  226. /*如果从文件中读出的长度不等于0,那么肯定有8个字节以上的空间
  227. 文件长度存在最后8个字节中*/
  228. totalfilelen += filelen;
  229. memcpy( &readbuf[READFILESIZE-8], (ULONG8*)&totalfilelen,4);
  230. switch(flag)
  231. {
  232. case DESONE:
  233. des( readbuf,key,READFILESIZE);
  234. break;
  235. case DESTHREE:
  236. des3( readbuf, key ,keynum,READFILESIZE);
  237. break;
  238. case DESMULTI:
  239. desN( readbuf, superkey ,n_superkey,READFILESIZE);
  240. break;
  241. }
  242. hextofile( readbuf, writefile,READFILESIZE );/*以16进制形式写入文件*/
  243. memset(readbuf,0 ,READFILESIZE);
  244. }
  245. else /*filelen == 0*/
  246. {
  247. memcpy( &readbuf[0], (ULONG8*)&totalfilelen,4);
  248. switch(flag)
  249. {
  250. case DESONE:
  251. des( readbuf,key,8);
  252. break;
  253. case DESTHREE:
  254. des3( readbuf, key ,keynum,8);
  255. break;
  256. case DESMULTI:
  257. desN( readbuf, superkey ,n_superkey,8);
  258. break;
  259. }
  260. hextofile( readbuf, writefile, 8);/*以16进制形式写入文件*/
  261. }
  262. return SUCCESS;
  263. }
  267. INT32 file_dec(FILE *readfile,FILE *writefile,
  268.    ULONG8 *key,ULONG32 keynum,
  269.    ULONG8 **superkey,ULONG32 n_superkey,
  270.    ULONG8 flag)
  271. {
  272. INT32 filelen = 0,readlen = 0,writelen = 0;
  273. ULONG32 totalfilelen = 0 ;/*统计实际的文件的长度*/
  274. INT32 num = 0;
  275. ULONG8 readbuf[READFILESIZE] = { 0 };
  276. ULONG8 sendbuf[READFILESIZE*2] = { 0 };
  278. fseek(readfile,-16,SEEK_END);/*最后16个字节的表示文件长度的空间*/
  279. filelen = fread( sendbuf, sizeof( INT8 ), 16, readfile );
  280. encodehex( readbuf,sendbuf,8);
  281. switch(flag)
  282. {
  283. case DESONE:
  284. Ddes( readbuf,key,8);
  285. break;
  286. case DESTHREE:
  287. Ddes3( readbuf, key ,keynum,8);
  288. break;
  289. case DESMULTI:
  290. DdesN( readbuf, superkey ,n_superkey,8);
  291. break;
  292. }
  293. /*解密*/
  294. memcpy((ULONG8*)&totalfilelen, &readbuf[0],4);/*得到文件总长*/
  295. memset(readbuf,0 ,8);
  296. memset(sendbuf,0 ,16);
  297.     
  298. num = totalfilelen/READFILESIZE;/*有几个READFILESIZE组*/
  299. totalfilelen %= READFILESIZE;
  301. fseek(readfile,0,SEEK_SET);/*跳到文件头*/
  302. while(num--)
  303. {
  304. filelen = fread( sendbuf, sizeof( INT8 ), READFILESIZE*2, readfile );
  305. encodehex( readbuf,sendbuf,READFILESIZE);
  306. switch(flag)
  307. {
  308. case DESONE:
  309. Ddes( readbuf,key,READFILESIZE);
  310. break;
  311. case DESTHREE:
  312. Ddes3( readbuf, key ,keynum,READFILESIZE);
  313. break;
  314. case DESMULTI:
  315. DdesN( readbuf, superkey ,n_superkey,READFILESIZE);
  316. break;
  317. }
  319. writelen = fwrite(readbuf, sizeof( INT8 ), READFILESIZE, writefile);   
  320. memset(readbuf,0 ,READFILESIZE);
  321. memset(sendbuf,0 ,READFILESIZE*2);
  322. }
  323. if ( totalfilelen > 0 )/*最后一块有多余的元素*/
  324. {
  325. filelen = fread( sendbuf, sizeof( INT8 ), READFILESIZE*2, readfile );
  326. encodehex( readbuf,sendbuf,READFILESIZE);
  327. switch(flag)
  328. {
  329. case DESONE:
  330. Ddes( readbuf,key,READFILESIZE);
  331. break;
  332. case DESTHREE:
  333. Ddes3( readbuf, key ,keynum,READFILESIZE);
  334. break;
  335. case DESMULTI:
  336. DdesN( readbuf, superkey ,n_superkey,READFILESIZE);
  337. break;
  338. }
  339. writelen = fwrite(readbuf, sizeof( INT8 ), totalfilelen, writefile);
  340. memset(readbuf,0 ,READFILESIZE);
  341. memset(sendbuf,0 ,READFILESIZE*2);
  343. }
  344. return SUCCESS;
  345. }
  347. INT32 hextofile( ULONG8 *buf ,FILE *writefile, ULONG32 length)
  348. {
  349. ULONG32 writelen = 0 ;
  350. /*以16进制形式写入文件*/
  351.     while( writelen < length)
  352. {
  353. if(buf[writelen] == 0)
  354. {
  355. fprintf( writefile, "%x", 0 );
  356. fprintf( writefile, "%x", 0 );
  357. }
  358. else if (buf[writelen] < 0x10)
  359. {
  360. fprintf( writefile, "%x", 0 );
  361. fprintf( writefile, "%x", buf[writelen] );
  362. }
  363. else
  364. {
  365. fprintf( writefile, "%x", buf[writelen] );
  367. }
  368. writelen++;
  370. }
  371. return SUCCESS;
  372. }
  373. INT32 encodehex(ULONG8 *tobuf,ULONG8 *frombuf,ULONG32 len)
  374. {
  375. ULONG8 *readfirst = frombuf ;
  376. ULONG8 *readend = &frombuf[1] ;
  377. INT8 *s;
  378. ULONG8 y[2] ;     
  379. ULONG32 i;
  380. for ( i = 0 ; i < len ; i++)
  381. {
  382. y[0] = *readfirst ;
  383. y[1] = *readend ;
  384. readfirst += 2 ;
  385. readend += 2 ;
  386. tobuf[i] = (ULONG8)strtol((INT8*)y, &s, 16);
  387. }
  388. return SUCCESS;
  389. }