Gecko [ contributie.vriendennsm.nl ]

Linux mail.vriendennsm.nl 6.1.0-51-amd64 #1 SMP PREEMPT_DYNAMIC Debian 6.1.177-1 (2026-07-16) x86_64
Apache/2.4.68 (Debian)
Server IP : 217.154.75.17 & Your IP : 216.73.216.195
Domains : Cant Read [ /etc/named.conf ]
User : www-data

Name	Size	Permission	Date
lang	[ DIR ]	drwxr-xr-x	2026-07-25 20:55
ulang	[ DIR ]	drwxr-xr-x	2026-07-25 20:55
enable.cgi	1.93 KB	-rwxr-xr-x	2026-07-19 16:28
index.cgi	1.45 KB	-rwxr-xr-x	2026-07-19 16:28
module.info	157 B	-rw-r--r--	2026-07-19 16:26
module.info.pl	107 B	-rw-r--r--	2026-07-19 16:26
qr.cgi	439 B	-rwxr-xr-x	2026-07-19 16:28
twofactor-funcs-lib.pl	11.24 KB	-rw-r--r--	2026-07-19 16:26
twofactor-lib.pl	101 B	-rw-r--r--	2026-07-19 16:26
twofactor.pl	695 B	-rwxr-xr-x	2026-07-19 16:28

Rename

#!/usr/bin/perl
# Show a form for enabling two-factor authentication

use strict;
use warnings;
no warnings 'redefine';
no warnings 'uninitialized';
require './twofactor-lib.pl';
our (%in, %text, $remote_user);
&ui_print_header(undef, $text{'index_title'}, "");

# Is it even enabled?
my %miniserv;
&get_miniserv_config(\%miniserv);
if (!$miniserv{'twofactor_provider'}) {
	print $text{'twofactor_setup'},"\n";
	&ui_print_footer("/", $text{'index'});
	return;
	}

# Get the user's current state
my ($provid, $id, $api) = &get_user_twofactor($remote_user, \%miniserv);

print &ui_form_start("enable.cgi", "post");
my @buts;
if ($id) {
	@buts = ( [ "disable", $text{'twofactor_disable'} ] );
	my ($prov) = grep { $_->[0] eq $provid }
		 &list_twofactor_providers();
	print &text('twofactor_already2',
		 "$prov->[1]",
		 "<tt>$id</tt>",
		 "<tt>$remote_user</tt>"),"\n";
	}
else {
	my ($prov) = grep { $_->[0] eq $miniserv{'twofactor_provider'} }
		 &list_twofactor_providers();
	print &text('twofactor_desc2',
		 "$prov->[1]",
		 $prov->[2],
		 "<tt>$remote_user</tt>"),"\n";
	my $ffunc = "show_twofactor_form_".
		 $miniserv{'twofactor_provider'};
	if (defined(&$ffunc)) {
		print &ui_table_start($text{'twofactor_header'}, undef, 2);
		print &{\&{$ffunc}}($remote_user);
		print &ui_table_end();
		}
	@buts = ( [ "enable", $text{'twofactor_enable'} ] );
	}
print &ui_form_end(\@buts);

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