a_type.c 5.5 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155
  1. /* crypto/asn1/a_type.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/asn1t.h>
  61. #include <openssl/objects.h>
  62. int ASN1_TYPE_get(ASN1_TYPE *a)
  63. {
  64. if ((a->value.ptr != NULL) || (a->type == V_ASN1_NULL))
  65. return (a->type);
  66. else
  67. return (0);
  68. }
  69. void ASN1_TYPE_set(ASN1_TYPE *a, int type, void *value)
  70. {
  71. if (a->value.ptr != NULL) {
  72. ASN1_TYPE **tmp_a = &a;
  73. ASN1_primitive_free((ASN1_VALUE **)tmp_a, NULL);
  74. }
  75. a->type = type;
  76. if (type == V_ASN1_BOOLEAN)
  77. a->value.boolean = value ? 0xff : 0;
  78. else
  79. a->value.ptr = value;
  80. }
  81. int ASN1_TYPE_set1(ASN1_TYPE *a, int type, const void *value)
  82. {
  83. if (!value || (type == V_ASN1_BOOLEAN)) {
  84. void *p = (void *)value;
  85. ASN1_TYPE_set(a, type, p);
  86. } else if (type == V_ASN1_OBJECT) {
  87. ASN1_OBJECT *odup;
  88. odup = OBJ_dup(value);
  89. if (!odup)
  90. return 0;
  91. ASN1_TYPE_set(a, type, odup);
  92. } else {
  93. ASN1_STRING *sdup;
  94. sdup = ASN1_STRING_dup(value);
  95. if (!sdup)
  96. return 0;
  97. ASN1_TYPE_set(a, type, sdup);
  98. }
  99. return 1;
  100. }
  101. IMPLEMENT_STACK_OF(ASN1_TYPE)
  102. IMPLEMENT_ASN1_SET_OF(ASN1_TYPE)
  103. /* Returns 0 if they are equal, != 0 otherwise. */
  104. int ASN1_TYPE_cmp(const ASN1_TYPE *a, const ASN1_TYPE *b)
  105. {
  106. int result = -1;
  107. if (!a || !b || a->type != b->type)
  108. return -1;
  109. switch (a->type) {
  110. case V_ASN1_OBJECT:
  111. result = OBJ_cmp(a->value.object, b->value.object);
  112. break;
  113. case V_ASN1_BOOLEAN:
  114. result = a->value.boolean - b->value.boolean;
  115. break;
  116. case V_ASN1_NULL:
  117. result = 0; /* They do not have content. */
  118. break;
  119. case V_ASN1_INTEGER:
  120. case V_ASN1_ENUMERATED:
  121. case V_ASN1_BIT_STRING:
  122. case V_ASN1_OCTET_STRING:
  123. case V_ASN1_SEQUENCE:
  124. case V_ASN1_SET:
  125. case V_ASN1_NUMERICSTRING:
  126. case V_ASN1_PRINTABLESTRING:
  127. case V_ASN1_T61STRING:
  128. case V_ASN1_VIDEOTEXSTRING:
  129. case V_ASN1_IA5STRING:
  130. case V_ASN1_UTCTIME:
  131. case V_ASN1_GENERALIZEDTIME:
  132. case V_ASN1_GRAPHICSTRING:
  133. case V_ASN1_VISIBLESTRING:
  134. case V_ASN1_GENERALSTRING:
  135. case V_ASN1_UNIVERSALSTRING:
  136. case V_ASN1_BMPSTRING:
  137. case V_ASN1_UTF8STRING:
  138. case V_ASN1_OTHER:
  139. default:
  140. result = ASN1_STRING_cmp((ASN1_STRING *)a->value.ptr,
  141. (ASN1_STRING *)b->value.ptr);
  142. break;
  143. }
  144. return result;
  145. }