File Manager

X7ROOT File Manager

Current Path: /usr/libexec/usermin/gnupg

📁 ..
📄 CHANGELOG(713 B)
📄 config(22 B)
📄 config.info(136 B)
📄 config.info.ca(159 B)
📄 config.info.de(163 B)
📄 config.info.nl(162 B)
📄 config.info.no(142 B)
📄 decrypt.cgi(1.08 KB)
📄 delete_keys.cgi(325 B)
📄 delkey.cgi(710 B)
📄 edit_decrypt.cgi(927 B)
📄 edit_encrypt.cgi(1.03 KB)
📄 edit_export.cgi(1.16 KB)
📄 edit_key.cgi(2.73 KB)
📄 edit_secret.cgi(963 B)
📄 edit_sign.cgi(1.08 KB)
📄 edit_verify.cgi(1.11 KB)
📄 encrypt.cgi(844 B)
📄 export.cgi(1.33 KB)
📄 gnupg-lib.pl(13.38 KB)
📁 images
📄 import.cgi(1.06 KB)
📄 index.cgi(1.64 KB)
📄 list_keys.cgi(3.71 KB)
📄 module.info(198 B)
📄 module.info.af(0 B)
📄 module.info.af.auto(160 B)
📄 module.info.ar(0 B)
📄 module.info.ar.auto(244 B)
📄 module.info.be(0 B)
📄 module.info.be.auto(300 B)
📄 module.info.bg(0 B)
📄 module.info.bg.auto(313 B)
📄 module.info.ca(23 B)
📄 module.info.ca.auto(142 B)
📄 module.info.cs(0 B)
📄 module.info.cs.auto(192 B)
📄 module.info.da(0 B)
📄 module.info.da.auto(165 B)
📄 module.info.de(104 B)
📄 module.info.de.auto(12 B)
📄 module.info.el(0 B)
📄 module.info.el.auto(345 B)
📄 module.info.es(35 B)
📄 module.info.es.auto(156 B)
📄 module.info.eu(0 B)
📄 module.info.eu.auto(173 B)
📄 module.info.fa(0 B)
📄 module.info.fa.auto(243 B)
📄 module.info.fi(0 B)
📄 module.info.fi.auto(165 B)
📄 module.info.fr(26 B)
📄 module.info.fr.auto(159 B)
📄 module.info.he(0 B)
📄 module.info.he.auto(199 B)
📄 module.info.hr(0 B)
📄 module.info.hr.auto(194 B)
📄 module.info.hu(27 B)
📄 module.info.hu.auto(169 B)
📄 module.info.it(0 B)
📄 module.info.it.auto(182 B)
📄 module.info.ja(24 B)
📄 module.info.ja.auto(153 B)
📄 module.info.ko(0 B)
📄 module.info.ko.auto(163 B)
📄 module.info.lt(0 B)
📄 module.info.lt.auto(204 B)
📄 module.info.lv(0 B)
📄 module.info.lv.auto(185 B)
📄 module.info.ms(0 B)
📄 module.info.ms.auto(176 B)
📄 module.info.mt(0 B)
📄 module.info.mt.auto(193 B)
📄 module.info.nl(28 B)
📄 module.info.nl.auto(142 B)
📄 module.info.no(25 B)
📄 module.info.no.auto(131 B)
📄 module.info.pl(0 B)
📄 module.info.pl.auto(180 B)
📄 module.info.pt(0 B)
📄 module.info.pt.auto(181 B)
📄 module.info.pt_BR(0 B)
📄 module.info.pt_BR.auto(190 B)
📄 module.info.ro(0 B)
📄 module.info.ro.auto(184 B)
📄 module.info.ru(0 B)
📄 module.info.ru.auto(290 B)
📄 module.info.sk(0 B)
📄 module.info.sk.auto(186 B)
📄 module.info.sl(0 B)
📄 module.info.sl.auto(185 B)
📄 module.info.sv(0 B)
📄 module.info.sv.auto(163 B)
📄 module.info.th(0 B)
📄 module.info.th.auto(311 B)
📄 module.info.tr(0 B)
📄 module.info.tr.auto(195 B)
📄 module.info.uk(0 B)
📄 module.info.uk.auto(300 B)
📄 module.info.ur(0 B)
📄 module.info.ur.auto(293 B)
📄 module.info.vi(0 B)
📄 module.info.vi.auto(163 B)
📄 module.info.zh(0 B)
📄 module.info.zh.auto(137 B)
📄 module.info.zh_TW(0 B)
📄 module.info.zh_TW.auto(146 B)
📄 recv.cgi(734 B)
📄 save_key.cgi(2.85 KB)
📄 secret.cgi(2.02 KB)
📄 send.cgi(654 B)
📄 sign.cgi(1018 B)
📄 signkey.cgi(2.05 KB)
📁 ulang
📄 verify.cgi(1.53 KB)

Editing: secret.cgi

#!/usr/bin/perl
# setup.sh
# Call gnupg to setup a key initially

require './gnupg-lib.pl';
&ReadParse();
$pfx = $in{'newkey'} ? 'secret' : 'setup';
&error_setup($text{$pfx.'_err'});

# Validate inputs
$in{'name'} || &error($text{'setup_ename'});
length($in{'name'}) >= 5 || &error(&text('setup_enamelen', 5));
#$in{'email'} || &error($text{'setup_eemail'});

# Run gpg --list-keys to create the directory
&list_keys();
&list_keys();

# Create .gnupg directory if missing
if (!-d "$remote_user_info[7]/.gnupg") {
	mkdir("$remote_user_info[7]/.gnupg", 0700) ||
		&error(&text('setup_emkdir', $!));
	}

$pid = fork();
if (!$pid) {
	# Run the find command in a subprocess to generate some entropy
	untie(*STDOUT);
	untie(*STDERR);
	close(STDOUT);
	close(STDERR);
	exec("find / -type f");
	exit(0);
	}

foreach $k (&list_secret_keys()) {
	$oldid{$k->{'key'}}++;
	}

# Run the gpg --gen-key command
my $temp = &transname();
$in{'size'} ||= 2048;
&open_tempfile(TEMP, ">$temp", 0, 1);
&print_tempfile(TEMP, "Key-Type: default\n");
&print_tempfile(TEMP, "Key-Length: $in{'size'}\n");
&print_tempfile(TEMP, "Key-Usage: sign,encrypt,auth\n");
&print_tempfile(TEMP, "Name-Real: $in{'name'}\n");
&print_tempfile(TEMP, "Name-Email: $in{'email'}\n");
if ($in{'comment'}) {
	&print_tempfile(TEMP, "Name-Comment: $in{'comment'}\n");
	}
&print_tempfile(TEMP, "Expire-Date: 0\n");
if ($in{'pass'}) {
	&print_tempfile(TEMP, "Passphrase: $in{'pass'}\n");
	}
else {
	&print_tempfile(TEMP, "%no-protection\n");
	}
&print_tempfile(TEMP, "%commit\n");
&print_tempfile(TEMP, "%echo done\n");
&close_tempfile(TEMP);
($out, $timed_out) = &backquote_with_timeout(
                "$gpgpath --gen-key --batch $temp 2>&1 </dev/null", 90);
$err = $?;

&ui_print_header(undef, $text{$pfx.'_title'}, "");

if ($err || $timed_out) {
	print "<p>",&text('setup_failed', "<pre>$out</pre>"),"<p>\n";
	}
else {
	print "<p>$text{$pfx.'_ok'}<p>\n";
	@keys = &list_secret_keys();
	($key) = grep { !$oldid{$_->{'key'}} } @keys;
	&put_passphrase($in{'pass'}, $key);
	}

&ui_print_footer("", $text{'index_return'});

X7ROOT File Manager

Editing: secret.cgi

Upload File

Create Folder