add e-asn1-object.[ch]

2003-12-03  Chris Toshok  <toshok@ximian.com>

	* lib/Makefile.am (libessmime_la_SOURCES): add e-asn1-object.[ch]

	* gui/smime-ui.glade: rename the ca trust dialog, and give it a
	proper id.

	* gui/certificate-manager.c (yourcerts_selection_changed): just
	use @selection.
	(contactcerts_selection_changed): same.
	(authoritycerts_selection_changed): same.

	* gui/certificate-viewer.c (free_data): free the cert chain.
	(fill_in_general): move all the general tab stuff here.
	(hierarchy_selection_changed): new function.  not finished.
	(fields_selection_changed): new function, unimplemented.
	(fill_in_details): new function, fill in the heirarchy and hook up
	signals and stuff.
	(certificate_viewer_show): call fill_in_general/fill_in_details.

	* lib/e-cert.c (e_cert_get_chain): new function.

	* lib/e-cert.h: add prototype for e_cert_get_chain.

svn path=/trunk/; revision=23622

5 files changed, 479 insertions, 0 deletions

diff --git a/smime/lib/Makefile.am b/smime/lib/Makefile.am
index d7d5b11784..69c435fb1e 100644
--- a/smime/lib/Makefile.am
+++ b/smime/lib/Makefile.am
@@ -20,6 +20,8 @@ INCLUDES =						\
 noinst_LTLIBRARIES = libessmime.la
 
 libessmime_la_SOURCES = 	\
+	e-asn1-object.c		\
+	e-asn1-object.h		\
 	e-cert.c		\
 	e-cert.h		\
 	e-cert-trust.c		\
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;
+}
diff --git a/smime/lib/e-asn1-object.h b/smime/lib/e-asn1-object.h
new file mode 100644
index 0000000000..ebdb7de15e
--- /dev/null
+++ b/smime/lib/e-asn1-object.h
@@ -0,0 +1,81 @@
+/* -*- Mode: C; tab-width: 8; indent-tabs-mode: t; c-basic-offset: 8 -*- */
+/*
+ *  Authors: Chris Toshok <toshok@ximian.com>
+ *
+ *  Copyright (C) 2003 Ximian, Inc. (www.ximian.com)
+ *
+ *  This program is free software; you can redistribute it and/or modify
+ *  it under the terms of the GNU General Public License as published by
+ *  the Free Software Foundation; either version 2 of the License, or
+ *  (at your option) any later version.
+ *
+ *  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 Street #330, Boston, MA 02111-1307, USA.
+ *
+ */
+
+#ifndef _E_ASN1_OBJECT_H_
+#define _E_ASN1_OBJECT_H_
+
+#include <glib-object.h>
+
+#include "e-cert.h"
+
+#include <nspr.h>
+
+#define E_TYPE_ASN1_OBJECT            (e_asn1_object_get_type ())
+#define E_ASN1_OBJECT(obj)            (G_TYPE_CHECK_INSTANCE_CAST ((obj), E_TYPE_ASN1_OBJECT, EASN1Object))
+#define E_ASN1_OBJECT_CLASS(klass)    (G_TYPE_CHECK_CLASS_CAST ((klass), E_TYPE_ASN1_OBJECT, EASN1ObjectClass))
+#define E_IS_ASN1_OBJECT(obj)         (G_TYPE_CHECK_INSTANCE_TYPE ((obj), E_TYPE_ASN1_OBJECT))
+#define E_IS_ASN1_OBJECT_CLASS(klass) (G_TYPE_CHECK_CLASS_TYPE ((klass), E_TYPE_ASN1_OBJECT))
+#define E_ASN1_OBJECT_GET_CLASS(obj)  (G_TYPE_INSTANCE_GET_CLASS ((obj), E_TYPE_ASN1_OBJECT, EASN1ObjectClass))
+
+typedef struct _EASN1Object EASN1Object;
+typedef struct _EASN1ObjectClass EASN1ObjectClass;
+typedef struct _EASN1ObjectPrivate EASN1ObjectPrivate;
+
+enum {
+  E_ASN1_OBJECT_TYPE_APPLICATION,
+  E_ASN1_OBJECT_TYPE_CONTEXT_SPECIFIC,
+  E_ASN1_OBJECT_TYPE_PRIVATE
+};
+
+struct _EASN1Object {
+	GObject parent;
+
+	EASN1ObjectPrivate *priv;
+};
+
+struct _EASN1ObjectClass {
+	GObjectClass parent_class;
+
+	/* Padding for future expansion */
+	void (*_ecert_reserved0) (void);
+	void (*_ecert_reserved1) (void);
+	void (*_ecert_reserved2) (void);
+	void (*_ecert_reserved3) (void);
+	void (*_ecert_reserved4) (void);
+};
+
+EASN1Object     *e_asn1_object_new_from_cert      (ECert *cert);
+EASN1Object     *e_asn1_object_new_from_der       (char *data, guint32 len);
+EASN1Object     *e_asn1_object_new                (void);
+
+gboolean         e_asn1_object_is_valid_container (EASN1Object *obj);
+PRUint32         e_asn1_object_get_asn1_type      (EASN1Object *obj);
+PRUint32         e_asn1_object_get_asn1_tag       (EASN1Object *obj);
+GList           *e_asn1_object_get_children       (EASN1Object *obj);
+const char      *e_asn1_object_get_display_name   (EASN1Object *obj);
+const char      *e_asn1_object_get_display_value  (EASN1Object *obj);
+
+void             e_asn1_object_get_data           (EASN1Object *obj, char **data, guint32 *len);
+
+GType            e_asn1_object_get_type (void);
+
+#endif /* _E_ASN1_OBJECT_H_ */
diff --git a/smime/lib/e-cert.c b/smime/lib/e-cert.c
index a8fa5879c2..2389cc29c8 100644
--- a/smime/lib/e-cert.c
+++ b/smime/lib/e-cert.c
@@ -409,6 +409,31 @@ e_cert_get_md5_fingerprint  (ECert *cert)
 	return cert->priv->md5_fingerprint;
 }
 
+GList*
+e_cert_get_chain (ECert *ecert)
+{
+	GList *l = NULL;
+
+	g_object_ref (ecert);
+
+	while (ecert) {
+		CERTCertificate *cert = e_cert_get_internal_cert (ecert);
+		CERTCertificate *next_cert;
+
+		l = g_list_append (l, ecert);
+
+		if (SECITEM_CompareItem(&cert->derIssuer, &cert->derSubject) == SECEqual)
+			break;
+
+		next_cert = CERT_FindCertIssuer (cert, PR_Now(), certUsageSSLClient);
+		if (!next_cert)
+			break;
+		ecert = e_cert_new (next_cert);
+	}
+
+	return l;
+}
+
 gboolean
 e_cert_mark_for_deletion (ECert *cert)
 {
diff --git a/smime/lib/e-cert.h b/smime/lib/e-cert.h
index 4b5ec05a96..ac596b285b 100644
--- a/smime/lib/e-cert.h
+++ b/smime/lib/e-cert.h
@@ -91,6 +91,8 @@ const char*          e_cert_get_serial_number    (ECert *cert);
 const char*          e_cert_get_sha1_fingerprint (ECert *cert);
 const char*          e_cert_get_md5_fingerprint  (ECert *cert);
 
+GList*               e_cert_get_chain     (ECert *cert);
+
 gboolean             e_cert_mark_for_deletion (ECert *cert);
 
 ECertType            e_cert_get_cert_type (ECert *cert);