Added supports for fraud score

Author: ip2location

LICENSE.TXT

@@ -1,6 +1,6 @@
 MIT License
 
-Copyright (c) 2024 IP2Location.com
+Copyright (c) 2025 IP2Location.com
 
 Permission is hereby granted, free of charge, to any person obtaining a copy
 of this software and associated documentation files (the "Software"), to deal

README.md

@@ -1,6 +1,6 @@
 # IP2Proxy Erlang Module
 
-This module allows user to query an IP address if it was being used as VPN anonymizer, open proxies, web proxies, Tor exits, data center, web hosting (DCH) range, search engine robots (SES), residential proxies (RES), consumer privacy networks (CPN), and enterprise private networks (EPN). It lookup the proxy IP address from **IP2Proxy BIN Data** file. This data file can be downloaded at
+This module allows user to query an IP address if it was being used as VPN anonymizer, open proxies, web proxies, Tor exits, data center, web hosting (DCH) range, search engine robots (SES), residential proxies (RES), consumer privacy networks (CPN), enterprise private networks (EPN) and fraud score. It lookup the proxy IP address from **IP2Proxy BIN Data** file. This data file can be downloaded at
 
 * Free IP2Proxy BIN Data: https://lite.ip2location.com
 * Commercial IP2Proxy BIN Data: https://www.ip2location.com/database/ip2proxy

ip2proxy.erl

@@ -1,5 +1,5 @@
 -module(ip2proxy).
--export([getpackageversion/0, getmoduleversion/0, getdatabaseversion/0, open/1, getall/1, getproxytype/1, getcountryshort/1, getcountrylong/1, getregion/1, getcity/1, getisp/1, getdomain/1, getusagetype/1, getasn/1, getas/1, getlastseen/1, getthreat/1, getprovider/1, isproxy/1, close/0, openws/3, lookup/1, getcredit/0]).
+-export([getpackageversion/0, getmoduleversion/0, getdatabaseversion/0, open/1, getall/1, getproxytype/1, getcountryshort/1, getcountrylong/1, getregion/1, getcity/1, getisp/1, getdomain/1, getusagetype/1, getasn/1, getas/1, getlastseen/1, getthreat/1, getprovider/1, getfraudscore/1, isproxy/1, close/0, openws/3, lookup/1, getcredit/0]).
 -record(ip2proxyrecord, {
 	country_short = "-",
 	country_long = "-",
@@ -14,6 +14,7 @@
 	last_seen = "-",
 	threat = "-",
 	provider = "-",
+	fraud_score = "-",
 	is_proxy = 0
 }).
 -record(ip2proxyresult, {
@@ -31,6 +32,7 @@
 	lastSeen = "-",
 	threat = "-",
 	provider = "-",
+	fraudScore = "-",
 	isProxy = "-"
 }).
 -define(IF(Cond), (case (Cond) of true -> (0); false -> (1) end)).
@@ -51,7 +53,7 @@ getpackageversion() ->
 	end.
 
 getmoduleversion() ->
-	"3.3.3".
+	"3.4.0".
 
 getdatabaseversion() ->
 	case ets:info(mymeta) of
@@ -183,18 +185,19 @@ readcolstringrow(S, R, Dbtype, Col) ->
 	end.
 
 readrecord(S, R, Dbtype, Mode) ->
-	Country_position = [0, 2, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3],
-	Region_position = [0, 0, 0, 4, 4, 4, 4, 4, 4, 4, 4, 4],
-	City_position = [0, 0, 0, 5, 5, 5, 5, 5, 5, 5, 5, 5],
-	Isp_position = [0, 0, 0, 0, 6, 6, 6, 6, 6, 6, 6, 6],
-	Proxytype_position = [0, 0, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2],
-	Domain_position = [0, 0, 0, 0, 0, 7, 7, 7, 7, 7, 7, 7],
-	Usagetype_position = [0, 0, 0, 0, 0, 0, 8, 8, 8, 8, 8, 8],
-	Asn_position = [0, 0, 0, 0, 0, 0, 0, 9, 9, 9, 9, 9],
-	As_position = [0, 0, 0, 0, 0, 0, 0, 10, 10, 10, 10, 10],
-	Lastseen_position = [0, 0, 0, 0, 0, 0, 0, 0, 11, 11, 11, 11],
-	Threat_position = [0, 0, 0, 0, 0, 0, 0, 0, 0, 12, 12, 12],
-	Provider_position = [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 13],
+	Country_position = [0, 2, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3],
+	Region_position = [0, 0, 0, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4],
+	City_position = [0, 0, 0, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5],
+	Isp_position = [0, 0, 0, 0, 6, 6, 6, 6, 6, 6, 6, 6, 6],
+	Proxytype_position = [0, 0, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2],
+	Domain_position = [0, 0, 0, 0, 0, 7, 7, 7, 7, 7, 7, 7, 7],
+	Usagetype_position = [0, 0, 0, 0, 0, 0, 8, 8, 8, 8, 8, 8, 8],
+	Asn_position = [0, 0, 0, 0, 0, 0, 0, 9, 9, 9, 9, 9, 9],
+	As_position = [0, 0, 0, 0, 0, 0, 0, 10, 10, 10, 10, 10, 10],
+	Lastseen_position = [0, 0, 0, 0, 0, 0, 0, 0, 11, 11, 11, 11, 11],
+	Threat_position = [0, 0, 0, 0, 0, 0, 0, 0, 0, 12, 12, 12, 12],
+	Provider_position = [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 13, 13],
+	Fraudscore_position = [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 14],
 
 	Countryshort_field = 1,
 	Countrylong_field = 2,
@@ -210,6 +213,7 @@ readrecord(S, R, Dbtype, Mode) ->
 	Lastseen_field = 2048,
 	Threat_field = 4096,
 	Provider_field = 8192,
+	Fraudscore_field = 16384,
 
 	if
 		(Mode band Proxytype_field /= 0) or (Mode band Isproxy_field /= 0) ->
@@ -295,6 +299,13 @@ readrecord(S, R, Dbtype, Mode) ->
 			Provider = ""
 	end,
 
+	if
+		Mode band Fraudscore_field /= 0 ->
+			Fraud_Score = readcolstringrow(S, R, Dbtype, Fraudscore_position);
+		true ->
+			Fraud_Score = ""
+	end,
+	
 	if
 		(Country_short == "-") or (Proxy_type == "-") ->
 			Is_proxy = 0;
@@ -321,6 +332,7 @@ readrecord(S, R, Dbtype, Mode) ->
 	last_seen = Last_seen,
 	threat = Threat,
 	provider = Provider,
+	fraud_score = Fraud_Score,
 	is_proxy = Is_proxy
 	}.
 
@@ -384,6 +396,7 @@ searchtree(S, Ipnum, Dbtype, Low, High, BaseAddr, Colsize, Iptype, Mode) ->
 			last_seen = X,
 			threat = X,
 			provider = X,
+			fraud_score = X,
 			is_proxy = -1
 			}
 	end.
@@ -435,7 +448,7 @@ search6(S, Ipnum, Dbtype, Low, High, Baseaddr, Indexbaseaddr, Colsize, Mode) ->
 	end.
 
 getall(Ip) ->
-	query(Ip, 16383).
+	query(Ip, 32767).
 
 getcountryshort(Ip) ->
 	Result = query(Ip, 1),
@@ -489,6 +502,10 @@ getprovider(Ip) ->
 	Result = query(Ip, 8192),
 	Result#ip2proxyrecord.provider.
 
+getfraudscore(Ip) ->
+	Result = query(Ip, 16384),
+	Result#ip2proxyrecord.fraud_score.
+
 isproxy(Ip) ->
 	Result = query(Ip, 64),
 	Result#ip2proxyrecord.is_proxy.
@@ -563,6 +580,7 @@ query(Ip, Mode) ->
 													last_seen = Z,
 													threat = Z,
 													provider = Z,
+													fraud_score = Z,
 													is_proxy = -1
 													}
 											end
@@ -582,6 +600,7 @@ query(Ip, Mode) ->
 									last_seen = X,
 									threat = X,
 									provider = X,
+									fraud_score = X,
 									is_proxy = -1
 									}
 							end,
@@ -602,6 +621,7 @@ query(Ip, Mode) ->
 							last_seen = Y,
 							threat = Y,
 							provider = Y,
+							fraud_score = Y,
 							is_proxy = -1
 							}
 					end

mix.exs

@@ -4,7 +4,7 @@ defmodule IP2ProxyErlang.MixProject do
   def project() do
     [
       app: :ip2proxy_erlang,
-      version: "3.3.3",
+      version: "3.4.0",
       elixir: "~> 1.0",
       build_embedded: Mix.env == :prod,
       start_permanent: Mix.env == :prod,

test.erl

@@ -5,7 +5,7 @@ printme(V) ->
 	case V of
 		{} ->
 			io:format("No results.~n", []);
-		{ip2proxyrecord, Country_short, Country_long, Region, City, Isp, Proxy_type, Domain, Usage_type, Asn, As, Last_seen, Threat, Provider, Is_proxy} ->
+		{ip2proxyrecord, Country_short, Country_long, Region, City, Isp, Proxy_type, Domain, Usage_type, Asn, As, Last_seen, Threat, Provider, Fraud_score, Is_proxy} ->
 			io:format("Country_short: ~p~n", [Country_short]),
 			io:format("Country_long: ~p~n", [Country_long]),
 			io:format("Region: ~p~n", [Region]),
@@ -19,13 +19,14 @@ printme(V) ->
 			io:format("Last_seen: ~p~n", [Last_seen]),
 			io:format("Threat: ~p~n", [Threat]),
 			io:format("Provider: ~p~n", [Provider]),
+			io:format("Fraud_score: ~p~n", [Fraud_score]),
 			io:format("Is_proxy: ~p~n", [Is_proxy])
 	end,
 	io:format("===================================================================~n", []).
 
 testme() ->
 	X = "37.252.228.50",
-	case ip2proxy:open("./ip2proxy-testdata/IP2PROXY-IP-PROXYTYPE-COUNTRY-REGION-CITY-ISP-DOMAIN-USAGETYPE-ASN-LASTSEEN-THREAT-RESIDENTIAL-PROVIDER.BIN") of
+	case ip2proxy:open("./ip2proxy-testdata/IP2PROXY-IP-PROXYTYPE-COUNTRY-REGION-CITY-ISP-DOMAIN-USAGETYPE-ASN-LASTSEEN-THREAT-RESIDENTIAL-PROVIDER-FRAUDSCORE.BIN") of
 	0 ->
 		io:format("getpackageversion: ~p~n", [ip2proxy:getpackageversion()]),
 		io:format("getmoduleversion: ~p~n", [ip2proxy:getmoduleversion()]),
@@ -46,6 +47,7 @@ testme() ->
 		io:format("Last_seen: ~p~n", [ip2proxy:getlastseen(X)]),
 		io:format("Threat: ~p~n", [ip2proxy:getthreat(X)]),
 		io:format("Provider: ~p~n", [ip2proxy:getprovider(X)]),
+		io:format("Fraud_score: ~p~n", [ip2proxy:getfraudscore(X)]),
 		io:format("Is_proxy: ~p~n", [ip2proxy:isproxy(X)]);
 	_ ->
 		io:format("Error reading BIN file~n", [])