10Sstevel@tonic-gate /* crypto/x509/x509cset.c */
20Sstevel@tonic-gate /* Written by Dr Stephen N Henson (shenson@bigfoot.com) for the OpenSSL
30Sstevel@tonic-gate * project 2001.
40Sstevel@tonic-gate */
50Sstevel@tonic-gate /* ====================================================================
60Sstevel@tonic-gate * Copyright (c) 2001 The OpenSSL Project. All rights reserved.
70Sstevel@tonic-gate *
80Sstevel@tonic-gate * Redistribution and use in source and binary forms, with or without
90Sstevel@tonic-gate * modification, are permitted provided that the following conditions
100Sstevel@tonic-gate * are met:
110Sstevel@tonic-gate *
120Sstevel@tonic-gate * 1. Redistributions of source code must retain the above copyright
130Sstevel@tonic-gate * notice, this list of conditions and the following disclaimer.
140Sstevel@tonic-gate *
150Sstevel@tonic-gate * 2. Redistributions in binary form must reproduce the above copyright
160Sstevel@tonic-gate * notice, this list of conditions and the following disclaimer in
170Sstevel@tonic-gate * the documentation and/or other materials provided with the
180Sstevel@tonic-gate * distribution.
190Sstevel@tonic-gate *
200Sstevel@tonic-gate * 3. All advertising materials mentioning features or use of this
210Sstevel@tonic-gate * software must display the following acknowledgment:
220Sstevel@tonic-gate * "This product includes software developed by the OpenSSL Project
230Sstevel@tonic-gate * for use in the OpenSSL Toolkit. (http://www.OpenSSL.org/)"
240Sstevel@tonic-gate *
250Sstevel@tonic-gate * 4. The names "OpenSSL Toolkit" and "OpenSSL Project" must not be used to
260Sstevel@tonic-gate * endorse or promote products derived from this software without
270Sstevel@tonic-gate * prior written permission. For written permission, please contact
280Sstevel@tonic-gate * licensing@OpenSSL.org.
290Sstevel@tonic-gate *
300Sstevel@tonic-gate * 5. Products derived from this software may not be called "OpenSSL"
310Sstevel@tonic-gate * nor may "OpenSSL" appear in their names without prior written
320Sstevel@tonic-gate * permission of the OpenSSL Project.
330Sstevel@tonic-gate *
340Sstevel@tonic-gate * 6. Redistributions of any form whatsoever must retain the following
350Sstevel@tonic-gate * acknowledgment:
360Sstevel@tonic-gate * "This product includes software developed by the OpenSSL Project
370Sstevel@tonic-gate * for use in the OpenSSL Toolkit (http://www.OpenSSL.org/)"
380Sstevel@tonic-gate *
390Sstevel@tonic-gate * THIS SOFTWARE IS PROVIDED BY THE OpenSSL PROJECT ``AS IS'' AND ANY
400Sstevel@tonic-gate * EXPRESSED OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
410Sstevel@tonic-gate * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
420Sstevel@tonic-gate * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE OpenSSL PROJECT OR
430Sstevel@tonic-gate * ITS CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
440Sstevel@tonic-gate * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
450Sstevel@tonic-gate * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
460Sstevel@tonic-gate * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
470Sstevel@tonic-gate * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
480Sstevel@tonic-gate * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
490Sstevel@tonic-gate * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED
500Sstevel@tonic-gate * OF THE POSSIBILITY OF SUCH DAMAGE.
510Sstevel@tonic-gate * ====================================================================
520Sstevel@tonic-gate *
530Sstevel@tonic-gate * This product includes cryptographic software written by Eric Young
540Sstevel@tonic-gate * (eay@cryptsoft.com). This product includes software written by Tim
550Sstevel@tonic-gate * Hudson (tjh@cryptsoft.com).
560Sstevel@tonic-gate *
570Sstevel@tonic-gate */
580Sstevel@tonic-gate
590Sstevel@tonic-gate #include <stdio.h>
600Sstevel@tonic-gate #include "cryptlib.h"
610Sstevel@tonic-gate #include <openssl/asn1.h>
620Sstevel@tonic-gate #include <openssl/objects.h>
630Sstevel@tonic-gate #include <openssl/evp.h>
640Sstevel@tonic-gate #include <openssl/x509.h>
650Sstevel@tonic-gate
X509_CRL_set_version(X509_CRL * x,long version)660Sstevel@tonic-gate int X509_CRL_set_version(X509_CRL *x, long version)
670Sstevel@tonic-gate {
680Sstevel@tonic-gate if (x == NULL) return(0);
690Sstevel@tonic-gate if (x->crl->version == NULL)
700Sstevel@tonic-gate {
710Sstevel@tonic-gate if ((x->crl->version=M_ASN1_INTEGER_new()) == NULL)
720Sstevel@tonic-gate return(0);
730Sstevel@tonic-gate }
740Sstevel@tonic-gate return(ASN1_INTEGER_set(x->crl->version,version));
750Sstevel@tonic-gate }
760Sstevel@tonic-gate
X509_CRL_set_issuer_name(X509_CRL * x,X509_NAME * name)770Sstevel@tonic-gate int X509_CRL_set_issuer_name(X509_CRL *x, X509_NAME *name)
780Sstevel@tonic-gate {
790Sstevel@tonic-gate if ((x == NULL) || (x->crl == NULL)) return(0);
800Sstevel@tonic-gate return(X509_NAME_set(&x->crl->issuer,name));
810Sstevel@tonic-gate }
820Sstevel@tonic-gate
830Sstevel@tonic-gate
X509_CRL_set_lastUpdate(X509_CRL * x,ASN1_TIME * tm)840Sstevel@tonic-gate int X509_CRL_set_lastUpdate(X509_CRL *x, ASN1_TIME *tm)
850Sstevel@tonic-gate {
860Sstevel@tonic-gate ASN1_TIME *in;
870Sstevel@tonic-gate
880Sstevel@tonic-gate if (x == NULL) return(0);
890Sstevel@tonic-gate in=x->crl->lastUpdate;
900Sstevel@tonic-gate if (in != tm)
910Sstevel@tonic-gate {
920Sstevel@tonic-gate in=M_ASN1_TIME_dup(tm);
930Sstevel@tonic-gate if (in != NULL)
940Sstevel@tonic-gate {
950Sstevel@tonic-gate M_ASN1_TIME_free(x->crl->lastUpdate);
960Sstevel@tonic-gate x->crl->lastUpdate=in;
970Sstevel@tonic-gate }
980Sstevel@tonic-gate }
990Sstevel@tonic-gate return(in != NULL);
1000Sstevel@tonic-gate }
1010Sstevel@tonic-gate
X509_CRL_set_nextUpdate(X509_CRL * x,ASN1_TIME * tm)1020Sstevel@tonic-gate int X509_CRL_set_nextUpdate(X509_CRL *x, ASN1_TIME *tm)
1030Sstevel@tonic-gate {
1040Sstevel@tonic-gate ASN1_TIME *in;
1050Sstevel@tonic-gate
1060Sstevel@tonic-gate if (x == NULL) return(0);
1070Sstevel@tonic-gate in=x->crl->nextUpdate;
1080Sstevel@tonic-gate if (in != tm)
1090Sstevel@tonic-gate {
1100Sstevel@tonic-gate in=M_ASN1_TIME_dup(tm);
1110Sstevel@tonic-gate if (in != NULL)
1120Sstevel@tonic-gate {
1130Sstevel@tonic-gate M_ASN1_TIME_free(x->crl->nextUpdate);
1140Sstevel@tonic-gate x->crl->nextUpdate=in;
1150Sstevel@tonic-gate }
1160Sstevel@tonic-gate }
1170Sstevel@tonic-gate return(in != NULL);
1180Sstevel@tonic-gate }
1190Sstevel@tonic-gate
X509_CRL_sort(X509_CRL * c)1200Sstevel@tonic-gate int X509_CRL_sort(X509_CRL *c)
1210Sstevel@tonic-gate {
1220Sstevel@tonic-gate int i;
1230Sstevel@tonic-gate X509_REVOKED *r;
1240Sstevel@tonic-gate /* sort the data so it will be written in serial
1250Sstevel@tonic-gate * number order */
1260Sstevel@tonic-gate sk_X509_REVOKED_sort(c->crl->revoked);
1270Sstevel@tonic-gate for (i=0; i<sk_X509_REVOKED_num(c->crl->revoked); i++)
1280Sstevel@tonic-gate {
1290Sstevel@tonic-gate r=sk_X509_REVOKED_value(c->crl->revoked,i);
1300Sstevel@tonic-gate r->sequence=i;
1310Sstevel@tonic-gate }
132*2139Sjp161948 c->crl->enc.modified = 1;
1330Sstevel@tonic-gate return 1;
1340Sstevel@tonic-gate }
1350Sstevel@tonic-gate
X509_REVOKED_set_revocationDate(X509_REVOKED * x,ASN1_TIME * tm)1360Sstevel@tonic-gate int X509_REVOKED_set_revocationDate(X509_REVOKED *x, ASN1_TIME *tm)
1370Sstevel@tonic-gate {
1380Sstevel@tonic-gate ASN1_TIME *in;
1390Sstevel@tonic-gate
1400Sstevel@tonic-gate if (x == NULL) return(0);
1410Sstevel@tonic-gate in=x->revocationDate;
1420Sstevel@tonic-gate if (in != tm)
1430Sstevel@tonic-gate {
1440Sstevel@tonic-gate in=M_ASN1_TIME_dup(tm);
1450Sstevel@tonic-gate if (in != NULL)
1460Sstevel@tonic-gate {
1470Sstevel@tonic-gate M_ASN1_TIME_free(x->revocationDate);
1480Sstevel@tonic-gate x->revocationDate=in;
1490Sstevel@tonic-gate }
1500Sstevel@tonic-gate }
1510Sstevel@tonic-gate return(in != NULL);
1520Sstevel@tonic-gate }
1530Sstevel@tonic-gate
X509_REVOKED_set_serialNumber(X509_REVOKED * x,ASN1_INTEGER * serial)1540Sstevel@tonic-gate int X509_REVOKED_set_serialNumber(X509_REVOKED *x, ASN1_INTEGER *serial)
1550Sstevel@tonic-gate {
1560Sstevel@tonic-gate ASN1_INTEGER *in;
1570Sstevel@tonic-gate
1580Sstevel@tonic-gate if (x == NULL) return(0);
1590Sstevel@tonic-gate in=x->serialNumber;
1600Sstevel@tonic-gate if (in != serial)
1610Sstevel@tonic-gate {
1620Sstevel@tonic-gate in=M_ASN1_INTEGER_dup(serial);
1630Sstevel@tonic-gate if (in != NULL)
1640Sstevel@tonic-gate {
1650Sstevel@tonic-gate M_ASN1_INTEGER_free(x->serialNumber);
1660Sstevel@tonic-gate x->serialNumber=in;
1670Sstevel@tonic-gate }
1680Sstevel@tonic-gate }
1690Sstevel@tonic-gate return(in != NULL);
1700Sstevel@tonic-gate }
171