|
Chilkat • HOME • Android™ • AutoIt • C • C# • C++ • Chilkat2-Python • CkPython • Classic ASP • DataFlex • Delphi DLL • Go • Java • Node.js • Objective-C • PHP Extension • Perl • PowerBuilder • PowerShell • PureBasic • Ruby • SQL Server • Swift • Tcl • Unicode C • Unicode C++ • VB.NET • VBScript • Visual Basic 6.0 • Visual FoxPro • Xojo Plugin
(AutoIt) RDAP Domain Lookup using rdap.orgDemonstrates doing an RDAP domain lookup using the rdap.org public RDAP server.
; This example requires the Chilkat API to have been previously unlocked. ; See Global Unlock Sample for sample code. $oHttp = ObjCreate("Chilkat.Http") ; Send HTTP requests to https://rdap.org/<type>/<object>, where <type> is the object type (one of domain, ip, autnum, entity etc) ; and <object> is the object identifier (eg example.com, 192.168.0.1, 64496, etc). ; For example, here's a lookup for "oracle.com" $oSbResponse = ObjCreate("Chilkat.StringBuilder") Local $bSuccess = $oHttp.QuickGetSb("https://rdap.org/domain/oracle.com",$oSbResponse) If ($bSuccess = False) Then ConsoleWrite($oHttp.LastErrorText & @CRLF) Exit EndIf Local $iStatusCode = $oHttp.LastStatus If ($iStatusCode <> 200) Then ConsoleWrite("Error response:" & @CRLF) ConsoleWrite($oSbResponse.GetAsString() & @CRLF) ConsoleWrite("status code: " & $iStatusCode & @CRLF) Exit EndIf ; Load the JSON response and examine.. ; Use this online tool to generate parsing code from sample JSON: ; Generate Parsing Code from JSON $oJson = ObjCreate("Chilkat.JsonObject") $oJson.LoadSb($oSbResponse) $oJson.EmitCompact = False ConsoleWrite($oJson.Emit() & @CRLF) ; Here's a sample response, and the parsing code generated from the above online tool follows.. ; { ; "objectClassName": "domain", ; "handle": "607513_DOMAIN_COM-VRSN", ; "ldhName": "ORACLE.COM", ; "links": [ ; { ; "value": "https:\/\/rdap.verisign.com\/com\/v1\/domain\/ORACLE.COM", ; "rel": "self", ; "href": "https:\/\/rdap.verisign.com\/com\/v1\/domain\/ORACLE.COM", ; "type": "application\/rdap+json" ; }, ; { ; "value": "https:\/\/rdap.markmonitor.com\/rdap\/domain\/ORACLE.COM", ; "rel": "related", ; "href": "https:\/\/rdap.markmonitor.com\/rdap\/domain\/ORACLE.COM", ; "type": "application\/rdap+json" ; } ; ], ; "status": [ ; "client delete prohibited", ; "client transfer prohibited", ; "client update prohibited", ; "server delete prohibited", ; "server transfer prohibited", ; "server update prohibited" ; ], ; "entities": [ ; { ; "objectClassName": "entity", ; "handle": "292", ; "roles": [ ; "registrar" ; ], ; "publicIds": [ ; { ; "type": "IANA Registrar ID", ; "identifier": "292" ; } ; ], ; "vcardArray": [ ; "vcard", ; [ ; [ ; "version", ; {}, ; "text", ; "4.0" ; ], ; [ ; "fn", ; {}, ; "text", ; "MarkMonitor Inc." ; ] ; ] ; ], ; "entities": [ ; { ; "objectClassName": "entity", ; "roles": [ ; "abuse" ; ], ; "vcardArray": [ ; "vcard", ; [ ; [ ; "version", ; {}, ; "text", ; "4.0" ; ], ; [ ; "fn", ; {}, ; "text", ; "" ; ], ; [ ; "tel", ; { ; "type": "voice" ; }, ; "uri", ; "tel:+1.2086851750" ; ], ; [ ; "email", ; {}, ; "text", ; "abusecomplaints@markmonitor.com" ; ] ; ] ; ] ; } ; ] ; } ; ], ; "events": [ ; { ; "eventAction": "registration", ; "eventDate": "1988-12-02T05:00:00Z" ; }, ; { ; "eventAction": "expiration", ; "eventDate": "2025-12-01T05:00:00Z" ; }, ; { ; "eventAction": "last changed", ; "eventDate": "2024-10-30T09:32:52Z" ; }, ; { ; "eventAction": "last update of RDAP database", ; "eventDate": "2024-11-26T14:11:14Z" ; } ; ], ; "secureDNS": { ; "delegationSigned": false ; }, ; "nameservers": [ ; { ; "objectClassName": "nameserver", ; "ldhName": "A1-160.AKAM.NET" ; }, ; { ; "objectClassName": "nameserver", ; "ldhName": "A11-66.AKAM.NET" ; }, ; { ; "objectClassName": "nameserver", ; "ldhName": "A13-65.AKAM.NET" ; }, ; { ; "objectClassName": "nameserver", ; "ldhName": "A18-67.AKAM.NET" ; }, ; { ; "objectClassName": "nameserver", ; "ldhName": "NS1.P201.DNS.ORACLECLOUD.NET" ; }, ; { ; "objectClassName": "nameserver", ; "ldhName": "NS2.P201.DNS.ORACLECLOUD.NET" ; }, ; { ; "objectClassName": "nameserver", ; "ldhName": "NS3.P201.DNS.ORACLECLOUD.NET" ; }, ; { ; "objectClassName": "nameserver", ; "ldhName": "NS4.P201.DNS.ORACLECLOUD.NET" ; } ; ], ; "rdapConformance": [ ; "rdap_level_0", ; "icann_rdap_technical_implementation_guide_0", ; "icann_rdap_response_profile_0" ; ], ; "notices": [ ; { ; "title": "Terms of Use", ; "description": [ ; "Service subject to Terms of Use." ; ], ; "links": [ ; { ; "href": "https:\/\/www.verisign.com\/domain-names\/registration-data-access-protocol\/terms-service\/index.xhtml", ; "type": "text\/html" ; } ; ] ; }, ; { ; "title": "Status Codes", ; "description": [ ; "For more information on domain status codes, please visit https:\/\/icann.org\/epp" ; ], ; "links": [ ; { ; "href": "https:\/\/icann.org\/epp", ; "type": "text\/html" ; } ; ] ; }, ; { ; "title": "RDDS Inaccuracy Complaint Form", ; "description": [ ; "URL of the ICANN RDDS Inaccuracy Complaint Form: https:\/\/icann.org\/wicf" ; ], ; "links": [ ; { ; "href": "https:\/\/icann.org\/wicf", ; "type": "text\/html" ; } ; ] ; } ; ] ; } Local $sValue Local $sRel Local $sHref Local $sV_type Local $strVal Local $iJ Local $iCount_j Local $sIdentifier Local $iK Local $iCount_k Local $oJson1 Local $i1 Local $iCount_i1 Local $iJ1 Local $iCount_j1 Local $sEventAction Local $sEventDate Local $sTitle Local $sObjectClassName = $oJson.StringOf("objectClassName") Local $sHandle = $oJson.StringOf("handle") Local $sLdhName = $oJson.StringOf("ldhName") Local $bDelegationSigned = $oJson.BoolOf("secureDNS.delegationSigned") Local $i = 0 Local $iCount_i = $oJson.SizeOfArray("links") While $i < $iCount_i $oJson.I = $i $sValue = $oJson.StringOf("links[i].value") $sRel = $oJson.StringOf("links[i].rel") $sHref = $oJson.StringOf("links[i].href") $sV_type = $oJson.StringOf("links[i].type") $i = $i + 1 Wend $i = 0 $iCount_i = $oJson.SizeOfArray("status") While $i < $iCount_i $oJson.I = $i $strVal = $oJson.StringOf("status[i]") $i = $i + 1 Wend $i = 0 $iCount_i = $oJson.SizeOfArray("entities") While $i < $iCount_i $oJson.I = $i $sObjectClassName = $oJson.StringOf("entities[i].objectClassName") $sHandle = $oJson.StringOf("entities[i].handle") $iJ = 0 $iCount_j = $oJson.SizeOfArray("entities[i].roles") While $iJ < $iCount_j $oJson.J = $iJ $strVal = $oJson.StringOf("entities[i].roles[j]") $iJ = $iJ + 1 Wend $iJ = 0 $iCount_j = $oJson.SizeOfArray("entities[i].publicIds") While $iJ < $iCount_j $oJson.J = $iJ $sV_type = $oJson.StringOf("entities[i].publicIds[j].type") $sIdentifier = $oJson.StringOf("entities[i].publicIds[j].identifier") $iJ = $iJ + 1 Wend $iJ = 0 $iCount_j = $oJson.SizeOfArray("entities[i].vcardArray") While $iJ < $iCount_j $oJson.J = $iJ $strVal = $oJson.StringOf("entities[i].vcardArray[j]") $iK = 0 $iCount_k = $oJson.SizeOfArray("entities[i].vcardArray[j]") While $iK < $iCount_k $oJson.K = $iK $oJson1 = $oJson.ObjectOf("entities[i].vcardArray[j][k]") $i1 = 0 $iCount_i1 = $oJson1.SizeOfArray("") While $i1 < $iCount_i1 $oJson1.I = $i1 $strVal = $oJson1.StringOf("[i]") $i1 = $i1 + 1 Wend $iK = $iK + 1 Wend $iJ = $iJ + 1 Wend $iJ = 0 $iCount_j = $oJson.SizeOfArray("entities[i].entities") While $iJ < $iCount_j $oJson.J = $iJ $sObjectClassName = $oJson.StringOf("entities[i].entities[j].objectClassName") $iK = 0 $iCount_k = $oJson.SizeOfArray("entities[i].entities[j].roles") While $iK < $iCount_k $oJson.K = $iK $strVal = $oJson.StringOf("entities[i].entities[j].roles[k]") $iK = $iK + 1 Wend $iK = 0 $iCount_k = $oJson.SizeOfArray("entities[i].entities[j].vcardArray") While $iK < $iCount_k $oJson.K = $iK $strVal = $oJson.StringOf("entities[i].entities[j].vcardArray[k]") $oJson1 = $oJson.ObjectOf("entities[i].entities[j].vcardArray[k]") $i1 = 0 $iCount_i1 = $oJson1.SizeOfArray("") While $i1 < $iCount_i1 $oJson1.I = $i1 $iJ1 = 0 $iCount_j1 = $oJson1.SizeOfArray("[i]") While $iJ1 < $iCount_j1 $oJson1.J = $iJ1 $strVal = $oJson1.StringOf("[i][j]") $iJ1 = $iJ1 + 1 Wend $i1 = $i1 + 1 Wend $iK = $iK + 1 Wend $iJ = $iJ + 1 Wend $i = $i + 1 Wend $i = 0 $iCount_i = $oJson.SizeOfArray("events") While $i < $iCount_i $oJson.I = $i $sEventAction = $oJson.StringOf("events[i].eventAction") $sEventDate = $oJson.StringOf("events[i].eventDate") $i = $i + 1 Wend $i = 0 $iCount_i = $oJson.SizeOfArray("nameservers") While $i < $iCount_i $oJson.I = $i $sObjectClassName = $oJson.StringOf("nameservers[i].objectClassName") $sLdhName = $oJson.StringOf("nameservers[i].ldhName") $i = $i + 1 Wend $i = 0 $iCount_i = $oJson.SizeOfArray("rdapConformance") While $i < $iCount_i $oJson.I = $i $strVal = $oJson.StringOf("rdapConformance[i]") $i = $i + 1 Wend $i = 0 $iCount_i = $oJson.SizeOfArray("notices") While $i < $iCount_i $oJson.I = $i $sTitle = $oJson.StringOf("notices[i].title") $iJ = 0 $iCount_j = $oJson.SizeOfArray("notices[i].description") While $iJ < $iCount_j $oJson.J = $iJ $strVal = $oJson.StringOf("notices[i].description[j]") $iJ = $iJ + 1 Wend $iJ = 0 $iCount_j = $oJson.SizeOfArray("notices[i].links") While $iJ < $iCount_j $oJson.J = $iJ $sHref = $oJson.StringOf("notices[i].links[j].href") $sV_type = $oJson.StringOf("notices[i].links[j].type") $iJ = $iJ + 1 Wend $i = $i + 1 Wend |
||||
© 2000-2025 Chilkat Software, Inc. All Rights Reserved.