1 /* crypto/ts/ts_resp_utils.c */
   2 /* Written by Zoltan Glozik (zglozik@stones.com) for the OpenSSL
   3  * project 2002.
   4  */
   5 /* ====================================================================
   6  * Copyright (c) 2006 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 
  59 #include <stdio.h>
  60 #include "cryptlib.h"
  61 #include <openssl/objects.h>
  62 #include <openssl/ts.h>
  63 #include <openssl/pkcs7.h>
  64 
  65 /* Function definitions. */
  66 
  67 int TS_RESP_set_status_info(TS_RESP *a, TS_STATUS_INFO *status_info)
  68         {
  69         TS_STATUS_INFO *new_status_info;
  70 
  71         if (a->status_info == status_info)
  72                 return 1;
  73         new_status_info = TS_STATUS_INFO_dup(status_info);
  74         if (new_status_info == NULL)
  75                 {
  76                 TSerr(TS_F_TS_RESP_SET_STATUS_INFO, ERR_R_MALLOC_FAILURE);
  77                 return 0;
  78                 }
  79         TS_STATUS_INFO_free(a->status_info);
  80         a->status_info = new_status_info;
  81 
  82         return 1;
  83         }
  84 
  85 TS_STATUS_INFO *TS_RESP_get_status_info(TS_RESP *a)
  86         {
  87         return a->status_info;
  88         }
  89 
  90 /* Caller loses ownership of PKCS7 and TS_TST_INFO objects. */
  91 void TS_RESP_set_tst_info(TS_RESP *a, PKCS7 *p7, TS_TST_INFO *tst_info)
  92         {
  93         /* Set new PKCS7 and TST_INFO objects. */
  94         PKCS7_free(a->token);
  95         a->token = p7;
  96         TS_TST_INFO_free(a->tst_info);
  97         a->tst_info = tst_info;
  98         }
  99 
 100 PKCS7 *TS_RESP_get_token(TS_RESP *a)
 101         {
 102         return a->token;
 103         }
 104 
 105 TS_TST_INFO *TS_RESP_get_tst_info(TS_RESP *a)
 106         {
 107         return a->tst_info;
 108         }
 109 
 110 int TS_TST_INFO_set_version(TS_TST_INFO *a, long version)
 111         {
 112         return ASN1_INTEGER_set(a->version, version);
 113         }
 114 
 115 long TS_TST_INFO_get_version(const TS_TST_INFO *a)
 116         {
 117         return ASN1_INTEGER_get(a->version);
 118         }
 119 
 120 int TS_TST_INFO_set_policy_id(TS_TST_INFO *a, ASN1_OBJECT *policy)
 121         {
 122         ASN1_OBJECT *new_policy;
 123 
 124         if (a->policy_id == policy)
 125                 return 1;
 126         new_policy = OBJ_dup(policy);
 127         if (new_policy == NULL)
 128                 {
 129                 TSerr(TS_F_TS_TST_INFO_SET_POLICY_ID, ERR_R_MALLOC_FAILURE);
 130                 return 0;
 131                 }
 132         ASN1_OBJECT_free(a->policy_id);
 133         a->policy_id = new_policy;
 134         return 1;
 135         }
 136 
 137 ASN1_OBJECT *TS_TST_INFO_get_policy_id(TS_TST_INFO *a)
 138         {
 139         return a->policy_id;
 140         }
 141 
 142 int TS_TST_INFO_set_msg_imprint(TS_TST_INFO *a, TS_MSG_IMPRINT *msg_imprint)
 143         {
 144         TS_MSG_IMPRINT *new_msg_imprint;
 145 
 146         if (a->msg_imprint == msg_imprint)
 147                 return 1;
 148         new_msg_imprint = TS_MSG_IMPRINT_dup(msg_imprint);
 149         if (new_msg_imprint == NULL)
 150                 {
 151                 TSerr(TS_F_TS_TST_INFO_SET_MSG_IMPRINT, ERR_R_MALLOC_FAILURE);
 152                 return 0;
 153                 }
 154         TS_MSG_IMPRINT_free(a->msg_imprint);
 155         a->msg_imprint = new_msg_imprint;
 156         return 1;
 157         }
 158 
 159 TS_MSG_IMPRINT *TS_TST_INFO_get_msg_imprint(TS_TST_INFO *a)
 160         {
 161         return a->msg_imprint;
 162         }
 163 
 164 int TS_TST_INFO_set_serial(TS_TST_INFO *a, const ASN1_INTEGER *serial)
 165         {
 166         ASN1_INTEGER *new_serial;
 167 
 168         if (a->serial == serial)
 169                 return 1;
 170         new_serial = ASN1_INTEGER_dup(serial);
 171         if (new_serial == NULL)
 172                 {
 173                 TSerr(TS_F_TS_TST_INFO_SET_SERIAL, ERR_R_MALLOC_FAILURE);
 174                 return 0;
 175                 }
 176         ASN1_INTEGER_free(a->serial);
 177         a->serial = new_serial;
 178         return 1;
 179         }
 180 
 181 const ASN1_INTEGER *TS_TST_INFO_get_serial(const TS_TST_INFO *a)
 182         {
 183         return a->serial;
 184         }
 185 
 186 int TS_TST_INFO_set_time(TS_TST_INFO *a, const ASN1_GENERALIZEDTIME *gtime)
 187         {
 188         ASN1_GENERALIZEDTIME *new_time;
 189 
 190         if (a->time == gtime)
 191                 return 1;
 192         new_time = M_ASN1_GENERALIZEDTIME_dup(gtime);
 193         if (new_time == NULL)
 194                 {
 195                 TSerr(TS_F_TS_TST_INFO_SET_TIME, ERR_R_MALLOC_FAILURE);
 196                 return 0;
 197                 }
 198         ASN1_GENERALIZEDTIME_free(a->time);
 199         a->time = new_time;
 200         return 1;
 201         }
 202 
 203 const ASN1_GENERALIZEDTIME *TS_TST_INFO_get_time(const TS_TST_INFO *a)
 204         {
 205         return a->time;
 206         }
 207 
 208 int TS_TST_INFO_set_accuracy(TS_TST_INFO *a, TS_ACCURACY *accuracy)
 209         {
 210         TS_ACCURACY *new_accuracy;
 211 
 212         if (a->accuracy == accuracy)
 213                 return 1;
 214         new_accuracy = TS_ACCURACY_dup(accuracy);
 215         if (new_accuracy == NULL)
 216                 {
 217                 TSerr(TS_F_TS_TST_INFO_SET_ACCURACY, ERR_R_MALLOC_FAILURE);
 218                 return 0;
 219                 }
 220         TS_ACCURACY_free(a->accuracy);
 221         a->accuracy = new_accuracy;
 222         return 1;
 223         }
 224 
 225 TS_ACCURACY *TS_TST_INFO_get_accuracy(TS_TST_INFO *a)
 226         {
 227         return a->accuracy;
 228         }
 229 
 230 int TS_ACCURACY_set_seconds(TS_ACCURACY *a, const ASN1_INTEGER *seconds)
 231         {
 232         ASN1_INTEGER *new_seconds;
 233 
 234         if (a->seconds == seconds)
 235                 return 1;
 236         new_seconds = ASN1_INTEGER_dup(seconds);
 237         if (new_seconds == NULL)
 238                 {
 239                 TSerr(TS_F_TS_ACCURACY_SET_SECONDS, ERR_R_MALLOC_FAILURE);
 240                 return 0;
 241                 }
 242         ASN1_INTEGER_free(a->seconds);
 243         a->seconds = new_seconds;
 244         return 1;
 245         }
 246 
 247 const ASN1_INTEGER *TS_ACCURACY_get_seconds(const TS_ACCURACY *a)
 248         {
 249         return a->seconds;
 250         }
 251 
 252 int TS_ACCURACY_set_millis(TS_ACCURACY *a, const ASN1_INTEGER *millis)
 253         {
 254         ASN1_INTEGER *new_millis = NULL;
 255 
 256         if (a->millis == millis)
 257                 return 1;
 258         if (millis != NULL)
 259                 {
 260                 new_millis = ASN1_INTEGER_dup(millis);
 261                 if (new_millis == NULL)
 262                         {
 263                         TSerr(TS_F_TS_ACCURACY_SET_MILLIS,
 264                               ERR_R_MALLOC_FAILURE);
 265                         return 0;
 266                         }
 267                 }
 268         ASN1_INTEGER_free(a->millis);
 269         a->millis = new_millis;
 270         return 1;
 271         }
 272 
 273 const ASN1_INTEGER *TS_ACCURACY_get_millis(const TS_ACCURACY *a)
 274         {
 275         return a->millis;
 276         }
 277 
 278 int TS_ACCURACY_set_micros(TS_ACCURACY *a, const ASN1_INTEGER *micros)
 279         {
 280         ASN1_INTEGER *new_micros = NULL;
 281 
 282         if (a->micros == micros)
 283                 return 1;
 284         if (micros != NULL)
 285                 {
 286                 new_micros = ASN1_INTEGER_dup(micros);
 287                 if (new_micros == NULL)
 288                         {
 289                         TSerr(TS_F_TS_ACCURACY_SET_MICROS,
 290                               ERR_R_MALLOC_FAILURE);
 291                         return 0;
 292                         }
 293                 }
 294         ASN1_INTEGER_free(a->micros);
 295         a->micros = new_micros;
 296         return 1;
 297         }
 298 
 299 const ASN1_INTEGER *TS_ACCURACY_get_micros(const TS_ACCURACY *a)
 300         {
 301         return a->micros;
 302         }
 303 
 304 int TS_TST_INFO_set_ordering(TS_TST_INFO *a, int ordering)
 305         {
 306         a->ordering = ordering ? 0xFF : 0x00;
 307         return 1;
 308         }
 309 
 310 int TS_TST_INFO_get_ordering(const TS_TST_INFO *a)
 311         {
 312         return a->ordering ? 1 : 0;
 313         }
 314 
 315 int TS_TST_INFO_set_nonce(TS_TST_INFO *a, const ASN1_INTEGER *nonce)
 316         {
 317         ASN1_INTEGER *new_nonce;
 318 
 319         if (a->nonce == nonce)
 320                 return 1;
 321         new_nonce = ASN1_INTEGER_dup(nonce);
 322         if (new_nonce == NULL)
 323                 {
 324                 TSerr(TS_F_TS_TST_INFO_SET_NONCE, ERR_R_MALLOC_FAILURE);
 325                 return 0;
 326                 }
 327         ASN1_INTEGER_free(a->nonce);
 328         a->nonce = new_nonce;
 329         return 1;
 330         }
 331 
 332 const ASN1_INTEGER *TS_TST_INFO_get_nonce(const TS_TST_INFO *a)
 333         {
 334         return a->nonce;
 335         }
 336 
 337 int TS_TST_INFO_set_tsa(TS_TST_INFO *a, GENERAL_NAME *tsa)
 338         {
 339         GENERAL_NAME *new_tsa;
 340 
 341         if (a->tsa == tsa)
 342                 return 1;
 343         new_tsa = GENERAL_NAME_dup(tsa);
 344         if (new_tsa == NULL)
 345                 {
 346                 TSerr(TS_F_TS_TST_INFO_SET_TSA, ERR_R_MALLOC_FAILURE);
 347                 return 0;
 348                 }
 349         GENERAL_NAME_free(a->tsa);
 350         a->tsa = new_tsa;
 351         return 1;
 352         }
 353 
 354 GENERAL_NAME *TS_TST_INFO_get_tsa(TS_TST_INFO *a)
 355         {
 356         return a->tsa;
 357         }
 358 
 359 STACK_OF(X509_EXTENSION) *TS_TST_INFO_get_exts(TS_TST_INFO *a)
 360         {
 361         return a->extensions;
 362         }
 363 
 364 void TS_TST_INFO_ext_free(TS_TST_INFO *a)
 365         {
 366         if (!a) return;
 367         sk_X509_EXTENSION_pop_free(a->extensions, X509_EXTENSION_free);
 368         a->extensions = NULL;
 369         }
 370 
 371 int TS_TST_INFO_get_ext_count(TS_TST_INFO *a)
 372         {
 373         return X509v3_get_ext_count(a->extensions);
 374         }
 375 
 376 int TS_TST_INFO_get_ext_by_NID(TS_TST_INFO *a, int nid, int lastpos)
 377         {
 378         return X509v3_get_ext_by_NID(a->extensions, nid, lastpos);
 379         }
 380 
 381 int TS_TST_INFO_get_ext_by_OBJ(TS_TST_INFO *a, ASN1_OBJECT *obj, int lastpos)
 382         {
 383         return X509v3_get_ext_by_OBJ(a->extensions, obj, lastpos);
 384         }
 385 
 386 int TS_TST_INFO_get_ext_by_critical(TS_TST_INFO *a, int crit, int lastpos)
 387         {
 388         return X509v3_get_ext_by_critical(a->extensions, crit, lastpos);
 389         }
 390 
 391 X509_EXTENSION *TS_TST_INFO_get_ext(TS_TST_INFO *a, int loc)
 392         {
 393         return X509v3_get_ext(a->extensions,loc);
 394         }
 395 
 396 X509_EXTENSION *TS_TST_INFO_delete_ext(TS_TST_INFO *a, int loc)
 397         {
 398         return X509v3_delete_ext(a->extensions,loc);
 399         }
 400 
 401 int TS_TST_INFO_add_ext(TS_TST_INFO *a, X509_EXTENSION *ex, int loc)
 402         {
 403         return X509v3_add_ext(&a->extensions,ex,loc) != NULL;
 404         }
 405 
 406 void *TS_TST_INFO_get_ext_d2i(TS_TST_INFO *a, int nid, int *crit, int *idx)
 407         {
 408         return X509V3_get_d2i(a->extensions, nid, crit, idx);
 409         }