a_d2i_fp.c 6.9 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260
  1. /* crypto/asn1/a_d2i_fp.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. */
  58. #include <stdio.h>
  59. #include "cryptlib.h"
  60. #include <openssl/buffer.h>
  61. #include <openssl/asn1_mac.h>
  62. static int asn1_d2i_read_bio(BIO *in, BUF_MEM **pb);
  63. #ifndef NO_OLD_ASN1
  64. #ifndef OPENSSL_NO_FP_API
  65. void *ASN1_d2i_fp(void *(*xnew)(void), d2i_of_void *d2i, FILE *in, void **x)
  66. {
  67. BIO *b;
  68. void *ret;
  69. if ((b=BIO_new(BIO_s_file())) == NULL)
  70. {
  71. ASN1err(ASN1_F_ASN1_D2I_FP,ERR_R_BUF_LIB);
  72. return(NULL);
  73. }
  74. BIO_set_fp(b,in,BIO_NOCLOSE);
  75. ret=ASN1_d2i_bio(xnew,d2i,b,x);
  76. BIO_free(b);
  77. return(ret);
  78. }
  79. #endif
  80. void *ASN1_d2i_bio(void *(*xnew)(void), d2i_of_void *d2i, BIO *in, void **x)
  81. {
  82. BUF_MEM *b = NULL;
  83. const unsigned char *p;
  84. void *ret=NULL;
  85. int len;
  86. len = asn1_d2i_read_bio(in, &b);
  87. if(len < 0) goto err;
  88. p=(unsigned char *)b->data;
  89. ret=d2i(x,&p,len);
  90. err:
  91. if (b != NULL) BUF_MEM_free(b);
  92. return(ret);
  93. }
  94. #endif
  95. void *ASN1_item_d2i_bio(const ASN1_ITEM *it, BIO *in, void *x)
  96. {
  97. BUF_MEM *b = NULL;
  98. const unsigned char *p;
  99. void *ret=NULL;
  100. int len;
  101. len = asn1_d2i_read_bio(in, &b);
  102. if(len < 0) goto err;
  103. p=(const unsigned char *)b->data;
  104. ret=ASN1_item_d2i(x,&p,len, it);
  105. err:
  106. if (b != NULL) BUF_MEM_free(b);
  107. return(ret);
  108. }
  109. #ifndef OPENSSL_NO_FP_API
  110. void *ASN1_item_d2i_fp(const ASN1_ITEM *it, FILE *in, void *x)
  111. {
  112. BIO *b;
  113. char *ret;
  114. if ((b=BIO_new(BIO_s_file())) == NULL)
  115. {
  116. ASN1err(ASN1_F_ASN1_ITEM_D2I_FP,ERR_R_BUF_LIB);
  117. return(NULL);
  118. }
  119. BIO_set_fp(b,in,BIO_NOCLOSE);
  120. ret=ASN1_item_d2i_bio(it,b,x);
  121. BIO_free(b);
  122. return(ret);
  123. }
  124. #endif
  125. #define HEADER_SIZE 8
  126. static int asn1_d2i_read_bio(BIO *in, BUF_MEM **pb)
  127. {
  128. BUF_MEM *b;
  129. unsigned char *p;
  130. int i;
  131. int ret=-1;
  132. ASN1_const_CTX c;
  133. int want=HEADER_SIZE;
  134. int eos=0;
  135. #if defined(__GNUC__) && defined(__ia64)
  136. /* pathetic compiler bug in all known versions as of Nov. 2002 */
  137. long off=0;
  138. #else
  139. int off=0;
  140. #endif
  141. int len=0;
  142. b=BUF_MEM_new();
  143. if (b == NULL)
  144. {
  145. ASN1err(ASN1_F_ASN1_D2I_READ_BIO,ERR_R_MALLOC_FAILURE);
  146. return -1;
  147. }
  148. ERR_clear_error();
  149. for (;;)
  150. {
  151. if (want >= (len-off))
  152. {
  153. want-=(len-off);
  154. if (!BUF_MEM_grow_clean(b,len+want))
  155. {
  156. ASN1err(ASN1_F_ASN1_D2I_READ_BIO,ERR_R_MALLOC_FAILURE);
  157. goto err;
  158. }
  159. i=BIO_read(in,&(b->data[len]),want);
  160. if ((i < 0) && ((len-off) == 0))
  161. {
  162. ASN1err(ASN1_F_ASN1_D2I_READ_BIO,ASN1_R_NOT_ENOUGH_DATA);
  163. goto err;
  164. }
  165. if (i > 0)
  166. len+=i;
  167. }
  168. /* else data already loaded */
  169. p=(unsigned char *)&(b->data[off]);
  170. c.p=p;
  171. c.inf=ASN1_get_object(&(c.p),&(c.slen),&(c.tag),&(c.xclass),
  172. len-off);
  173. if (c.inf & 0x80)
  174. {
  175. unsigned long e;
  176. e=ERR_GET_REASON(ERR_peek_error());
  177. if (e != ASN1_R_TOO_LONG)
  178. goto err;
  179. else
  180. ERR_clear_error(); /* clear error */
  181. }
  182. i=c.p-p;/* header length */
  183. off+=i; /* end of data */
  184. if (c.inf & 1)
  185. {
  186. /* no data body so go round again */
  187. eos++;
  188. want=HEADER_SIZE;
  189. }
  190. else if (eos && (c.slen == 0) && (c.tag == V_ASN1_EOC))
  191. {
  192. /* eos value, so go back and read another header */
  193. eos--;
  194. if (eos <= 0)
  195. break;
  196. else
  197. want=HEADER_SIZE;
  198. }
  199. else
  200. {
  201. /* suck in c.slen bytes of data */
  202. want=(int)c.slen;
  203. if (want > (len-off))
  204. {
  205. want-=(len-off);
  206. if (!BUF_MEM_grow_clean(b,len+want))
  207. {
  208. ASN1err(ASN1_F_ASN1_D2I_READ_BIO,ERR_R_MALLOC_FAILURE);
  209. goto err;
  210. }
  211. while (want > 0)
  212. {
  213. i=BIO_read(in,&(b->data[len]),want);
  214. if (i <= 0)
  215. {
  216. ASN1err(ASN1_F_ASN1_D2I_READ_BIO,
  217. ASN1_R_NOT_ENOUGH_DATA);
  218. goto err;
  219. }
  220. len+=i;
  221. want -= i;
  222. }
  223. }
  224. off+=(int)c.slen;
  225. if (eos <= 0)
  226. {
  227. break;
  228. }
  229. else
  230. want=HEADER_SIZE;
  231. }
  232. }
  233. *pb = b;
  234. return off;
  235. err:
  236. if (b != NULL) BUF_MEM_free(b);
  237. return(ret);
  238. }