blob: c22073b9b9a692cf76e53c4c52f6f302eb06d4a8 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
|
#!/usr/bin/env ruby
require 'getopts'
require 'openssl'
include OpenSSL
def usage
myname = File::basename($0)
$stderr.puts <<EOS
Usage: #{myname} name [keypair_file]
name ... ex. /C=JP/O=RRR/OU=CA/CN=NaHi/emailAddress=nahi@example.org
EOS
exit
end
getopts nil, "key:", "csrout:", "keyout:"
keypair_file = $OPT_key
csrout = $OPT_csrout || "csr.pem"
keyout = $OPT_keyout || "keypair.pem"
name_str = ARGV.shift or usage()
$stdout.sync = true
name_ary = name_str.scan(/\s*([^\/,]+)\s*/).collect { |i| i[0].split("=") }
p name_ary
name = X509::Name.new(name_ary)
keypair = nil
if keypair_file
keypair = PKey::RSA.new(File.read(keypair_file))
else
keypair = PKey::RSA.new(1024) { putc "." }
puts
puts "Writing #{keyout}..."
File.open(keyout, "w", 0400) do |f|
f << keypair.to_pem
end
end
puts "Generating CSR for #{name_ary.inspect}"
req = X509::Request.new
req.subject = name
req.public_key = keypair.public_key
req.sign(keypair, Digest::SHA1.new)
puts "Writing #{csrout}..."
File.open(csrout, "w") do |f|
f << req.to_pem
end
|
