aboutsummaryrefslogtreecommitdiffstats
path: root/smime/lib/e-asn1-object.c
diff options
context:
space:
mode:
Diffstat (limited to 'smime/lib/e-asn1-object.c')
-rw-r--r--smime/lib/e-asn1-object.c369
1 files changed, 369 insertions, 0 deletions
diff --git a/smime/lib/e-asn1-object.c b/smime/lib/e-asn1-object.c
new file mode 100644
index 0000000000..47cf591b48
--- /dev/null
+++ b/smime/lib/e-asn1-object.c
@@ -0,0 +1,369 @@
+/* -*- Mode: C; tab-width: 8; indent-tabs-mode: t; c-basic-offset: 8 -*- */
+/* e-cert.c
+ *
+ * Copyright (C) 2003 Ximian, Inc.
+ *
+ * This program is free software; you can redistribute it and/or
+ * modify it under the terms of version 2 of the GNU General Public
+ * License as published by the Free Software Foundation.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public
+ * License along with this program; if not, write to the
+ * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+ * Boston, MA 02111-1307, USA.
+ *
+ * Author: Chris Toshok (toshok@ximian.com)
+ */
+
+/* The following is the mozilla license blurb, as the bodies some of
+ these functions were derived from the mozilla source. */
+
+/*
+ * The contents of this file are subject to the Mozilla Public
+ * License Version 1.1 (the "License"); you may not use this file
+ * except in compliance with the License. You may obtain a copy of
+ * the License at http://www.mozilla.org/MPL/
+ *
+ * Software distributed under the License is distributed on an "AS
+ * IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+ * implied. See the License for the specific language governing
+ * rights and limitations under the License.
+ *
+ * The Original Code is the Netscape security libraries.
+ *
+ * The Initial Developer of the Original Code is Netscape
+ * Communications Corporation. Portions created by Netscape are
+ * Copyright (C) 2000 Netscape Communications Corporation. All
+ * Rights Reserved.
+ *
+ * Alternatively, the contents of this file may be used under the
+ * terms of the GNU General Public License Version 2 or later (the
+ * "GPL"), in which case the provisions of the GPL are applicable
+ * instead of those above. If you wish to allow use of your
+ * version of this file only under the terms of the GPL and not to
+ * allow others to use your version of this file under the MPL,
+ * indicate your decision by deleting the provisions above and
+ * replace them with the notice and other provisions required by
+ * the GPL. If you do not delete the provisions above, a recipient
+ * may use your version of this file under either the MPL or the
+ * GPL.
+ *
+ */
+
+#include "e-asn1-object.h"
+
+#include "secasn1.h"
+
+struct _EASN1ObjectPrivate {
+ PRUint32 tag;
+ PRUint32 type;
+ gboolean valid_container;
+
+ GList *children;
+
+ char *display_name;
+ char *value;
+
+ char *data;
+ guint data_len;
+};
+
+#define PARENT_TYPE G_TYPE_OBJECT
+static GObjectClass *parent_class;
+
+static void
+e_asn1_object_dispose (GObject *object)
+{
+}
+
+static void
+e_asn1_object_class_init (EASN1ObjectClass *klass)
+{
+ GObjectClass *object_class;
+
+ object_class = G_OBJECT_CLASS(klass);
+
+ parent_class = g_type_class_ref (PARENT_TYPE);
+
+ object_class->dispose = e_asn1_object_dispose;
+}
+
+static void
+e_asn1_object_init (EASN1Object *asn1)
+{
+ asn1->priv = g_new0 (EASN1ObjectPrivate, 1);
+}
+
+GType
+e_asn1_object_get_type (void)
+{
+ static GType asn1_object_type = 0;
+
+ if (!asn1_object_type) {
+ static const GTypeInfo asn1_object_info = {
+ sizeof (EASN1ObjectClass),
+ NULL, /* base_init */
+ NULL, /* base_finalize */
+ (GClassInitFunc) e_asn1_object_class_init,
+ NULL, /* class_finalize */
+ NULL, /* class_data */
+ sizeof (EASN1Object),
+ 0, /* n_preallocs */
+ (GInstanceInitFunc) e_asn1_object_init,
+ };
+
+ asn1_object_type = g_type_register_static (PARENT_TYPE, "EASN1Object", &asn1_object_info, 0);
+ }
+
+ return asn1_object_type;
+}
+
+
+/* This function is used to interpret an integer that
+ was encoded in a DER buffer. This function is used
+ when converting a DER buffer into a nsIASN1Object
+ structure. This interprets the buffer in data
+ as defined by the DER (Distinguised Encoding Rules) of
+ ASN1.
+*/
+static int
+get_integer_256 (unsigned char *data, unsigned int nb)
+{
+ int val;
+
+ switch (nb) {
+ case 1:
+ val = data[0];
+ break;
+ case 2:
+ val = (data[0] << 8) | data[1];
+ break;
+ case 3:
+ val = (data[0] << 16) | (data[1] << 8) | data[2];
+ break;
+ case 4:
+ val = (data[0] << 24) | (data[1] << 16) | (data[2] << 8) | data[3];
+ break;
+ default:
+ return -1;
+ }
+
+ return val;
+}
+
+/* This function is used to retrieve the lenght of a DER encoded
+ item. It looks to see if this a multibyte length and then
+ interprets the buffer accordingly to get the actual length value.
+ This funciton is used mostly while parsing the DER headers.
+
+ A DER encoded item has the following structure:
+
+ <tag><length<data consisting of lenght bytes>
+*/
+static guint32
+get_der_item_length (unsigned char *data, unsigned char *end,
+ unsigned long *bytesUsed, gboolean *indefinite)
+{
+ unsigned char lbyte = *data++;
+ PRInt32 length = -1;
+
+ *indefinite = FALSE;
+ if (lbyte >= 0x80) {
+ /* Multibyte length */
+ unsigned nb = (unsigned) (lbyte & 0x7f);
+ if (nb > 4) {
+ return -1;
+ }
+ if (nb > 0) {
+
+ if ((data+nb) > end) {
+ return -1;
+ }
+ length = get_integer_256 (data, nb);
+ if (length < 0)
+ return -1;
+ } else {
+ *indefinite = TRUE;
+ length = 0;
+ }
+ *bytesUsed = nb+1;
+ } else {
+ length = lbyte;
+ *bytesUsed = 1;
+ }
+ return length;
+}
+
+static gboolean
+build_from_der (EASN1Object *parent, char *data, char *end)
+{
+ unsigned long bytesUsed;
+ gboolean indefinite;
+ PRInt32 len;
+ PRUint32 type;
+ unsigned char code, tagnum;
+ EASN1Object *asn1object;
+
+ if (data >= end)
+ return TRUE;
+
+ /*
+ A DER item has the form of |tag|len|data
+ tag is one byte and describes the type of elment
+ we are dealing with.
+ len is a DER encoded int telling us how long the data is
+ data is a buffer that is len bytes long and has to be
+ interpreted according to its type.
+ */
+
+ while (data < end) {
+ code = *data;
+ tagnum = code & SEC_ASN1_TAGNUM_MASK;
+
+ /*
+ * NOTE: This code does not (yet) handle the high-tag-number form!
+ */
+ if (tagnum == SEC_ASN1_HIGH_TAG_NUMBER) {
+ return FALSE;
+ }
+ data++;
+ len = get_der_item_length (data, end, &bytesUsed, &indefinite);
+ data += bytesUsed;
+ if ((len < 0) || ((data+len) > end))
+ return FALSE;
+
+ if (code & SEC_ASN1_CONSTRUCTED) {
+ if (len > 0 || indefinite) {
+ switch (code & SEC_ASN1_CLASS_MASK) {
+ case SEC_ASN1_UNIVERSAL:
+ type = tagnum;
+ break;
+ case SEC_ASN1_APPLICATION:
+ type = E_ASN1_OBJECT_TYPE_APPLICATION;
+ break;
+ case SEC_ASN1_CONTEXT_SPECIFIC:
+ type = E_ASN1_OBJECT_TYPE_CONTEXT_SPECIFIC;
+ break;
+ case SEC_ASN1_PRIVATE:
+ type = E_ASN1_OBJECT_TYPE_PRIVATE;
+ break;
+ default:
+ g_warning ("bad DER");
+ return FALSE;
+ }
+
+ asn1object = e_asn1_object_new ();
+ asn1object->priv->tag = tagnum;
+ asn1object->priv->type = type;
+
+ if (!build_from_der (asn1object, data, (len == 0) ? end : data + len)) {
+ g_object_unref (asn1object);
+ return FALSE;
+ }
+ }
+ } else {
+ asn1object = e_asn1_object_new ();
+
+ asn1object->priv->type = tagnum;
+ asn1object->priv->tag = tagnum;
+
+ /*printableItem->SetData((char*)data, len);*/
+ }
+ data += len;
+
+ parent->priv->children = g_list_append (parent->priv->children, asn1object);
+ }
+
+ return TRUE;
+}
+
+EASN1Object*
+e_asn1_object_new_from_der (char *data, guint32 len)
+{
+ EASN1Object *obj = g_object_new (E_TYPE_ASN1_OBJECT, NULL);
+
+ if (!build_from_der (obj, data, data + len)) {
+ g_object_unref (obj);
+ return NULL;
+ }
+
+ return obj;
+}
+
+EASN1Object*
+e_asn1_object_new_from_cert (ECert *cert)
+{
+ char *data;
+ guint32 len;
+ EASN1Object *obj;
+
+ if (!e_cert_get_raw_der (cert, &data, &len))
+ return NULL;
+
+ obj = g_object_new (E_TYPE_ASN1_OBJECT, NULL);
+ if (!build_from_der (obj, data, data + len)) {
+ g_object_unref (obj);
+ return NULL;
+ }
+
+ return obj;
+}
+
+EASN1Object*
+e_asn1_object_new (void)
+{
+ return E_ASN1_OBJECT (g_object_new (E_TYPE_ASN1_OBJECT, NULL));
+}
+
+
+gboolean
+e_asn1_object_is_valid_container (EASN1Object *obj)
+{
+ return obj->priv->valid_container;
+}
+
+PRUint32
+e_asn1_object_get_asn1_type (EASN1Object *obj)
+{
+ return obj->priv->type;
+}
+
+PRUint32
+e_asn1_object_get_asn1_tag (EASN1Object *obj)
+{
+ return obj->priv->tag;
+}
+
+GList*
+e_asn1_object_get_children (EASN1Object *obj)
+{
+ GList *children = g_list_copy (obj->priv->children);
+
+ g_list_foreach (children, (GFunc)g_object_ref, NULL);
+
+ return children;
+}
+
+const char*
+e_asn1_object_get_display_name (EASN1Object *obj)
+{
+ return obj->priv->display_name;
+}
+
+const char*
+e_asn1_object_get_display_value (EASN1Object *obj)
+{
+ return obj->priv->value;
+}
+
+void
+e_asn1_object_get_data (EASN1Object *obj, char **data, guint32 *len)
+{
+ *data = obj->priv->data;
+ *len = obj->priv->data_len;
+}