init III

2024-10-14 00:08:40 +02:00
parent dbfba56f66
commit 1462d52e13
4572 changed files with 2658864 additions and 0 deletions
--- a/Perl_tinyca_gtk3/GUI/WORDS.pm
+++ b/Perl_tinyca_gtk3/GUI/WORDS.pm
@@ -0,0 +1,116 @@
+# Copyright (c) Stephan Martin <sm@sm-zone.net>
+#
+# $Id: WORDS.pm,v 1.2 2006/06/28 21:50:42 sm Exp $
+#
+# 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 Place - Suite 330, Boston, MA  02111, USA.
+
+use strict;
+package GUI::WORDS;
+
+sub new {
+   my $that = shift;
+
+   my $self = {
+    'SAN'                   => "Subject Alternative Name",
+    'none'                  => _("Not set"),
+    'user'                  => _("Ask User"),
+    'critical'              => _("critical"),
+    'noncritical'           => _("not critical"),
+    'emailcopy'             => _("Copy Email"),
+    'raw'                   => _("raw"),
+    'dns'                   => _("DNS Name"),
+    'ip'                    => _("IP Address"),
+    'mail'                  => _("Email"),
+    'server'                => _("SSL Server"),
+    'server, client'        => _("SSL Server, SSL Client"),
+    'key'                   => _("Key Encipherment"),
+    'sig'                   => _("Digital Signature"),
+    'keysig'                => _("Key Encipherment, Digital Signature"),
+    'objsign'               => _("Object Signing"),
+    'client, objsign'       => _("SSL Client, Object Signing"),
+    'client, email'         => _("SSL Client, Email(S/MIME)"),
+    'client'                => _("SSL Client"),
+    'email'                 => _("Email(S/MIME)"),
+    'client, email, objsign'=> _("SSL Client, Email, Object Signing"),
+    'objCA'                 => _("Object Signing CA"),
+    'emailCA'               => _("S/MIME CA"),
+    'sslCA'                 => _("SSL CA"),
+    'sslCA, emailCA'        => _("SSL CA, S/MIME CA"),
+    'sslCA, objCA'          => _("SSL CA, Object Signing CA"),
+    'emailCA, objCA'        => _("S/MIME CA, Object Signing CA"),
+    'sslCA, emailCA, objCA' => _("SSL CA, S/MIME CA, Object Signing CA"),
+    'keyCertSign'           => _("Certificate Signing"),
+    'cRLSign'               => _("CRL Signing"),
+    'keyCertSign, cRLSign'  => _("Certificate Signing, CRL Signing"),
+    'CN'                    => _("Common Name"),
+    'EMAIL'                 => _("eMail Address"),
+    'O'                     => _("Organization"),
+    'OU'                    => _("Organizational Unit"),
+    'L'                     => _("Location"),
+    'ST'                    => _("State"),
+    'C'                     => _("Country"),
+    'NOTBEFORE'             => _("Creation Date"),
+    'NOTAFTER'              => _("Expiration Date"),
+    'KEYSIZE'               => _("Keylength"),
+    'PK_ALGORITHM'          => _("Public Key Algorithm"),
+    'SIG_ALGORITHM'         => _("Signature Algorithm"),
+    'TYPE'                  => _("Type"),
+    'SERIAL'                => _("Serial"),
+    'STATUS'                => _("Status"),
+    'FINGERPRINTMD5'        => _("Fingerprint (MD5)"),
+    'FINGERPRINTSHA1'       => _("Fingerprint (SHA1)"),
+    'FINGERPRINTSHA256'     => _("Fingerprint (SHA256)"),
+    'FINGERPRINTSHA384'     => _("Fingerprint (SHA384)"),
+    'FINGERPRINTSHA512'     => _("Fingerprint (SHA512)"),
+    _("Not set")                             => 'none',
+    _("Ask User")                            => 'user',
+    _("critical")                            => 'critical',
+    _("not critical")                        => 'noncritical',
+    _("Copy Email")                          => 'emailcopy',
+    _("raw")                          => 'raw',
+    _("DNS Name")                            => 'dns',
+    _("Email")                               => 'email',
+    _("IP Address")                          => 'ip',
+    _("SSL Server")                          => 'server',
+    _("SSL Server, SSL Client")              => 'server, client',
+    _("Key Encipherment")                    => 'key',
+    _("Digital Signature")                   => 'sig',
+    _("Key Encipherment, Digital Signature") => 'keysig',
+    _("Object Signing")                      => 'objsign',
+    _("Email(S/MIME)")                       => 'email',
+    _("SSL Client, Email(S/MIME)")           => 'client, email',
+    _("SSL Client")                          => 'client',
+    _("SSL Client, Object Signing")          => 'client, objsign',
+    _("SSL Client, Email, Object Signing")   => 'client, email, objsign',
+    _("Object Signing CA")                   => 'objCA',
+    _("S/MIME CA")                           => 'emailCA',
+    _("SSL CA")                              => 'sslCA',
+    _("SSL CA, S/MIME CA")                   => 'sslCA, emailCA',
+    _("SSL CA, Object Signing CA")           => 'sslCA, objCA',
+    _("S/MIME CA, Object Signing CA")        => 'emailCA, objCA',
+    _("SSL CA, S/MIME CA, Object Signing CA")=> 'sslCA, emailCA, objCA',
+    _("Certificate Signing")                 => 'keyCertSign',
+    _("CRL Signing")                         => 'cRLSign',
+    _("Certificate Signing, CRL Signing")    => 'keyCertSign, cRLSign'
+   };
+
+   my $class = ref($that) || $that;
+
+   bless($self, $class);
+
+   $self;
+}
+
+1