x509_att.c 9.7 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332
  1. /* crypto/x509/x509_att.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 <openssl/stack.h>
  60. #include "cryptlib.h"
  61. #include <openssl/asn1.h>
  62. #include <openssl/objects.h>
  63. #include <openssl/evp.h>
  64. #include <openssl/x509.h>
  65. #include <openssl/x509v3.h>
  66. int X509at_get_attr_count(const STACK_OF(X509_ATTRIBUTE) *x)
  67. {
  68. if (!x) return 0;
  69. return(sk_X509_ATTRIBUTE_num(x));
  70. }
  71. int X509at_get_attr_by_NID(const STACK_OF(X509_ATTRIBUTE) *x, int nid,
  72. int lastpos)
  73. {
  74. ASN1_OBJECT *obj;
  75. obj=OBJ_nid2obj(nid);
  76. if (obj == NULL) return(-2);
  77. return(X509at_get_attr_by_OBJ(x,obj,lastpos));
  78. }
  79. int X509at_get_attr_by_OBJ(const STACK_OF(X509_ATTRIBUTE) *sk, ASN1_OBJECT *obj,
  80. int lastpos)
  81. {
  82. int n;
  83. X509_ATTRIBUTE *ex;
  84. if (sk == NULL) return(-1);
  85. lastpos++;
  86. if (lastpos < 0)
  87. lastpos=0;
  88. n=sk_X509_ATTRIBUTE_num(sk);
  89. for ( ; lastpos < n; lastpos++)
  90. {
  91. ex=sk_X509_ATTRIBUTE_value(sk,lastpos);
  92. if (OBJ_cmp(ex->object,obj) == 0)
  93. return(lastpos);
  94. }
  95. return(-1);
  96. }
  97. X509_ATTRIBUTE *X509at_get_attr(const STACK_OF(X509_ATTRIBUTE) *x, int loc)
  98. {
  99. if (x == NULL || sk_X509_ATTRIBUTE_num(x) <= loc || loc < 0)
  100. return NULL;
  101. else
  102. return sk_X509_ATTRIBUTE_value(x,loc);
  103. }
  104. X509_ATTRIBUTE *X509at_delete_attr(STACK_OF(X509_ATTRIBUTE) *x, int loc)
  105. {
  106. X509_ATTRIBUTE *ret;
  107. if (x == NULL || sk_X509_ATTRIBUTE_num(x) <= loc || loc < 0)
  108. return(NULL);
  109. ret=sk_X509_ATTRIBUTE_delete(x,loc);
  110. return(ret);
  111. }
  112. STACK_OF(X509_ATTRIBUTE) *X509at_add1_attr(STACK_OF(X509_ATTRIBUTE) **x,
  113. X509_ATTRIBUTE *attr)
  114. {
  115. X509_ATTRIBUTE *new_attr=NULL;
  116. STACK_OF(X509_ATTRIBUTE) *sk=NULL;
  117. if (x == NULL)
  118. {
  119. X509err(X509_F_X509AT_ADD1_ATTR, ERR_R_PASSED_NULL_PARAMETER);
  120. goto err2;
  121. }
  122. if (*x == NULL)
  123. {
  124. if ((sk=sk_X509_ATTRIBUTE_new_null()) == NULL)
  125. goto err;
  126. }
  127. else
  128. sk= *x;
  129. if ((new_attr=X509_ATTRIBUTE_dup(attr)) == NULL)
  130. goto err2;
  131. if (!sk_X509_ATTRIBUTE_push(sk,new_attr))
  132. goto err;
  133. if (*x == NULL)
  134. *x=sk;
  135. return(sk);
  136. err:
  137. X509err(X509_F_X509AT_ADD1_ATTR,ERR_R_MALLOC_FAILURE);
  138. err2:
  139. if (new_attr != NULL) X509_ATTRIBUTE_free(new_attr);
  140. if (sk != NULL) sk_X509_ATTRIBUTE_free(sk);
  141. return(NULL);
  142. }
  143. STACK_OF(X509_ATTRIBUTE) *X509at_add1_attr_by_OBJ(STACK_OF(X509_ATTRIBUTE) **x,
  144. const ASN1_OBJECT *obj, int type,
  145. const unsigned char *bytes, int len)
  146. {
  147. X509_ATTRIBUTE *attr;
  148. STACK_OF(X509_ATTRIBUTE) *ret;
  149. attr = X509_ATTRIBUTE_create_by_OBJ(NULL, obj, type, bytes, len);
  150. if(!attr) return 0;
  151. ret = X509at_add1_attr(x, attr);
  152. X509_ATTRIBUTE_free(attr);
  153. return ret;
  154. }
  155. STACK_OF(X509_ATTRIBUTE) *X509at_add1_attr_by_NID(STACK_OF(X509_ATTRIBUTE) **x,
  156. int nid, int type,
  157. const unsigned char *bytes, int len)
  158. {
  159. X509_ATTRIBUTE *attr;
  160. STACK_OF(X509_ATTRIBUTE) *ret;
  161. attr = X509_ATTRIBUTE_create_by_NID(NULL, nid, type, bytes, len);
  162. if(!attr) return 0;
  163. ret = X509at_add1_attr(x, attr);
  164. X509_ATTRIBUTE_free(attr);
  165. return ret;
  166. }
  167. STACK_OF(X509_ATTRIBUTE) *X509at_add1_attr_by_txt(STACK_OF(X509_ATTRIBUTE) **x,
  168. const char *attrname, int type,
  169. const unsigned char *bytes, int len)
  170. {
  171. X509_ATTRIBUTE *attr;
  172. STACK_OF(X509_ATTRIBUTE) *ret;
  173. attr = X509_ATTRIBUTE_create_by_txt(NULL, attrname, type, bytes, len);
  174. if(!attr) return 0;
  175. ret = X509at_add1_attr(x, attr);
  176. X509_ATTRIBUTE_free(attr);
  177. return ret;
  178. }
  179. X509_ATTRIBUTE *X509_ATTRIBUTE_create_by_NID(X509_ATTRIBUTE **attr, int nid,
  180. int atrtype, const void *data, int len)
  181. {
  182. ASN1_OBJECT *obj;
  183. X509_ATTRIBUTE *ret;
  184. obj=OBJ_nid2obj(nid);
  185. if (obj == NULL)
  186. {
  187. X509err(X509_F_X509_ATTRIBUTE_CREATE_BY_NID,X509_R_UNKNOWN_NID);
  188. return(NULL);
  189. }
  190. ret=X509_ATTRIBUTE_create_by_OBJ(attr,obj,atrtype,data,len);
  191. if (ret == NULL) ASN1_OBJECT_free(obj);
  192. return(ret);
  193. }
  194. X509_ATTRIBUTE *X509_ATTRIBUTE_create_by_OBJ(X509_ATTRIBUTE **attr,
  195. const ASN1_OBJECT *obj, int atrtype, const void *data, int len)
  196. {
  197. X509_ATTRIBUTE *ret;
  198. if ((attr == NULL) || (*attr == NULL))
  199. {
  200. if ((ret=X509_ATTRIBUTE_new()) == NULL)
  201. {
  202. X509err(X509_F_X509_ATTRIBUTE_CREATE_BY_OBJ,ERR_R_MALLOC_FAILURE);
  203. return(NULL);
  204. }
  205. }
  206. else
  207. ret= *attr;
  208. if (!X509_ATTRIBUTE_set1_object(ret,obj))
  209. goto err;
  210. if (!X509_ATTRIBUTE_set1_data(ret,atrtype,data,len))
  211. goto err;
  212. if ((attr != NULL) && (*attr == NULL)) *attr=ret;
  213. return(ret);
  214. err:
  215. if ((attr == NULL) || (ret != *attr))
  216. X509_ATTRIBUTE_free(ret);
  217. return(NULL);
  218. }
  219. X509_ATTRIBUTE *X509_ATTRIBUTE_create_by_txt(X509_ATTRIBUTE **attr,
  220. const char *atrname, int type, const unsigned char *bytes, int len)
  221. {
  222. ASN1_OBJECT *obj;
  223. X509_ATTRIBUTE *nattr;
  224. obj=OBJ_txt2obj(atrname, 0);
  225. if (obj == NULL)
  226. {
  227. X509err(X509_F_X509_ATTRIBUTE_CREATE_BY_TXT,
  228. X509_R_INVALID_FIELD_NAME);
  229. ERR_add_error_data(2, "name=", atrname);
  230. return(NULL);
  231. }
  232. nattr = X509_ATTRIBUTE_create_by_OBJ(attr,obj,type,bytes,len);
  233. ASN1_OBJECT_free(obj);
  234. return nattr;
  235. }
  236. int X509_ATTRIBUTE_set1_object(X509_ATTRIBUTE *attr, const ASN1_OBJECT *obj)
  237. {
  238. if ((attr == NULL) || (obj == NULL))
  239. return(0);
  240. ASN1_OBJECT_free(attr->object);
  241. attr->object=OBJ_dup(obj);
  242. return(1);
  243. }
  244. int X509_ATTRIBUTE_set1_data(X509_ATTRIBUTE *attr, int attrtype, const void *data, int len)
  245. {
  246. ASN1_TYPE *ttmp;
  247. ASN1_STRING *stmp;
  248. int atype;
  249. if (!attr) return 0;
  250. if(attrtype & MBSTRING_FLAG) {
  251. stmp = ASN1_STRING_set_by_NID(NULL, data, len, attrtype,
  252. OBJ_obj2nid(attr->object));
  253. if(!stmp) {
  254. X509err(X509_F_X509_ATTRIBUTE_SET1_DATA, ERR_R_ASN1_LIB);
  255. return 0;
  256. }
  257. atype = stmp->type;
  258. } else {
  259. if(!(stmp = ASN1_STRING_type_new(attrtype))) goto err;
  260. if(!ASN1_STRING_set(stmp, data, len)) goto err;
  261. atype = attrtype;
  262. }
  263. if(!(attr->value.set = sk_ASN1_TYPE_new_null())) goto err;
  264. if(!(ttmp = ASN1_TYPE_new())) goto err;
  265. if(!sk_ASN1_TYPE_push(attr->value.set, ttmp)) goto err;
  266. attr->single = 0;
  267. ASN1_TYPE_set(ttmp, atype, stmp);
  268. return 1;
  269. err:
  270. X509err(X509_F_X509_ATTRIBUTE_SET1_DATA, ERR_R_MALLOC_FAILURE);
  271. return 0;
  272. }
  273. int X509_ATTRIBUTE_count(X509_ATTRIBUTE *attr)
  274. {
  275. if(!attr->single) return sk_ASN1_TYPE_num(attr->value.set);
  276. if(attr->value.single) return 1;
  277. return 0;
  278. }
  279. ASN1_OBJECT *X509_ATTRIBUTE_get0_object(X509_ATTRIBUTE *attr)
  280. {
  281. if (attr == NULL) return(NULL);
  282. return(attr->object);
  283. }
  284. void *X509_ATTRIBUTE_get0_data(X509_ATTRIBUTE *attr, int idx,
  285. int atrtype, void *data)
  286. {
  287. ASN1_TYPE *ttmp;
  288. ttmp = X509_ATTRIBUTE_get0_type(attr, idx);
  289. if(!ttmp) return NULL;
  290. if(atrtype != ASN1_TYPE_get(ttmp)){
  291. X509err(X509_F_X509_ATTRIBUTE_GET0_DATA, X509_R_WRONG_TYPE);
  292. return NULL;
  293. }
  294. return ttmp->value.ptr;
  295. }
  296. ASN1_TYPE *X509_ATTRIBUTE_get0_type(X509_ATTRIBUTE *attr, int idx)
  297. {
  298. if (attr == NULL) return(NULL);
  299. if(idx >= X509_ATTRIBUTE_count(attr)) return NULL;
  300. if(!attr->single) return sk_ASN1_TYPE_value(attr->value.set, idx);
  301. else return attr->value.single;
  302. }