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

源码开发语言/平台
当前位置：首页 > 源码/资料 > 游戏 > 其他游戏 > 查看源码
asn1_par.c
资源名称：wow-313-source.rar　[点击查看]
上传用户：yisoukefu
上传日期：2020-08-09
资源大小：39506k
文件大小：11k
源码类别：

其他游戏

开发平台：

Visual C++

asn1_par.c：源码内容
  1. /* crypto/asn1/asn1_par.c */
  2. /* Copyright (C) 1995-1998 Eric Young (eay@cryptsoft.com)
  3.  * All rights reserved.
  4.  *
  5.  * This package is an SSL implementation written
  6.  * by Eric Young (eay@cryptsoft.com).
  7.  * The implementation was written so as to conform with Netscapes SSL.
  8.  * 
  9.  * This library is free for commercial and non-commercial use as long as
  10.  * the following conditions are aheared to.  The following conditions
  11.  * apply to all code found in this distribution, be it the RC4, RSA,
  12.  * lhash, DES, etc., code; not just the SSL code.  The SSL documentation
  13.  * included with this distribution is covered by the same copyright terms
  14.  * except that the holder is Tim Hudson (tjh@cryptsoft.com).
  15.  * 
  16.  * Copyright remains Eric Young's, and as such any Copyright notices in
  17.  * the code are not to be removed.
  18.  * If this package is used in a product, Eric Young should be given attribution
  19.  * as the author of the parts of the library used.
  20.  * This can be in the form of a textual message at program startup or
  21.  * in documentation (online or textual) provided with the package.
  22.  * 
  23.  * Redistribution and use in source and binary forms, with or without
  24.  * modification, are permitted provided that the following conditions
  25.  * are met:
  26.  * 1. Redistributions of source code must retain the copyright
  27.  *    notice, this list of conditions and the following disclaimer.
  28.  * 2. Redistributions in binary form must reproduce the above copyright
  29.  *    notice, this list of conditions and the following disclaimer in the
  30.  *    documentation and/or other materials provided with the distribution.
  31.  * 3. All advertising materials mentioning features or use of this software
  32.  *    must display the following acknowledgement:
  33.  *    "This product includes cryptographic software written by
  34.  *     Eric Young (eay@cryptsoft.com)"
  35.  *    The word 'cryptographic' can be left out if the rouines from the library
  36.  *    being used are not cryptographic related :-).
  37.  * 4. If you include any Windows specific code (or a derivative thereof) from 
  38.  *    the apps directory (application code) you must include an acknowledgement:
  39.  *    "This product includes software written by Tim Hudson (tjh@cryptsoft.com)"
  40.  * 
  41.  * THIS SOFTWARE IS PROVIDED BY ERIC YOUNG ``AS IS'' AND
  42.  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  43.  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  44.  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
  45.  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  46.  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  47.  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  48.  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  49.  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  50.  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  51.  * SUCH DAMAGE.
  52.  * 
  53.  * The licence and distribution terms for any publically available version or
  54.  * derivative of this code cannot be changed.  i.e. this code cannot simply be
  55.  * copied and put under another distribution licence
  56.  * [including the GNU Public Licence.]
  57.  */
  59. #include <stdio.h>
  60. #include "cryptlib.h"
  61. #include <openssl/buffer.h>
  62. #include <openssl/objects.h>
  63. #include <openssl/asn1.h>
  65. static int asn1_print_info(BIO *bp, int tag, int xclass,int constructed,
  66. int indent);
  67. static int asn1_parse2(BIO *bp, const unsigned char **pp, long length,
  68. int offset, int depth, int indent, int dump);
  69. static int asn1_print_info(BIO *bp, int tag, int xclass, int constructed,
  70.      int indent)
  71. {
  72. static const char fmt[]="%-18s";
  73. static const char fmt2[]="%2d %-15s";
  74. char str[128];
  75. const char *p,*p2=NULL;
  77. if (constructed & V_ASN1_CONSTRUCTED)
  78. p="cons: ";
  79. else
  80. p="prim: ";
  81. if (BIO_write(bp,p,6) < 6) goto err;
  82. BIO_indent(bp,indent,128);
  84. p=str;
  85. if ((xclass & V_ASN1_PRIVATE) == V_ASN1_PRIVATE)
  86. BIO_snprintf(str,sizeof str,"priv [ %d ] ",tag);
  87. else if ((xclass & V_ASN1_CONTEXT_SPECIFIC) == V_ASN1_CONTEXT_SPECIFIC)
  88. BIO_snprintf(str,sizeof str,"cont [ %d ]",tag);
  89. else if ((xclass & V_ASN1_APPLICATION) == V_ASN1_APPLICATION)
  90. BIO_snprintf(str,sizeof str,"appl [ %d ]",tag);
  91. else if (tag > 30)
  92. BIO_snprintf(str,sizeof str,"<ASN1 %d>",tag);
  93. else
  94. p = ASN1_tag2str(tag);
  96. if (p2 != NULL)
  97. {
  98. if (BIO_printf(bp,fmt2,tag,p2) <= 0) goto err;
  99. }
  100. else
  101. {
  102. if (BIO_printf(bp,fmt,p) <= 0) goto err;
  103. }
  104. return(1);
  105. err:
  106. return(0);
  107. }
  109. int ASN1_parse(BIO *bp, const unsigned char *pp, long len, int indent)
  110. {
  111. return(asn1_parse2(bp,&pp,len,0,0,indent,0));
  112. }
  114. int ASN1_parse_dump(BIO *bp, const unsigned char *pp, long len, int indent, int dump)
  115. {
  116. return(asn1_parse2(bp,&pp,len,0,0,indent,dump));
  117. }
  119. static int asn1_parse2(BIO *bp, const unsigned char **pp, long length, int offset,
  120.      int depth, int indent, int dump)
  121. {
  122. const unsigned char *p,*ep,*tot,*op,*opp;
  123. long len;
  124. int tag,xclass,ret=0;
  125. int nl,hl,j,r;
  126. ASN1_OBJECT *o=NULL;
  127. ASN1_OCTET_STRING *os=NULL;
  128. /* ASN1_BMPSTRING *bmp=NULL;*/
  129. int dump_indent;
  131. #if 0
  132. dump_indent = indent;
  133. #else
  134. dump_indent = 6; /* Because we know BIO_dump_indent() */
  135. #endif
  136. p= *pp;
  137. tot=p+length;
  138. op=p-1;
  139. while ((p < tot) && (op < p))
  140. {
  141. op=p;
  142. j=ASN1_get_object(&p,&len,&tag,&xclass,length);
  143. #ifdef LINT
  144. j=j;
  145. #endif
  146. if (j & 0x80)
  147. {
  148. if (BIO_write(bp,"Error in encodingn",18) <= 0)
  149. goto end;
  150. ret=0;
  151. goto end;
  152. }
  153. hl=(p-op);
  154. length-=hl;
  155. /* if j == 0x21 it is a constructed indefinite length object */
  156. if (BIO_printf(bp,"%5ld:",(long)offset+(long)(op- *pp))
  157. <= 0) goto end;
  159. if (j != (V_ASN1_CONSTRUCTED | 1))
  160. {
  161. if (BIO_printf(bp,"d=%-2d hl=%ld l=%4ld ",
  162. depth,(long)hl,len) <= 0)
  163. goto end;
  164. }
  165. else
  166. {
  167. if (BIO_printf(bp,"d=%-2d hl=%ld l=inf  ",
  168. depth,(long)hl) <= 0)
  169. goto end;
  170. }
  171. if (!asn1_print_info(bp,tag,xclass,j,(indent)?depth:0))
  172. goto end;
  173. if (j & V_ASN1_CONSTRUCTED)
  174. {
  175. ep=p+len;
  176. if (BIO_write(bp,"n",1) <= 0) goto end;
  177. if (len > length)
  178. {
  179. BIO_printf(bp,
  180. "length is greater than %ldn",length);
  181. ret=0;
  182. goto end;
  183. }
  184. if ((j == 0x21) && (len == 0))
  185. {
  186. for (;;)
  187. {
  188. r=asn1_parse2(bp,&p,(long)(tot-p),
  189. offset+(p - *pp),depth+1,
  190. indent,dump);
  191. if (r == 0) { ret=0; goto end; }
  192. if ((r == 2) || (p >= tot)) break;
  193. }
  194. }
  195. else
  196. while (p < ep)
  197. {
  198. r=asn1_parse2(bp,&p,(long)len,
  199. offset+(p - *pp),depth+1,
  200. indent,dump);
  201. if (r == 0) { ret=0; goto end; }
  202. }
  203. }
  204. else if (xclass != 0)
  205. {
  206. p+=len;
  207. if (BIO_write(bp,"n",1) <= 0) goto end;
  208. }
  209. else
  210. {
  211. nl=0;
  212. if ( (tag == V_ASN1_PRINTABLESTRING) ||
  213. (tag == V_ASN1_T61STRING) ||
  214. (tag == V_ASN1_IA5STRING) ||
  215. (tag == V_ASN1_VISIBLESTRING) ||
  216. (tag == V_ASN1_UTCTIME) ||
  217. (tag == V_ASN1_GENERALIZEDTIME))
  218. {
  219. if (BIO_write(bp,":",1) <= 0) goto end;
  220. if ((len > 0) &&
  221. BIO_write(bp,(const char *)p,(int)len)
  222. != (int)len)
  223. goto end;
  224. }
  225. else if (tag == V_ASN1_OBJECT)
  226. {
  227. opp=op;
  228. if (d2i_ASN1_OBJECT(&o,&opp,len+hl) != NULL)
  229. {
  230. if (BIO_write(bp,":",1) <= 0) goto end;
  231. i2a_ASN1_OBJECT(bp,o);
  232. }
  233. else
  234. {
  235. if (BIO_write(bp,":BAD OBJECT",11) <= 0)
  236. goto end;
  237. }
  238. }
  239. else if (tag == V_ASN1_BOOLEAN)
  240. {
  241. int ii;
  243. opp=op;
  244. ii=d2i_ASN1_BOOLEAN(NULL,&opp,len+hl);
  245. if (ii < 0)
  246. {
  247. if (BIO_write(bp,"Bad booleann",12))
  248. goto end;
  249. }
  250. BIO_printf(bp,":%d",ii);
  251. }
  252. else if (tag == V_ASN1_BMPSTRING)
  253. {
  254. /* do the BMP thang */
  255. }
  256. else if (tag == V_ASN1_OCTET_STRING)
  257. {
  258. int i,printable=1;
  260. opp=op;
  261. os=d2i_ASN1_OCTET_STRING(NULL,&opp,len+hl);
  262. if (os != NULL && os->length > 0)
  263. {
  264. opp = os->data;
  265. /* testing whether the octet string is
  266.  * printable */
  267. for (i=0; i<os->length; i++)
  268. {
  269. if (( (opp[i] < ' ') &&
  270. (opp[i] != 'n') &&
  271. (opp[i] != 'r') &&
  272. (opp[i] != 't')) ||
  273. (opp[i] > '~'))
  274. {
  275. printable=0;
  276. break;
  277. }
  278. }
  279. if (printable)
  280. /* printable string */
  281. {
  282. if (BIO_write(bp,":",1) <= 0)
  283. goto end;
  284. if (BIO_write(bp,(const char *)opp,
  285. os->length) <= 0)
  286. goto end;
  287. }
  288. else if (!dump)
  289. /* not printable => print octet string
  290.  * as hex dump */
  291. {
  292. if (BIO_write(bp,"[HEX DUMP]:",11) <= 0)
  293. goto end;
  294. for (i=0; i<os->length; i++)
  295. {
  296. if (BIO_printf(bp,"%02X"
  297. , opp[i]) <= 0)
  298. goto end;
  299. }
  300. }
  301. else
  302. /* print the normal dump */
  303. {
  304. if (!nl) 
  305. {
  306. if (BIO_write(bp,"n",1) <= 0)
  307. goto end;
  308. }
  309. if (BIO_dump_indent(bp,
  310. (const char *)opp,
  311. ((dump == -1 || dump > 
  312. os->length)?os->length:dump),
  313. dump_indent) <= 0)
  314. goto end;
  315. nl=1;
  316. }
  317. }
  318. if (os != NULL)
  319. {
  320. M_ASN1_OCTET_STRING_free(os);
  321. os=NULL;
  322. }
  323. }
  324. else if (tag == V_ASN1_INTEGER)
  325. {
  326. ASN1_INTEGER *bs;
  327. int i;
  329. opp=op;
  330. bs=d2i_ASN1_INTEGER(NULL,&opp,len+hl);
  331. if (bs != NULL)
  332. {
  333. if (BIO_write(bp,":",1) <= 0) goto end;
  334. if (bs->type == V_ASN1_NEG_INTEGER)
  335. if (BIO_write(bp,"-",1) <= 0)
  336. goto end;
  337. for (i=0; i<bs->length; i++)
  338. {
  339. if (BIO_printf(bp,"%02X",
  340. bs->data[i]) <= 0)
  341. goto end;
  342. }
  343. if (bs->length == 0)
  344. {
  345. if (BIO_write(bp,"00",2) <= 0)
  346. goto end;
  347. }
  348. }
  349. else
  350. {
  351. if (BIO_write(bp,"BAD INTEGER",11) <= 0)
  352. goto end;
  353. }
  354. M_ASN1_INTEGER_free(bs);
  355. }
  356. else if (tag == V_ASN1_ENUMERATED)
  357. {
  358. ASN1_ENUMERATED *bs;
  359. int i;
  361. opp=op;
  362. bs=d2i_ASN1_ENUMERATED(NULL,&opp,len+hl);
  363. if (bs != NULL)
  364. {
  365. if (BIO_write(bp,":",1) <= 0) goto end;
  366. if (bs->type == V_ASN1_NEG_ENUMERATED)
  367. if (BIO_write(bp,"-",1) <= 0)
  368. goto end;
  369. for (i=0; i<bs->length; i++)
  370. {
  371. if (BIO_printf(bp,"%02X",
  372. bs->data[i]) <= 0)
  373. goto end;
  374. }
  375. if (bs->length == 0)
  376. {
  377. if (BIO_write(bp,"00",2) <= 0)
  378. goto end;
  379. }
  380. }
  381. else
  382. {
  383. if (BIO_write(bp,"BAD ENUMERATED",11) <= 0)
  384. goto end;
  385. }
  386. M_ASN1_ENUMERATED_free(bs);
  387. }
  388. else if (len > 0 && dump)
  389. {
  390. if (!nl) 
  391. {
  392. if (BIO_write(bp,"n",1) <= 0)
  393. goto end;
  394. }
  395. if (BIO_dump_indent(bp,(const char *)p,
  396. ((dump == -1 || dump > len)?len:dump),
  397. dump_indent) <= 0)
  398. goto end;
  399. nl=1;
  400. }
  402. if (!nl) 
  403. {
  404. if (BIO_write(bp,"n",1) <= 0) goto end;
  405. }
  406. p+=len;
  407. if ((tag == V_ASN1_EOC) && (xclass == 0))
  408. {
  409. ret=2; /* End of sequence */
  410. goto end;
  411. }
  412. }
  413. length-=len;
  414. }
  415. ret=1;
  416. end:
  417. if (o != NULL) ASN1_OBJECT_free(o);
  418. if (os != NULL) M_ASN1_OCTET_STRING_free(os);
  419. *pp=p;
  420. return(ret);
  421. }
  423. const char *ASN1_tag2str(int tag)
  424. {
  425. static const char *tag2str[] = {
  426.  "EOC", "BOOLEAN", "INTEGER", "BIT STRING", "OCTET STRING", /* 0-4 */
  427.  "NULL", "OBJECT", "OBJECT DESCRIPTOR", "EXTERNAL", "REAL", /* 5-9 */
  428.  "ENUMERATED", "<ASN1 11>", "UTF8STRING", "<ASN1 13>",      /* 10-13 */
  429. "<ASN1 14>", "<ASN1 15>", "SEQUENCE", "SET",      /* 15-17 */
  430. "NUMERICSTRING", "PRINTABLESTRING", "T61STRING",     /* 18-20 */
  431. "VIDEOTEXSTRING", "IA5STRING", "UTCTIME","GENERALIZEDTIME", /* 21-24 */
  432. "GRAPHICSTRING", "VISIBLESTRING", "GENERALSTRING",     /* 25-27 */
  433. "UNIVERSALSTRING", "<ASN1 29>", "BMPSTRING"     /* 28-30 */
  434. };
  436. if((tag == V_ASN1_NEG_INTEGER) || (tag == V_ASN1_NEG_ENUMERATED))
  437. tag &= ~0x100;
  439. if(tag < 0 || tag > 30) return "(unknown)";
  440. return tag2str[tag];
  441. }