FM / authentic-theme

/usr/share/usermin/authentic-theme

Name	Size	Mode	Actions
extensions/	-	0755	rm
help/	-	0755	rm
images/	-	0755	rm
lang/	-	0755	rm
modules/	-	0755	rm
unauthenticated/	-	0755	rm
401.cgi	342	0755	edit dl rm
403.cgi	342	0755	edit dl rm
404.cgi	342	0755	edit dl rm
authentic-funcs.pl	29874	0644	edit dl rm
authentic-init.pl	83560	0644	edit dl rm
authentic-lib.pl	90283	0644	edit dl rm
authentic.pl	61202	0644	edit dl rm
config	139	0644	edit dl rm
config.cgi	6893	0755	edit dl rm
config_save.cgi	2445	0755	edit dl rm
FUNDING.yml	102	0644	edit dl rm
index.cgi	309	0755	edit dl rm
LICENSE	1067	0644	edit dl rm
login-lib-funcs.pl	11759	0644	edit dl rm
login-lib.pl	1518	0644	edit dl rm
manifest-usermin.json	982	0644	edit dl rm
manifest.template	920	0644	edit dl rm
mconfig.cgi	6747	0755	edit dl rm
mconfig_save.cgi	1723	0755	edit dl rm
navigation-lib.pl	64628	0644	edit dl rm
pam_login.cgi	3481	0755	edit dl rm
password_form.cgi	4008	0755	edit dl rm
postinstall-usermin.pl	264	0755	edit dl rm
postinstall.pl	645	0755	edit dl rm
service-worker.js	94	0644	edit dl rm
session_login.cgi	4621	0755	edit dl rm
settings-backgrounds.cgi	3702	0755	edit dl rm
settings-backgrounds_save.cgi	1667	0755	edit dl rm
settings-editor_favorites_read.cgi	897	0755	edit dl rm
settings-editor_favorites_write.cgi	574	0755	edit dl rm
settings-editor_read.cgi	2440	0755	edit dl rm
settings-editor_write.cgi	973	0755	edit dl rm
settings-favorites_save.cgi	632	0755	edit dl rm
settings-lib.pl	651	0644	edit dl rm
settings-logos.cgi	4725	0755	edit dl rm
settings-logos_save.cgi	2401	0755	edit dl rm
stats-lib-funcs.pl	17390	0644	edit dl rm
stats-lib.pl	432	0644	edit dl rm
stats.cgi	3135	0755	edit dl rm
stats.pl	7721	0755	edit dl rm
sysinfo.cgi	7874	0755	edit dl rm
tconfig-lib.pl	39224	0644	edit dl rm
tconfig.cgi	4542	0755	edit dl rm
theme-update.sh	8408	0755	edit dl rm
theme.info	379	0644	edit dl rm
theme.info.no	24	0644	edit dl rm
THEME.pgp	3102	0644	edit dl rm
uconfig.cgi	6442	0755	edit dl rm
uconfig_save.cgi	2034	0755	edit dl rm
uninstall-usermin.pl	170	0755	edit dl rm
uninstall.pl	346	0755	edit dl rm
xhr-lib.pl	29310	0644	edit dl rm
xhr.cgi	355	0755	edit dl rm

Edit: /usr/share/usermin/authentic-theme/settings-backgrounds_save.cgi (1667B)

#!/usr/bin/perl

#
# Authentic Theme (https://github.com/authentic-theme/authentic-theme)
# Copyright Ilia Rostovtsev <ilia@virtualmin.com>
# Licensed under MIT (https://github.com/authentic-theme/authentic-theme/blob/master/LICENSE)
#
use strict;

our (%in, $current_theme, $config_directory, $get_user_level, %theme_text, $has_usermin, $has_usermin_conf_dir);

do($ENV{'THEME_ROOT'} . "/authentic-lib.pl");

&webmin_user_is_admin() ||
  &error($theme_text{'theme_error_access_not_root_user'});

theme_make_config_dir();

my $lsw = "background_content.png";
my $lw  = "/$current_theme/$lsw";

my $bg_unauth = $in{'unauthenticated_bg'};
my $data_bg_unauth = $in{'unauthenticated_bg_file'};

# Check if the uploaded file is an actual image
if ($bg_unauth eq "1" && has_command('file')) {
    if ($data_bg_unauth) {
        my $bg_tmp_file = &transname();
        write_file_contents($bg_tmp_file, $data_bg_unauth);
        my $out = backquote_command("file --brief --mime-type ".quotemeta($bg_tmp_file), 1);
        if ($out !~ /^image\//) {
            &error($theme_text{'settings_right_logos_error'} . " : " . html_escape($out));
        }
    }
}

if ($bg_unauth eq "1" && length $data_bg_unauth) {
    unlink_file($config_directory . $lw);
    write_file_contents($config_directory . $lw, $data_bg_unauth);
    if ($has_usermin) {
        unlink_file($has_usermin_conf_dir . $lw);
        write_file_contents($has_usermin_conf_dir . $lw, $data_bg_unauth);
    }
} elsif ($bg_unauth ne "1") {
    unlink_file($config_directory . $lw);
    if ($has_usermin) {
        unlink_file($has_usermin_conf_dir . $lw);
    }
}

redirect("settings-backgrounds.cgi?saved=1");

#!/usr/bin/perl # # Authentic Theme (https://github.com/authentic-theme/authentic-theme) # Copyright Ilia Rostovtsev # Licensed under MIT (https://github.com/authentic-theme/authentic-theme/blob/master/LICENSE) # use strict; our (%in, $current_theme, $config_directory, $get_user_level, %theme_text, $has_usermin, $has_usermin_conf_dir); do($ENV{'THEME_ROOT'} . "/authentic-lib.pl"); &webmin_user_is_admin() || &error($theme_text{'theme_error_access_not_root_user'}); theme_make_config_dir(); my $lsw = "background_content.png"; my $lw = "/$current_theme/$lsw"; my $bg_unauth = $in{'unauthenticated_bg'}; my $data_bg_unauth = $in{'unauthenticated_bg_file'}; # Check if the uploaded file is an actual image if ($bg_unauth eq "1" && has_command('file')) { if ($data_bg_unauth) { my $bg_tmp_file = &transname(); write_file_contents($bg_tmp_file, $data_bg_unauth); my $out = backquote_command("file --brief --mime-type ".quotemeta($bg_tmp_file), 1); if ($out !~ /^image\//) { &error($theme_text{'settings_right_logos_error'} . " : " . html_escape($out)); } } } if ($bg_unauth eq "1" && length $data_bg_unauth) { unlink_file($config_directory . $lw); write_file_contents($config_directory . $lw, $data_bg_unauth); if ($has_usermin) { unlink_file($has_usermin_conf_dir . $lw); write_file_contents($has_usermin_conf_dir . $lw, $data_bg_unauth); } } elsif ($bg_unauth ne "1") { unlink_file($config_directory . $lw); if ($has_usermin) { unlink_file($has_usermin_conf_dir . $lw); } } redirect("settings-backgrounds.cgi?saved=1");