195c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley/* Written by Dr Stephen N Henson (steve@openssl.org) for the OpenSSL
295c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley * project 2000. */
395c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley/* ====================================================================
495c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley * Copyright (c) 2000-2005 The OpenSSL Project.  All rights reserved.
595c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley *
695c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley * Redistribution and use in source and binary forms, with or without
795c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley * modification, are permitted provided that the following conditions
895c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley * are met:
995c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley *
1095c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley * 1. Redistributions of source code must retain the above copyright
1195c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley *    notice, this list of conditions and the following disclaimer.
1295c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley *
1395c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley * 2. Redistributions in binary form must reproduce the above copyright
1495c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley *    notice, this list of conditions and the following disclaimer in
1595c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley *    the documentation and/or other materials provided with the
1695c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley *    distribution.
1795c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley *
1895c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley * 3. All advertising materials mentioning features or use of this
1995c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley *    software must display the following acknowledgment:
2095c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley *    "This product includes software developed by the OpenSSL Project
2195c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley *    for use in the OpenSSL Toolkit. (http://www.OpenSSL.org/)"
2295c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley *
2395c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley * 4. The names "OpenSSL Toolkit" and "OpenSSL Project" must not be used to
2495c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley *    endorse or promote products derived from this software without
2595c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley *    prior written permission. For written permission, please contact
2695c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley *    licensing@OpenSSL.org.
2795c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley *
2895c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley * 5. Products derived from this software may not be called "OpenSSL"
2995c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley *    nor may "OpenSSL" appear in their names without prior written
3095c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley *    permission of the OpenSSL Project.
3195c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley *
3295c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley * 6. Redistributions of any form whatsoever must retain the following
3395c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley *    acknowledgment:
3495c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley *    "This product includes software developed by the OpenSSL Project
3595c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley *    for use in the OpenSSL Toolkit (http://www.OpenSSL.org/)"
3695c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley *
3795c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley * THIS SOFTWARE IS PROVIDED BY THE OpenSSL PROJECT ``AS IS'' AND ANY
3895c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley * EXPRESSED OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
3995c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
4095c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE OpenSSL PROJECT OR
4195c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley * ITS CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
4295c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
4395c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
4495c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
4595c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
4695c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
4795c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED
4895c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley * OF THE POSSIBILITY OF SUCH DAMAGE.
4995c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley * ====================================================================
5095c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley *
5195c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley * This product includes cryptographic software written by Eric Young
5295c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley * (eay@cryptsoft.com).  This product includes software written by Tim
5395c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley * Hudson (tjh@cryptsoft.com). */
5495c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley
5595c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley#include <openssl/dsa.h>
5695c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley
5795c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley#include <openssl/asn1.h>
5895c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley#include <openssl/asn1t.h>
5995c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley#include <openssl/err.h>
6095c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley#include <openssl/mem.h>
6195c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley
6295c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley#include "internal.h"
6395c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley
6495c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley
6595c29f3cd1f6c08c6c0927868683392eea727ccAdam Langleystatic int dsa_sig_cb(int operation, ASN1_VALUE **pval, const ASN1_ITEM *it,
6695c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley                      void *exarg) {
6795c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley  if (operation != ASN1_OP_NEW_PRE) {
6895c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley    return 1;
6995c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley  }
7095c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley
7195c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley  DSA_SIG *sig;
7295c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley  sig = OPENSSL_malloc(sizeof(DSA_SIG));
7395c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley  if (!sig) {
7495c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley    OPENSSL_PUT_ERROR(DSA, dsa_sig_cb, ERR_R_MALLOC_FAILURE);
7595c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley    return 0;
7695c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley  }
7795c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley
7895c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley  memset(sig, 0, sizeof(DSA_SIG));
7995c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley  *pval = (ASN1_VALUE *)sig;
8095c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley  return 2;
8195c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley}
8295c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley
8395c29f3cd1f6c08c6c0927868683392eea727ccAdam LangleyASN1_SEQUENCE_cb(DSA_SIG, dsa_sig_cb) = {
8495c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley    ASN1_SIMPLE(DSA_SIG, r, CBIGNUM),
8595c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley    ASN1_SIMPLE(DSA_SIG, s, CBIGNUM)} ASN1_SEQUENCE_END_cb(DSA_SIG, DSA_SIG);
8695c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley
8795c29f3cd1f6c08c6c0927868683392eea727ccAdam LangleyIMPLEMENT_ASN1_ENCODE_FUNCTIONS_const_fname(DSA_SIG, DSA_SIG, DSA_SIG);
8895c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley
8995c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley
9095c29f3cd1f6c08c6c0927868683392eea727ccAdam Langleystatic int dsa_cb(int operation, ASN1_VALUE **pval, const ASN1_ITEM *it,
9195c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley                  void *exarg) {
9295c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley  switch (operation) {
9395c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley    case ASN1_OP_NEW_PRE:
9495c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley      *pval = (ASN1_VALUE *)DSA_new();
9595c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley      if (*pval) {
9695c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley        return 2;
9795c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley      }
9895c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley      return 0;
9995c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley
10095c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley    case ASN1_OP_FREE_PRE:
10195c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley      DSA_free((DSA *)*pval);
10295c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley      *pval = NULL;
10395c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley      return 2;
10495c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley
10595c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley    default:
10695c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley      return 1;
10795c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley  }
10895c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley}
10995c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley
11095c29f3cd1f6c08c6c0927868683392eea727ccAdam LangleyASN1_SEQUENCE_cb(DSAPrivateKey, dsa_cb) = {
11195c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley    ASN1_SIMPLE(DSA, version, LONG),
11295c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley    ASN1_SIMPLE(DSA, p, BIGNUM),
11395c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley    ASN1_SIMPLE(DSA, q, BIGNUM),
11495c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley    ASN1_SIMPLE(DSA, g, BIGNUM),
11595c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley    ASN1_SIMPLE(DSA, pub_key, BIGNUM),
11695c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley    ASN1_SIMPLE(DSA, priv_key, BIGNUM)} ASN1_SEQUENCE_END_cb(DSA,
11795c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley                                                             DSAPrivateKey);
11895c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley
11995c29f3cd1f6c08c6c0927868683392eea727ccAdam LangleyIMPLEMENT_ASN1_ENCODE_FUNCTIONS_const_fname(DSA, DSAPrivateKey, DSAPrivateKey);
12095c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley
12195c29f3cd1f6c08c6c0927868683392eea727ccAdam LangleyASN1_SEQUENCE_cb(DSAparams, dsa_cb) = {
12295c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley    ASN1_SIMPLE(DSA, p, BIGNUM), ASN1_SIMPLE(DSA, q, BIGNUM),
12395c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley    ASN1_SIMPLE(DSA, g, BIGNUM), } ASN1_SEQUENCE_END_cb(DSA, DSAparams);
12495c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley
12595c29f3cd1f6c08c6c0927868683392eea727ccAdam LangleyIMPLEMENT_ASN1_ENCODE_FUNCTIONS_const_fname(DSA, DSAparams, DSAparams);
12695c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley
12795c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley
12895c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley/* DSA public key is a bit trickier... its effectively a CHOICE type decided by
12995c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley * a field called write_params which can either write out just the public key
13095c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley * as an INTEGER or the parameters and public key in a SEQUENCE. */
13195c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley
13295c29f3cd1f6c08c6c0927868683392eea727ccAdam LangleyASN1_SEQUENCE(dsa_pub_internal) = {
13395c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley	ASN1_SIMPLE(DSA, pub_key, BIGNUM),
13495c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley	ASN1_SIMPLE(DSA, p, BIGNUM),
13595c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley	ASN1_SIMPLE(DSA, q, BIGNUM),
13695c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley	ASN1_SIMPLE(DSA, g, BIGNUM)
13795c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley} ASN1_SEQUENCE_END_name(DSA, dsa_pub_internal);
13895c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley
13995c29f3cd1f6c08c6c0927868683392eea727ccAdam LangleyASN1_CHOICE_cb(DSAPublicKey, dsa_cb) = {
14095c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley	ASN1_SIMPLE(DSA, pub_key, BIGNUM),
14195c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley	ASN1_EX_COMBINE(0, 0, dsa_pub_internal)
14295c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley} ASN1_CHOICE_END_cb(DSA, DSAPublicKey, write_params);
14395c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley
14495c29f3cd1f6c08c6c0927868683392eea727ccAdam LangleyIMPLEMENT_ASN1_ENCODE_FUNCTIONS_const_fname(DSA, DSAPublicKey, DSAPublicKey);
14595c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley
14695c29f3cd1f6c08c6c0927868683392eea727ccAdam LangleyDSA *DSAparams_dup(const DSA *dsa) {
14795c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley  return ASN1_item_dup(ASN1_ITEM_rptr(DSAparams), (DSA*) dsa);
14895c29f3cd1f6c08c6c0927868683392eea727ccAdam Langley}
149