webadmin/bpfire
1
0
Fork 0
mirror of https://github.com/vincentmli/bpfire.git synced 2026-04-27 03:07:43 +02:00
Code Issues Packages Projects Releases Wiki Activity

Merge remote-tracking branch 'stevee/next-cgi-geoip' into next

Browse Source
This commit is contained in:
Stefan Schantl
2015-05-04 20:16:24 +02:00
parent f63cb53f4a dfbee171cc
commit b33e050763
5 changed files with 58 additions and 20 deletions
Download Patch File Download Diff File Expand all files Collapse all files

19
config/cfgroot/geoip-functions.pl
View File

@@ -41,8 +41,8 @@ sub get_flag_icon($) {
# Remove whitespaces.
chomp($input);
# Convert given country code to lower case.
my $ccode = lc($input);
# Convert given country code to upper case.
my $ccode = uc($input);
# Generate filename, based on the contry code in lower case
# and the defined file extension.
@@ -58,6 +58,21 @@ sub get_flag_icon($) {
if (-e "$absolute_path") {
# Return content of flag_icon.
return $flag_icon;
} else {
# If no icon for the specified country exists, try to use
# the icon for "unknown".
my $ccode = "unknown";
# Redoing all the stuff from abouve for the "unknown" icon.
my $file = join('.', $ccode,$ext);
my $flag_icon = join('/', $flagdir,$file);
my $absolute_path = join('', $webroot,$flag_icon);
# Check if the icon is present.
if (-e "$absolute_path") {
# Return "unknown" icon.
return $flag_icon;
}
}
}