From: Stefan Schantl <stefan.schantl@ipfire.org>
Date: Thu, 12 Dec 2019 11:07:34 +0000 (+0100)
Subject: geoip-functions.pl: Add get_continent_code()
X-Git-Url: http://git.ipfire.org/?a=commitdiff_plain;h=ec1c52633ed8fbc86b6661e9e03e4fc578ac0da4;p=people%2Fstevee%2Fipfire-2.x.git

geoip-functions.pl: Add get_continent_code()

This function allows to recieve the continent code of a given
country (code).

Signed-off-by: Stefan Schantl <stefan.schantl@ipfire.org>
---

diff --git a/config/cfgroot/geoip-functions.pl b/config/cfgroot/geoip-functions.pl
index 9bfa3b4601..aaabd6f069 100644
--- a/config/cfgroot/geoip-functions.pl
+++ b/config/cfgroot/geoip-functions.pl
@@ -186,6 +186,16 @@ sub get_geoip_locations() {
 	return @sorted_locations;
 }
 
+# Function to get the continent code of a given country code.
+sub get_continent_code($$) {
+	my ($db_handle, $ccode) = @_;
+
+	# Omit the continent code.
+	my $continent_code = &Location::get_continent_code($db_handle, $ccode);
+
+	return $continent_code;
+}
+
 # Function to flush all exported GeoIP locations.
 sub flush_exported_locations () {
 	# Check if the xt_geoip_db_directory exists.