v3_genn.c 6.8 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252
  1. /* v3_genn.c */
  2. /* Written by Dr Stephen N Henson (shenson@bigfoot.com) for the OpenSSL
  3. * project 1999.
  4. */
  5. /* ====================================================================
  6. * Copyright (c) 1999-2008 The OpenSSL Project. All rights reserved.
  7. *
  8. * Redistribution and use in source and binary forms, with or without
  9. * modification, are permitted provided that the following conditions
  10. * are met:
  11. *
  12. * 1. Redistributions of source code must retain the above copyright
  13. * notice, this list of conditions and the following disclaimer.
  14. *
  15. * 2. Redistributions in binary form must reproduce the above copyright
  16. * notice, this list of conditions and the following disclaimer in
  17. * the documentation and/or other materials provided with the
  18. * distribution.
  19. *
  20. * 3. All advertising materials mentioning features or use of this
  21. * software must display the following acknowledgment:
  22. * "This product includes software developed by the OpenSSL Project
  23. * for use in the OpenSSL Toolkit. (http://www.OpenSSL.org/)"
  24. *
  25. * 4. The names "OpenSSL Toolkit" and "OpenSSL Project" must not be used to
  26. * endorse or promote products derived from this software without
  27. * prior written permission. For written permission, please contact
  28. * licensing@OpenSSL.org.
  29. *
  30. * 5. Products derived from this software may not be called "OpenSSL"
  31. * nor may "OpenSSL" appear in their names without prior written
  32. * permission of the OpenSSL Project.
  33. *
  34. * 6. Redistributions of any form whatsoever must retain the following
  35. * acknowledgment:
  36. * "This product includes software developed by the OpenSSL Project
  37. * for use in the OpenSSL Toolkit (http://www.OpenSSL.org/)"
  38. *
  39. * THIS SOFTWARE IS PROVIDED BY THE OpenSSL PROJECT ``AS IS'' AND ANY
  40. * EXPRESSED OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  41. * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
  42. * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE OpenSSL PROJECT OR
  43. * ITS CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
  44. * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
  45. * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
  46. * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  47. * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
  48. * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
  49. * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED
  50. * OF THE POSSIBILITY OF SUCH DAMAGE.
  51. * ====================================================================
  52. *
  53. * This product includes cryptographic software written by Eric Young
  54. * (eay@cryptsoft.com). This product includes software written by Tim
  55. * Hudson (tjh@cryptsoft.com).
  56. *
  57. */
  58. #include <stdio.h>
  59. #include "cryptlib.h"
  60. #include <openssl/asn1t.h>
  61. #include <openssl/conf.h>
  62. #include <openssl/x509v3.h>
  63. ASN1_SEQUENCE(OTHERNAME) = {
  64. ASN1_SIMPLE(OTHERNAME, type_id, ASN1_OBJECT),
  65. /* Maybe have a true ANY DEFINED BY later */
  66. ASN1_EXP(OTHERNAME, value, ASN1_ANY, 0)
  67. } ASN1_SEQUENCE_END(OTHERNAME)
  68. IMPLEMENT_ASN1_FUNCTIONS(OTHERNAME)
  69. ASN1_SEQUENCE(EDIPARTYNAME) = {
  70. ASN1_IMP_OPT(EDIPARTYNAME, nameAssigner, DIRECTORYSTRING, 0),
  71. ASN1_IMP_OPT(EDIPARTYNAME, partyName, DIRECTORYSTRING, 1)
  72. } ASN1_SEQUENCE_END(EDIPARTYNAME)
  73. IMPLEMENT_ASN1_FUNCTIONS(EDIPARTYNAME)
  74. ASN1_CHOICE(GENERAL_NAME) = {
  75. ASN1_IMP(GENERAL_NAME, d.otherName, OTHERNAME, GEN_OTHERNAME),
  76. ASN1_IMP(GENERAL_NAME, d.rfc822Name, ASN1_IA5STRING, GEN_EMAIL),
  77. ASN1_IMP(GENERAL_NAME, d.dNSName, ASN1_IA5STRING, GEN_DNS),
  78. /* Don't decode this */
  79. ASN1_IMP(GENERAL_NAME, d.x400Address, ASN1_SEQUENCE, GEN_X400),
  80. /* X509_NAME is a CHOICE type so use EXPLICIT */
  81. ASN1_EXP(GENERAL_NAME, d.directoryName, X509_NAME, GEN_DIRNAME),
  82. ASN1_IMP(GENERAL_NAME, d.ediPartyName, EDIPARTYNAME, GEN_EDIPARTY),
  83. ASN1_IMP(GENERAL_NAME, d.uniformResourceIdentifier, ASN1_IA5STRING, GEN_URI),
  84. ASN1_IMP(GENERAL_NAME, d.iPAddress, ASN1_OCTET_STRING, GEN_IPADD),
  85. ASN1_IMP(GENERAL_NAME, d.registeredID, ASN1_OBJECT, GEN_RID)
  86. } ASN1_CHOICE_END(GENERAL_NAME)
  87. IMPLEMENT_ASN1_FUNCTIONS(GENERAL_NAME)
  88. ASN1_ITEM_TEMPLATE(GENERAL_NAMES) =
  89. ASN1_EX_TEMPLATE_TYPE(ASN1_TFLG_SEQUENCE_OF, 0, GeneralNames, GENERAL_NAME)
  90. ASN1_ITEM_TEMPLATE_END(GENERAL_NAMES)
  91. IMPLEMENT_ASN1_FUNCTIONS(GENERAL_NAMES)
  92. GENERAL_NAME *GENERAL_NAME_dup(GENERAL_NAME *a)
  93. {
  94. return (GENERAL_NAME *) ASN1_dup((i2d_of_void *) i2d_GENERAL_NAME,
  95. (d2i_of_void *) d2i_GENERAL_NAME,
  96. (char *) a);
  97. }
  98. /* Returns 0 if they are equal, != 0 otherwise. */
  99. int GENERAL_NAME_cmp(GENERAL_NAME *a, GENERAL_NAME *b)
  100. {
  101. int result = -1;
  102. if (!a || !b || a->type != b->type) return -1;
  103. switch(a->type)
  104. {
  105. case GEN_X400:
  106. case GEN_EDIPARTY:
  107. result = ASN1_TYPE_cmp(a->d.other, b->d.other);
  108. break;
  109. case GEN_OTHERNAME:
  110. result = OTHERNAME_cmp(a->d.otherName, b->d.otherName);
  111. break;
  112. case GEN_EMAIL:
  113. case GEN_DNS:
  114. case GEN_URI:
  115. result = ASN1_STRING_cmp(a->d.ia5, b->d.ia5);
  116. break;
  117. case GEN_DIRNAME:
  118. result = X509_NAME_cmp(a->d.dirn, b->d.dirn);
  119. break;
  120. case GEN_IPADD:
  121. result = ASN1_OCTET_STRING_cmp(a->d.ip, b->d.ip);
  122. break;
  123. case GEN_RID:
  124. result = OBJ_cmp(a->d.rid, b->d.rid);
  125. break;
  126. }
  127. return result;
  128. }
  129. /* Returns 0 if they are equal, != 0 otherwise. */
  130. int OTHERNAME_cmp(OTHERNAME *a, OTHERNAME *b)
  131. {
  132. int result = -1;
  133. if (!a || !b) return -1;
  134. /* Check their type first. */
  135. if ((result = OBJ_cmp(a->type_id, b->type_id)) != 0)
  136. return result;
  137. /* Check the value. */
  138. result = ASN1_TYPE_cmp(a->value, b->value);
  139. return result;
  140. }
  141. void GENERAL_NAME_set0_value(GENERAL_NAME *a, int type, void *value)
  142. {
  143. switch(type)
  144. {
  145. case GEN_X400:
  146. case GEN_EDIPARTY:
  147. a->d.other = value;
  148. break;
  149. case GEN_OTHERNAME:
  150. a->d.otherName = value;
  151. break;
  152. case GEN_EMAIL:
  153. case GEN_DNS:
  154. case GEN_URI:
  155. a->d.ia5 = value;
  156. break;
  157. case GEN_DIRNAME:
  158. a->d.dirn = value;
  159. break;
  160. case GEN_IPADD:
  161. a->d.ip = value;
  162. break;
  163. case GEN_RID:
  164. a->d.rid = value;
  165. break;
  166. }
  167. a->type = type;
  168. }
  169. void *GENERAL_NAME_get0_value(GENERAL_NAME *a, int *ptype)
  170. {
  171. if (ptype)
  172. *ptype = a->type;
  173. switch(a->type)
  174. {
  175. case GEN_X400:
  176. case GEN_EDIPARTY:
  177. return a->d.other;
  178. case GEN_OTHERNAME:
  179. return a->d.otherName;
  180. case GEN_EMAIL:
  181. case GEN_DNS:
  182. case GEN_URI:
  183. return a->d.ia5;
  184. case GEN_DIRNAME:
  185. return a->d.dirn;
  186. case GEN_IPADD:
  187. return a->d.ip;
  188. case GEN_RID:
  189. return a->d.rid;
  190. default:
  191. return NULL;
  192. }
  193. }
  194. int GENERAL_NAME_set0_othername(GENERAL_NAME *gen,
  195. ASN1_OBJECT *oid, ASN1_TYPE *value)
  196. {
  197. OTHERNAME *oth;
  198. oth = OTHERNAME_new();
  199. if (!oth)
  200. return 0;
  201. oth->type_id = oid;
  202. oth->value = value;
  203. GENERAL_NAME_set0_value(gen, GEN_OTHERNAME, oth);
  204. return 1;
  205. }
  206. int GENERAL_NAME_get0_otherName(GENERAL_NAME *gen,
  207. ASN1_OBJECT **poid, ASN1_TYPE **pvalue)
  208. {
  209. if (gen->type != GEN_OTHERNAME)
  210. return 0;
  211. if (poid)
  212. *poid = gen->d.otherName->type_id;
  213. if (pvalue)
  214. *pvalue = gen->d.otherName->value;
  215. return 1;
  216. }