Ubuntu

Webmin 在嘗試打開登錄頁面時顯示普通 Perl 腳本

  • May 3, 2020

當我嘗試打開 webmin 登錄頁面“ https://192.168.1.13:10000 ”時,它顯示如下純 Perl 腳本,有什麼問題?我正在執行 Ubuntu 18.04 和最新版本的 webmin。

#!/usr/bin/perl

#
# 正宗主題(https://github.com/authentic-theme/authentic-theme)
# 版權所有伊利亞·羅斯托夫采夫
# 在 MIT 下獲得許可 (https://github.com/authentic-theme/authentic-theme/blob/master/LICENSE)
#
使用嚴格;

使用 File::Basename;

我們的 (%in, %gconfig, %tconfig, %text, $config_directory, $current_theme, %theme_text);

do(dirname(__FILE__) . "/authentic-lib.pl");

我的 %miniserv;
get_miniserv_config(\%miniserv);

我的 $charset = &get_charset();

# 檢查添加錯誤處理程序
error_40x_handler();

我們的 %theme_config = (settings($config_directory . "/$current_theme/settings-admin", 'settings_'),
settings($config_directory . "/$current_theme/settings-root", 'settings_'));

# 顯示登錄前文本橫幅
if ($gconfig{'loginbanner'} &&
get_env('http_cookie') !~ /banner=1/ &&
!$in{'註銷'} &&
!$in{'失敗'} &&
!$in{'timed_out'})
{

print "Auth-type: auth-required=1\r\n";
print "Set-Cookie: banner=1; path=/\r\n";
&PrintHeader($charset);
列印'', "\n";
列印'', "\n";
embed_login_head();
列印 '' 。"\n";
embed_overlay_prebody();
列印
'  
 
'
. "\n";
我的 $url = $in{'page'};
打開(橫幅,$gconfig{'loginbanner'});

儘管 () {
s/LOGINURL/$url/g;
列印;
}

關閉(橫幅);
&footer();
返回;
}

我的 $sec = lc(get_env('https')) eq 'on' ?“; 安全的” : ””;
我的 $sidname = $miniserv{'sidname'} || “西德”;
print "Auth-type: auth-required=1\r\n";
print "Set-Cookie: banner=0; path=/$sec\r\n" if ($gconfig{'loginbanner'});
print "Set-Cookie: $sidname=x; path=/$sec\r\n" if ($in{'logout'});
print "Set-Cookie: redirect=1; path=/\r\n";
print "Set-Cookie: testing=1; path=/$sec\r\n";
&PrintHeader($charset);
列印'', "\n";
列印'', "\n";
embed_login_head();
列印 '' 。"\n";
embed_overlay_prebody();
列印 '' 。"\n";

如果(定義($in{'失敗'})){
if ($in{'twofactor_msg'}) {
列印 ”### “,,”

\n";
列印 '' 。"\n";
列印' **'。$theme_text{'login_warning'} 。
'**  
' 。&theme_text('session_twofailed', &html_escape($in{'twofactor_msg'})) 。"\n";
列印 '' 。"\n";
} 別的 {
列印 '' 。"\n";
列印' **'。
$theme_text{'login_warning'} 。'**  
' 。"\n";
列印 '' 。$theme_text{'theme_xhred_session_failed'} 。"\n";
列印 '' 。"\n";
}
} elsif ($in{'logout'}) {
列印 '' 。"\n";
列印' **'。$theme_text{'login_success'} 。'**  
' 。"\n";
列印 '' 。$theme_text{'session_logout'} 。"\n";
列印 '' 。"\n";
} elsif ($in{'timed_out'}) {
列印 '' 。"\n";
列印' **'。
$theme_text{'login_warning'} 。'**  
' 。"\n";
列印 '' 。&theme_text('session_timed_out', int($in{'timed_out'} / 60)) 。"\n";
列印 '' 。"\n";
}
列印 "$text{'session_prefix'}\n";
列印 '' 。"\n";

列印 '
'
. (&get_product_name() eq 'webmin' ? $theme_text{'theme_xhred_titles_wm'} :
$theme_text{'theme_xhred_titles_um'}
) .
'' 。"\n";

# 工藝標誌
嵌入徽標();

# 登錄資訊
我的 $host;
if ($gconfig{'realname'}) {
$host = &get_display_hostname();
} 別的 {
$host = get_env('server_name');
$host =~ s/:\d+//g;
$host = &html_escape($host);
}
列印 '' 。&theme_text('login_message') 。' **' 。$主機。'** ' 。"\n";
列印 '' 。"\n";
列印 '' 。"\n";
列印
'' 。"\n";
列印 '' 。"\n";
列印 '' 。"\n";
列印 '' 。"\n";
列印
'' 。"\n";
列印 '' 。"\n";

if ($miniserv{'twofactor_provider'}) {
列印 '' 。"\n";
列印 '' 。"\n";
列印
'' 。"\n";
列印 '' 。"\n";
}
if (!$gconfig{'noremember'}) {
列印 '
'
. $theme_text{'login_save'} 。'
' . "\n";
}
列印 '';
列印 ' ' 。
&theme_text('login_signin') 。'' 。"\n";

if ($text{'session_postfix'} =~ "href") {
我的 $link = get_link($text{'session_postfix'}, '醜陋');

列印'[0]。'", "' . $連結->[1] 。
'", "toolbar=no,menubar=no,scrollbars=no,resizable=yes,width=700,height=500");return false;\' class="btn btn-warning"> '
. &theme_text('login_reset')
. '' 。"\n";
}

列印 '';
列印 '' 。"\n";

&footer();

我發現了問題。在 /etc/webmin/miniserv.conf 文件行“addtype_cgi=internal/cgi”是“ddtype_cgi=internal/cgi”第一個“a”字元被刪除。我的愚蠢錯誤:|

@Admiral Noisy Bottom,非常感謝您的幫助。

引用自:https://serverfault.com/questions/1014174