michael/webmin
1
0
Fork 0
mirror of https://github.com/webmin/webmin.git synced 2026-03-20 08:40:24 +00:00
Code Issues Actions 1 Packages Projects Releases Wiki Activity

Add crutial get_webprefix API

Browse Source
This commit is contained in:
Ilia Rostovtsev
2021-09-26 16:12:25 +03:00
parent d4fe8144b0
commit ae6921aeee
2 changed files with 22 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
WebminCore.pm
View File

File diff suppressed because one or more lines are too long

21
web-lib-funcs.pl
View File

@@ -11633,6 +11633,27 @@ my %miniserv;
return $miniserv{'bufsize'} || 32768;
}
=head2 get_webprefix
Returns ready to use webprefix
=cut
sub get_webprefix
{
my $webprefix = $gconfig{'webprefix'};
my $parent_proxy_detected = 0;
my $parent_proxy = $ENV{'HTTP_COMPLETE_WEBMIN_PATH'} || $ENV{'HTTP_WEBMIN_PATH'};
if ($parent_proxy) {
my ($parent_proxy_link) = $parent_proxy =~ /(\S*?\/link\.cgi\/[\d]{8,16})/;
my ($parent_proxy_prefix) = $parent_proxy_link =~ /:\d+(\S*?\/link\.cgi\/\S*?\d+)/;
if ($parent_proxy_prefix) {
$webprefix = $parent_proxy_prefix;
$parent_proxy_detected = 1;
}
}
return wantarray ? ($webprefix, $parent_proxy_detected) : $webprefix;
}
$done_web_lib_funcs = 1;
1;