X-Git-Url: https://git.netwichtig.de/gitweb/?a=blobdiff_plain;f=make%2Fopensslcert.pm;h=fd7bd6998070a3113ef8e7735f7eaf78cd3337f9;hb=a0eeadff239a26fc6e3be84b50090ce5f52d9c57;hp=a4954e0be5fb651b758fd75160a427f35117cf91;hpb=97590f92393a62af0847728132970c38e334b687;p=user%2Fhenk%2Fcode%2Finspircd.git diff --git a/make/opensslcert.pm b/make/opensslcert.pm index a4954e0be..fd7bd6998 100644 --- a/make/opensslcert.pm +++ b/make/opensslcert.pm @@ -1,8 +1,33 @@ +# +# InspIRCd -- Internet Relay Chat Daemon +# +# Copyright (C) 2007 Dennis Friis +# Copyright (C) 2007 Craig Edwards +# +# This file is part of InspIRCd. InspIRCd 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, version 2. +# +# 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, see . +# + + package make::opensslcert; +require 5.8.0; + +use strict; +use warnings FATAL => qw(all); + use Exporter 'import'; use make::configure; -@EXPORT = qw(make_openssl_cert); +our @EXPORT = qw(make_openssl_cert); sub make_openssl_cert() @@ -27,7 +52,7 @@ __END__ close(FH); my $time = promptstring_s("Please enter the number of days that this certificate is valid for","365"); - + system("cat openssl.template | openssl req -x509 -nodes -newkey rsa:1024 -keyout key.pem -out cert.pem -days $time 2>/dev/null"); system("openssl dhparam -out dhparams.pem 1024"); unlink("openssl.template");