Server IP : 195.201.23.43 / Your IP : 18.217.138.109 Web Server : Apache System : Linux webserver2.vercom.be 5.4.0-192-generic #212-Ubuntu SMP Fri Jul 5 09:47:39 UTC 2024 x86_64 User : kdecoratie ( 1041) PHP Version : 7.1.33-63+ubuntu20.04.1+deb.sury.org+1 Disable Function : pcntl_alarm,pcntl_fork,pcntl_waitpid,pcntl_wait,pcntl_wifexited,pcntl_wifstopped,pcntl_wifsignaled,pcntl_wifcontinued,pcntl_wexitstatus,pcntl_wtermsig,pcntl_wstopsig,pcntl_signal,pcntl_signal_get_handler,pcntl_signal_dispatch,pcntl_get_last_error,pcntl_strerror,pcntl_sigprocmask,pcntl_sigwaitinfo,pcntl_sigtimedwait,pcntl_exec,pcntl_getpriority,pcntl_setpriority,pcntl_async_signals, MySQL : OFF | cURL : ON | WGET : ON | Perl : ON | Python : OFF | Sudo : ON | Pkexec : ON Directory : /usr/share/usermin/gnupg/ |
Upload File : |
#!/usr/bin/perl # index.cgi # Display main menu of GNUPG options require './gnupg-lib.pl'; &ui_print_header(undef, $text{'index_title'}, undef, undef, 0, 1); if (!&has_command($gpgpath)) { print &text('index_egpg', "<tt>$gpgpath</tt>"),"<p>\n"; &ui_print_footer("/", $text{'index'}); exit; } @keys = &list_keys(); if (!@keys) { # Offer to setup GNUPG print "$text{'index_setupdesc'}<br>\n"; print &ui_form_start("secret.cgi", "post"); print &ui_table_start(undef, undef, 2); $remote_user_info[6] =~ s/,*$//; print &ui_table_row($text{'index_name'}, &ui_textbox("name", $remote_user_info[6], 40)); print &ui_table_row($text{'index_email'}, &ui_textbox("email", &default_email_address(), 40)); print &ui_table_row($text{'index_comment'}, &ui_textbox("comment", undef, 40)); print &ui_table_row($text{'index_size'}, &ui_select("size", undef, [ [ '', $text{'default'} ], 768, 1024, 2048, 4096, 8192 ])); print &ui_table_row($text{'index_pass'}, &ui_password("pass", undef, 20)); print &ui_table_end(); print &ui_form_end([ [ undef, $text{'index_setup_gnupg'} ] ]); } else { # Show table of options @links = ( "list_keys.cgi", "edit_encrypt.cgi", "edit_decrypt.cgi", "edit_sign.cgi", "edit_verify.cgi", "edit_secret.cgi" ); @titles = ( $text{'keys_title'}, $text{'encrypt_title'}, $text{'decrypt_title'}, $text{'sign_title'}, $text{'verify_title'}, $text{'secret_title'} ); @icons = ( "images/keys.gif", "images/encrypt.gif", "images/decrypt.gif", "images/sign.gif", "images/verify.gif", "images/secret.gif" ); &icons_table(\@links, \@titles, \@icons, scalar(@links)); } &ui_print_footer("/", $text{'index'});Private