Lianja

AbuseIPDB Check Endpoint

See more _Miscellaneous_ Examples

The check endpoint accepts a single IP address (v4 or v6). Optionally you may set the maxAgeInDays parameter to only return reports within the last x amount of days. Lianja

llSuccess = .F.

// This example assumes the Chilkat API to have been previously unlocked.
// See Global Unlock Sample for sample code.

loHttp = createobject("CkHttp")

// Implements the following CURL command:

// curl -G https://api.abuseipdb.com/api/v2/check \
//   --data-urlencode "ipAddress=118.25.6.39" \
//   -d maxAgeInDays=90 \
//   -d verbose \
//   -H "Key: $YOUR_API_KEY" \
//   -H "Accept: application/json"

// Use the following online tool to generate HTTP code from a CURL command
// Convert a cURL Command to HTTP Source Code

loReq = createobject("CkHttpRequest")
loReq.HttpVerb = "GET"
loReq.Path = "/api/v2/check"
loReq.ContentType = "application/x-www-form-urlencoded"
loReq.AddParam("maxAgeInDays","90")
loReq.AddParam("verbose","")
loReq.AddParam("ipAddress","118.25.6.39")

loReq.AddHeader("Key","$YOUR_API_KEY")
loReq.AddHeader("Accept","application/json")

loResp = createobject("CkHttpResponse")
llSuccess = loHttp.HttpSReq("api.abuseipdb.com",443,.T.,loReq,loResp)
if (llSuccess = .F.) then
    ? loHttp.LastErrorText
    release loHttp
    release loReq
    release loResp
    return
endif

loJResp = createobject("CkJsonObject")
loJResp.Load(loResp.BodyStr)
loJResp.EmitCompact = .F.

? "Response Body:"
? loJResp.Emit()

lnRespStatusCode = loResp.StatusCode
? "Response Status Code = " + str(lnRespStatusCode)
if (lnRespStatusCode >= 400) then
    ? "Response Header:"
    ? loResp.Header
    ? "Failed."
    release loHttp
    release loReq
    release loResp
    release loJResp
    return
endif

// Sample JSON response:
// (Sample code for parsing the JSON response is shown below)

// {
//   "data": {
//     "ipAddress": "118.25.6.39",
//     "isPublic": true,
//     "ipVersion": 4,
//     "isWhitelisted": false,
//     "abuseConfidenceScore": 1,
//     "countryCode": "CN",
//     "usageType": "Data Center\/Web Hosting\/Transit",
//     "isp": "Tencent Cloud Computing (Beijing) Co. Ltd",
//     "domain": "tencent.com",
//     "hostnames": [
//     ],
//     "countryName": "China",
//     "totalReports": 2,
//     "numDistinctUsers": 1,
//     "lastReportedAt": "2021-04-03T18:55:00+00:00",
//     "reports": [
//       {
//         "reportedAt": "2021-03-10T10:07:53+00:00",
//         "comment": "SSH login attempts with user root.",
//         "categories": [
//           18,
//           22
//         ],
//         "reporterId": 54484,
//         "reporterCountryCode": "CN",
//         "reporterCountryName": "China"
//       },
//       {
//         "reportedAt": "2021-03-09T09:47:57+00:00",
//         "comment": "SSH login attempts with user root.",
//         "categories": [
//           18,
//           22
//         ],
//         "reporterId": 54484,
//         "reporterCountryCode": "CN",
//         "reporterCountryName": "China"
//       }
//     ]
//   }
// }

// Sample code for parsing the JSON response...
// Use the following online tool to generate parsing code from sample JSON:
// Generate Parsing Code from JSON

lcDataIpAddress = loJResp.StringOf("data.ipAddress")
llDataIsPublic = loJResp.BoolOf("data.isPublic")
lnDataIpVersion = loJResp.IntOf("data.ipVersion")
llDataIsWhitelisted = loJResp.BoolOf("data.isWhitelisted")
lnDataAbuseConfidenceScore = loJResp.IntOf("data.abuseConfidenceScore")
lcDataCountryCode = loJResp.StringOf("data.countryCode")
lcDataUsageType = loJResp.StringOf("data.usageType")
lcDataIsp = loJResp.StringOf("data.isp")
lcDataDomain = loJResp.StringOf("data.domain")
lcDataCountryName = loJResp.StringOf("data.countryName")
lnDataTotalReports = loJResp.IntOf("data.totalReports")
lnDataNumDistinctUsers = loJResp.IntOf("data.numDistinctUsers")
lcDataLastReportedAt = loJResp.StringOf("data.lastReportedAt")
i = 0
lnCount_i = loJResp.SizeOfArray("data.hostnames")
do while i < lnCount_i
    loJResp.I = i
    i = i + 1
enddo
i = 0
lnCount_i = loJResp.SizeOfArray("data.reports")
do while i < lnCount_i
    loJResp.I = i
    lcReportedAt = loJResp.StringOf("data.reports[i].reportedAt")
    lcComment = loJResp.StringOf("data.reports[i].comment")
    lnReporterId = loJResp.IntOf("data.reports[i].reporterId")
    lcReporterCountryCode = loJResp.StringOf("data.reports[i].reporterCountryCode")
    lcReporterCountryName = loJResp.StringOf("data.reports[i].reporterCountryName")
    j = 0
    lnCount_j = loJResp.SizeOfArray("data.reports[i].categories")
    do while j < lnCount_j
        loJResp.J = j
        lnIntVal = loJResp.IntOf("data.reports[i].categories[j]")
        j = j + 1
    enddo
    i = i + 1
enddo


release loHttp
release loReq
release loResp
release loJResp