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/mconfig.cgi (6747B)

#!/usr/bin/perl

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

use strict;
use warnings;

our (%text,
     %in,
     $root_directory,
     $config_directory,
     $remote_user,
     $current_theme,
     $current_lang,
     $default_lang,
     %theme_text,
     %theme_config);

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

my (%module_info, %info, %newconfig, @info_order, @sections, $idx, $sname, $section, $module, $module_dir,
    $module_custom_config_file, %moduletext);

$module                    = $in{'module'} || $ARGV[0];
$module_custom_config_file = "$root_directory/$current_theme/modules/$module/config.info";

&foreign_available($module) || &error($theme_text{'mconfig_eaccess'});
%module_info = &get_module_info($module);

&ui_print_header(&text('config_dir', "<span>" . $module_info{'desc'} . "</span>"),
                 $theme_text{'theme_xhred_global_prefs'},
                 "", undef, 0, 1);
$module_dir = &module_root_directory($module);
if ($current_lang &&
    $default_lang &&
    $current_lang ne $default_lang &&
    -r "$module_custom_config_file.$current_lang")
{
    $module_custom_config_file .= ".$current_lang";
}

if (-r $module_custom_config_file) {

# Read the custom config.info file to find sections
    &read_file($module_custom_config_file, \%info, \@info_order);
    my @config_quick_access;
    my $config_quick_access_section;
    my $config_quick_access_category;
    foreach my $i (@info_order) {
        my @p = split(/,/, $info{$i});
        if ($p[1] == 11) {
            push(@sections, [$i, $p[0]]);
            $config_quick_access_section  = $i;
            $config_quick_access_category = $p[0];
        } else {
            my $value = $p[0];
            $value =~ s/<(?:[^>'"]*|(['"]).*?\1)*>//gs;
            $value = &entities_to_ascii($value);
            push(@config_quick_access,
                 {  value   => $value,
                    section => $config_quick_access_section,
                    data    => { category => $config_quick_access_category }
                 });
        }
    }
    if (@sections > 1) {
        print ' <script type="application/javascript">';
        print 'var config_quick_access = ' . convert_to_json(\@config_quick_access);
        print "</script>\n";

# Work out template section to edit
        $in{'section'} ||= $sections[0]->[0];
        $idx = &indexof($in{'section'}, map {$_->[0]} @sections);
        if ($in{'nprev'}) {
            $idx--;
            $idx = @sections - 1 if ($idx < 0);
        } elsif ($in{'nnext'}) {
            $idx++;
            $idx = 0 if ($idx >= @sections);
        }
        $in{'section'} = $sections[$idx]->[0];

# We have some sections .. show a menu to select
        print &ui_form_start("mconfig.cgi");
        print &ui_hidden("module", $module), "\n";
        print &ui_span_local($theme_text{'settings_config_configuration_category'}, 'row-block-label') . "\n";
        print &ui_select("section", $in{'section'}, \@sections, 1, 0, 0, 0, "onChange='form.submit()'");
        print &ui_button_group_local(
                                     (
                                      &ui_dropdown_local([(&ui_textbox('search'))],
                                                         {  'title'           => $theme_text{'config_search_options_all'},
                                                            'icon'            => 'fa fa-md fa-file-find',
                                                            'container-class' => 'elm-rel-z config-search',
                                                            'button-class'    => 'btn-default elm-rel-z heighter-28 pd-lr-8',
                                                            'ul-class'        => 'pd-tb-0',
                                                         }
                                        )
                                        .
                                        &ui_submit($theme_text{'extensions_mail_pagination_left'},
                                                   "nprev", undef, undef,
                                                   "fa fa-fw fa-arrow-circle-o-left",
                                                   "heighter-28 margined-left-5")
                                        .
                                        &ui_submit($theme_text{'extensions_mail_pagination_right'},
                                                   "nnext", undef, undef, "fa fa-fw fa-arrow-circle-o-right",
                                                   "heighter-28"
                                        )
                                     ),
                                     'end_submits');
        print &ui_form_end();
        ($section) = grep {$_->[0] eq $in{'section'}} @sections;
        $sname = "$section->[1]";
    }
    $sname = $theme_text{'theme_xhred_config_configurable_options'} if (!$sname);

print &ui_form_start("mconfig_save.cgi", "post");
    print &ui_hidden("module", $module), "\n";
    print &ui_hidden("section", $in{'section'}), "\n";
    if ($section) {

# Find next section
        $idx = &indexof($section, @sections);
        if ($idx == @sections - 1) {
            print &ui_hidden("section_next", $sections[0]->[0]);
        } else {
            print &ui_hidden("section_next", $sections[$idx + 1]->[0]);
        }
    }
    print &ui_table_start($sname, "width=100%", 2);

# A case when a custom default config needs to be
    # used for a module provided by the theme itself
    my $module_custom_config_default = "$root_directory/$current_theme/modules/$module/config.defaults";
    if (-r $module_custom_config_default) {
        &read_file($module_custom_config_default, \%newconfig);
    }

# Load user preferences
    &load_module_preferences($module, \%newconfig);

# Assign theme expected defaults if missing
    map {my $__ = ""; $newconfig{$_} eq $__ && ($newconfig{$_} = ($theme_config{$_} || $__))} keys %newconfig;

&generate_config(\%newconfig, "$root_directory/$current_theme/modules/$module/config.info", $module, undef, undef, $in{'section'});
    print &ui_table_end();
    print &ui_form_end(
                   [["save", $text{'save'}], $section ? (["save_next", $theme_text{'settings_config_save_and_next'}]) : ()]);
    %moduletext = &load_language($module);
    &ui_print_footer("/$module/", $moduletext{'index_return'} || $text{'index'});

} else {
    &error($theme_text{'mconfig_ecannot'});
}

cmd: