diff options
Diffstat (limited to 'tdefile-plugins/cert')
-rw-r--r-- | tdefile-plugins/cert/Makefile.am | 22 | ||||
-rw-r--r-- | tdefile-plugins/cert/configure.in.in | 2 | ||||
-rw-r--r-- | tdefile-plugins/cert/tdefile_cert.cpp | 161 | ||||
-rw-r--r-- | tdefile-plugins/cert/tdefile_cert.desktop | 60 | ||||
-rw-r--r-- | tdefile-plugins/cert/tdefile_cert.h | 43 |
5 files changed, 288 insertions, 0 deletions
diff --git a/tdefile-plugins/cert/Makefile.am b/tdefile-plugins/cert/Makefile.am new file mode 100644 index 0000000..ff679f5 --- /dev/null +++ b/tdefile-plugins/cert/Makefile.am @@ -0,0 +1,22 @@ +## Makefile.am for cert file meta info plugin + +# set the include path for X, qt and KDE +INCLUDES = $(all_includes) + +# these are the headers for your project +noinst_HEADERS = tdefile_cert.h + +kde_module_LTLIBRARIES = tdefile_cert.la + +tdefile_cert_la_SOURCES = tdefile_cert.cpp +tdefile_cert_la_LDFLAGS = $(all_libraries) -module $(KDE_PLUGIN) +tdefile_cert_la_LIBADD = $(LIB_KSYCOCA) + +# let automoc handle all of the meta source files (moc) +METASOURCES = AUTO + +messages: rc.cpp + $(XGETTEXT) tdefile_cert.cpp -o $(podir)/tdefile_cert.pot + +services_DATA = tdefile_cert.desktop +servicesdir = $(kde_servicesdir) diff --git a/tdefile-plugins/cert/configure.in.in b/tdefile-plugins/cert/configure.in.in new file mode 100644 index 0000000..5c78161 --- /dev/null +++ b/tdefile-plugins/cert/configure.in.in @@ -0,0 +1,2 @@ +KDE_CHECK_SSL +AM_CONDITIONAL(include_tdefileplugin_cert_SUBDIR, test "$have_ssl" = yes) diff --git a/tdefile-plugins/cert/tdefile_cert.cpp b/tdefile-plugins/cert/tdefile_cert.cpp new file mode 100644 index 0000000..7f68023 --- /dev/null +++ b/tdefile-plugins/cert/tdefile_cert.cpp @@ -0,0 +1,161 @@ +/*************************************************************************** + * Copyright (C) 2004 by Leonid Zeitlin * + * lz@europe.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., * + * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. * + ***************************************************************************/ + +#include <config.h> +#include "tdefile_cert.h" + +#include <kgenericfactory.h> +#include <ksslcertificate.h> +#include <ksslx509map.h> +#include <kopenssl.h> +//#include <kstandarddirs.h> +//#include <kdebug.h> +//#include <tdeio/global.h> + +#include <tqdatetime.h> +#include <tqfile.h> +#include <tqcstring.h> +//#include <tqfileinfo.h> +//#include <tqdir.h> + +typedef KGenericFactory<CertPlugin> CertFactory; + +K_EXPORT_COMPONENT_FACTORY(tdefile_cert, CertFactory("tdefile-cert")) + +CertPlugin::CertPlugin(TQObject *parent, const char *name, const TQStringList &args) + : KFilePlugin(parent, name, args) +{ + //add the mimetype here - example: + //KFileMimeTypeInfo* info = addMimeTypeInfo( "text/html" ); + KFileMimeTypeInfo* info = addMimeTypeInfo( "application/x-x509-ca-cert" ); + + // our new group + KFileMimeTypeInfo::GroupInfo* group = 0L; + KFileMimeTypeInfo::ItemInfo* item; + + group = addGroupInfo(info, "certInfo", i18n("Certificate Information")); + item = addItemInfo(group, "ValidFrom", i18n("Valid From"), TQVariant::DateTime); + item = addItemInfo(group, "ValidUntil", i18n("Valid Until"), TQVariant::DateTime); + item = addItemInfo(group, "State", i18n("State"), TQVariant::String); + item = addItemInfo(group, "SerialNo", i18n("Serial Number"), TQVariant::String); + + group = addGroupInfo(info, "certSubjectInfo", i18n("Subject")); + item = addItemInfo(group, "O", i18n("Organization"), TQVariant::String); + item = addItemInfo(group, "OU", i18n("Organizational Unit"), TQVariant::String); + item = addItemInfo(group, "L", i18n("Locality"), TQVariant::String); + item = addItemInfo(group, "C", i18n("Country"), TQVariant::String); + item = addItemInfo(group, "CN", i18n("Common Name"), TQVariant::String); + item = addItemInfo(group, "E", i18n("Email"), TQVariant::String); + + group = addGroupInfo(info, "certIssuerInfo", i18n("Issuer")); + item = addItemInfo(group, "O", i18n("Organization"), TQVariant::String); + item = addItemInfo(group, "OU", i18n("Organizational Unit"), TQVariant::String); + item = addItemInfo(group, "L", i18n("Locality"), TQVariant::String); + item = addItemInfo(group, "C", i18n("Country"), TQVariant::String); + item = addItemInfo(group, "CN", i18n("Common Name"), TQVariant::String); + item = addItemInfo(group, "E", i18n("Email"), TQVariant::String); + + //setUnit(item, KFileMimeTypeInfo::KiloBytes); + + // strings are possible, too: + //addItemInfo(group, "Text", i18n("Document Type"), TQVariant::String); +} + +void CertPlugin::appendDNItems(KFileMetaInfoGroup &group, const TQString &DN) +{ + KSSLX509Map map(DN); + TQString value; + //TQString dbg; + TQStringList keys = group.supportedKeys(); + TQStringList::ConstIterator end = keys.end(); + for (TQStringList::ConstIterator it = keys.begin(); it != end; ++it) { + value = map.getValue(*it); + //dbg += *it + " = " + value + "; "; + if (!value.isNull()) appendItem(group, *it, value); + //appendItem(group, "CN", dbg); + } +} + +static KSSLCertificate *readCertFromFile(const TQString &path) +{ + KSSLCertificate *ret = NULL; + + TQFile file(path); + if (!file.open(IO_ReadOnly)) return NULL; + TQByteArray file_data = file.readAll(); + file.close(); + + TQCString file_string = TQCString(file_data.data(), file_data.size()); + // try as is: + ret = KSSLCertificate::fromString(file_string); + if (ret) return ret; + // didn't work. Let's see if begin/end lines are there: + KOSSL::self()->ERR_clear_error(); + const char *begin_line = "-----BEGIN CERTIFICATE-----\n"; + const char *end_line = "\n-----END CERTIFICATE-----"; + int begin_pos = file_string.find(begin_line); + if (begin_pos >= 0) { + begin_pos += strlen(begin_line); + int end_pos = file_string.find(end_line, begin_pos); + if (end_pos >= 0) { + // read the data between begin and end lines + TQCString body = file_string.mid(begin_pos, end_pos - begin_pos); + ret = KSSLCertificate::fromString(body); + return ret; // even if it's NULL, we can't help it + } + } + // still didn't work. Assume the file was in DER (binary) encoding + unsigned char *p = (unsigned char*) file_data.data(); + KOSSL::self()->ERR_clear_error(); + X509 *x = KOSSL::self()->d2i_X509(NULL, &p, file_data.size()); + if (x) { + ret = KSSLCertificate::fromX509(x); + KOSSL::self()->X509_free(x); + return ret; + } + else return NULL; +} + +bool CertPlugin::readInfo(KFileMetaInfo& info, uint /*what*/) +{ + KSSLCertificate *cert = readCertFromFile(info.path()); + if (cert) { + KFileMetaInfoGroup group = appendGroup(info, "certInfo"); + appendItem(group, "ValidFrom", cert->getQDTNotBefore()); + appendItem(group, "ValidUntil", cert->getQDTNotAfter()); + appendItem(group, "State", KSSLCertificate::verifyText(cert->validate())); + appendItem(group, "SerialNo", cert->getSerialNumber()); + + group = appendGroup(info, "certSubjectInfo"); + appendDNItems(group, cert->getSubject()); + + group = appendGroup(info, "certIssuerInfo"); + appendDNItems(group, cert->getIssuer()); + + delete cert; + return true; + } + else { + KOSSL::self()->ERR_clear_error(); // don't leave errors behind + return false; + } +} + +#include "tdefile_cert.moc" diff --git a/tdefile-plugins/cert/tdefile_cert.desktop b/tdefile-plugins/cert/tdefile_cert.desktop new file mode 100644 index 0000000..3e589b8 --- /dev/null +++ b/tdefile-plugins/cert/tdefile_cert.desktop @@ -0,0 +1,60 @@ +[Desktop Entry] +Type=Service +Name=Certificate Info +Name[bg]=Информация за удостоверение +Name[br]=Titouroù diwar-benn an testeni +Name[ca]=Informació del certificat +Name[cs]=Informace o certifikátu +Name[da]=Information om certifikat +Name[de]=Information zum Zertifikat +Name[el]=Πληροφορίες πιστοποιητικού +Name[eo]=Atesta informo +Name[es]=Información del certificado +Name[et]=Sertifikaadi info +Name[eu]=Ziurtagiriaren informazioa +Name[fa]=اطلاعات گواهینامه +Name[fi]=Sertifikaatin tiedot +Name[fr]=Informations sur le certificat +Name[fy]=Sertifikaatynformaasje +Name[ga]=Eolas faoin Teastas +Name[gl]=Informacións do Certificado +Name[hi]=प्रमाणपत्र जानकारी +Name[hr]=Podaci potvrde +Name[hu]=Tanúsítvány-jellemzők +Name[is]=Upplýsingar um skírteini +Name[it]=Informazioni del certificato +Name[ja]=認証情報 +Name[ka]=სერტიფიკატის ინფორმაცია +Name[kk]=Куәлік мәліметтері +Name[km]=ព័ត៌មានវិញ្ញាបនបត្រ +Name[lt]=Sertifikato informacija +Name[mk]=Информации за сертификати +Name[ms]=Maklumat Sijil +Name[nb]=Sertifikatinformasjon +Name[nds]=Zertifikaat-Informatschonen +Name[ne]=प्रमाणपत्र सूचना +Name[nl]=Certificaatinformatie +Name[nn]=Informasjon om sertifikat +Name[pa]=ਸਰਟੀਫਿਕੇਟ ਜਾਣਕਾਰੀ +Name[pl]=Informacja o certyfikacie +Name[pt]=Informações do Certificado +Name[pt_BR]=Informações sobre Certificado +Name[ru]=Информация о сертификате +Name[sk]=Informácie o certifikáte +Name[sl]=Informacija o certifikatu +Name[sr]=Информације о сертификату +Name[sr@Latn]=Informacije o sertifikatu +Name[sv]=Information om certifikat +Name[ta]=சான்றிதழ் தகவல் +Name[tr]=Sertifika Bilgisi +Name[uk]=Інформація про сертифікат +Name[uz]=Sertifikat haqida maʼlumot +Name[uz@cyrillic]=Сертификат ҳақида маълумот +Name[vi]=Thông tin chứng nhận +Name[zh_CN]=证书信息 +Name[zh_TW]=憑證資訊 +ServiceTypes=KFilePlugin +X-TDE-Library=tdefile_cert +MimeType=application/x-x509-ca-cert +PreferredGroups=certInfo,certSubjectInfo +PreferredItems=State,CN,O,OU,L,C diff --git a/tdefile-plugins/cert/tdefile_cert.h b/tdefile-plugins/cert/tdefile_cert.h new file mode 100644 index 0000000..4d3b93b --- /dev/null +++ b/tdefile-plugins/cert/tdefile_cert.h @@ -0,0 +1,43 @@ +/*************************************************************************** + * Copyright (C) 2004 by Leonid Zeitlin * + * lz@europe.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., * + * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. * + ***************************************************************************/ + +#ifndef __KFILE_CERT_H__ +#define __KFILE_CERT_H__ + +/** + * Note: For further information look into <$TDEDIR/include/tdefilemetainfo.h> + */ +#include <tdefilemetainfo.h> + +class TQStringList; +class TQString; + +class CertPlugin: public KFilePlugin { + Q_OBJECT + +private: + void appendDNItems(KFileMetaInfoGroup &group, const TQString &DN); +public: + CertPlugin(TQObject *parent, const char *name, const TQStringList& args); + virtual bool readInfo(KFileMetaInfo& info, uint what); +}; + +#endif // __KFILE_CERT_H__ + |