1 files changed, 194 insertions, 0 deletions
diff --git a/tdeio/kssl/ksslcertchain.cpp b/tdeio/kssl/ksslcertchain.cpp
new file mode 100644
index 000000000..4f14e4be1
--- /dev/null
+++ b/tdeio/kssl/ksslcertchain.cpp
@@ -0,0 +1,194 @@
+/* This file is part of the KDE project
+ *
+ * Copyright (C) 2001 George Staikos <staikos@kde.org>
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Library General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library 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
+ * Library General Public License for more details.
+ *
+ * You should have received a copy of the GNU Library General Public License
+ * along with this library; see the file COPYING.LIB.  If not, write to
+ * the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
+ * Boston, MA 02110-1301, USA.
+ */
+#ifdef HAVE_CONFIG_H 
+#include <config.h>
+#endif
+
+#include "kssldefs.h"
+#include "ksslcertificate.h"
+#include "ksslcertchain.h"
+
+// this hack provided by Malte Starostik to avoid glibc/openssl bug
+// on some systems
+#ifdef KSSL_HAVE_SSL
+#define crypt _openssl_crypt
+#include <openssl/ssl.h>
+#include <openssl/x509.h>
+#include <openssl/x509v3.h>
+#include <openssl/x509_vfy.h>
+#include <openssl/pem.h>
+#include <openssl/stack.h>
+#include <openssl/safestack.h>
+#undef crypt
+#endif
+
+#include <kopenssl.h>
+#include <kdebug.h>
+#include <tqstringlist.h>
+
+
+class KSSLCertChainPrivate {
+public:
+  KSSLCertChainPrivate() {
+     kossl = KOSSL::self();
+  }
+
+  ~KSSLCertChainPrivate() {
+  }
+
+  KOSSL *kossl;
+};
+
+KSSLCertChain::KSSLCertChain() {
+  d = new KSSLCertChainPrivate;
+  _chain = NULL;
+}
+
+
+KSSLCertChain::~KSSLCertChain() {
+#ifdef KSSL_HAVE_SSL
+  if (_chain) {
+    STACK_OF(X509) *x = (STACK_OF(X509) *)_chain;
+
+    for (;;) {
+      X509* x5 = reinterpret_cast<X509*>(d->kossl->OPENSSL_sk_pop(x));
+      if (!x5) break;
+      d->kossl->X509_free(x5);
+    }
+    d->kossl->OPENSSL_sk_free(x);
+  }
+#endif
+  delete d;
+}
+
+
+bool KSSLCertChain::isValid() {
+  return (_chain && depth() > 0);
+}
+
+
+KSSLCertChain *KSSLCertChain::replicate() {
+KSSLCertChain *x = new KSSLCertChain;
+TQPtrList<KSSLCertificate> ch = getChain();
+
+  x->setChain(ch);   // this will do a deep copy for us
+  ch.setAutoDelete(true);
+return x;
+}
+
+
+int KSSLCertChain::depth() {
+#ifdef KSSL_HAVE_SSL
+  return d->kossl->OPENSSL_sk_num((STACK_OF(X509)*)_chain);
+#endif
+return 0;
+}
+
+
+TQPtrList<KSSLCertificate> KSSLCertChain::getChain() {
+TQPtrList<KSSLCertificate> cl;
+if (!_chain) return cl;
+#ifdef KSSL_HAVE_SSL
+STACK_OF(X509) *x = (STACK_OF(X509) *)_chain;
+
+   for (int i = 0; i < d->kossl->OPENSSL_sk_num(x); i++) {
+     X509* x5 = reinterpret_cast<X509*>(d->kossl->OPENSSL_sk_value(x, i));
+     if (!x5) continue;
+     KSSLCertificate *nc = new KSSLCertificate;
+     nc->setCert(d->kossl->X509_dup(x5));
+     cl.append(nc);
+   }
+
+#endif
+return cl;
+}
+
+
+void KSSLCertChain::setChain(TQPtrList<KSSLCertificate>& chain) {
+#ifdef KSSL_HAVE_SSL
+if (_chain) {
+    STACK_OF(X509) *x = (STACK_OF(X509) *)_chain;
+
+    for (;;) {
+      X509* x5 = reinterpret_cast<X509*>(d->kossl->OPENSSL_sk_pop(x));
+      if (!x5) break;
+      d->kossl->X509_free(x5);
+    }
+    d->kossl->OPENSSL_sk_free(x);
+    _chain = NULL;
+}
+
+  if (chain.count() == 0) return;
+  _chain = reinterpret_cast<STACK_OF(X509)*>(d->kossl->OPENSSL_sk_new(NULL));
+  for (KSSLCertificate *x = chain.first(); x != 0; x = chain.next()) {
+    d->kossl->OPENSSL_sk_push((STACK_OF(X509) *)_chain, d->kossl->X509_dup(x->getCert()));
+  }
+
+#endif
+}
+
+ 
+void KSSLCertChain::setChain(void *stack_of_x509) {
+#ifdef KSSL_HAVE_SSL
+    if (_chain) {
+        STACK_OF(X509) *x = (STACK_OF(X509) *)_chain;
+
+        for (;;) {
+          X509* x5 = reinterpret_cast<X509*>(d->kossl->OPENSSL_sk_pop(x));
+          if (!x5) break;
+          d->kossl->X509_free(x5);
+        }
+        d->kossl->OPENSSL_sk_free(x);
+        _chain = NULL;
+    }
+
+    if (!stack_of_x509) return;
+
+    _chain = reinterpret_cast<STACK_OF(X509)*>(d->kossl->OPENSSL_sk_new(NULL));
+    STACK_OF(X509) *x = (STACK_OF(X509) *)stack_of_x509;
+
+   for (int i = 0; i < d->kossl->OPENSSL_sk_num(x); i++) {
+     X509* x5 = reinterpret_cast<X509*>(d->kossl->OPENSSL_sk_value(x, i));
+     if (!x5) continue;
+     d->kossl->OPENSSL_sk_push((STACK_OF(X509)*)_chain,d->kossl->X509_dup(x5));
+   }
+
+#else
+    _chain = NULL;
+#endif
+}
+
+
+void KSSLCertChain::setChain(TQStringList chain) {
+	setCertChain(chain);
+}
+
+void KSSLCertChain::setCertChain(const TQStringList& chain) {
+    TQPtrList<KSSLCertificate> cl;
+    cl.setAutoDelete(true);
+    for (TQStringList::ConstIterator s = chain.begin(); s != chain.end(); ++s) {
+       KSSLCertificate *c = KSSLCertificate::fromString((*s).local8Bit());
+       if (c) {
+          cl.append(c);
+       }
+    }
+    setChain(cl);
+}
+