Unicode C

DNS Query TXT Records

See more DNS Examples

Shows how to perform a DNS query to retrieve TXT records.

Note: This example requires Chilkat v9.5.0.96 or later.

Unicode C

#include <C_CkDnsW.h>
#include <C_CkJsonObjectW.h>

void ChilkatSample(void)
    {
    BOOL success;
    HCkDnsW dns;
    HCkJsonObjectW json;
    const wchar_t *name;
    int ttl;
    const wchar_t *text;
    int i;
    int count_i;

    success = FALSE;

    dns = CkDnsW_Create();

    json = CkJsonObjectW_Create();
    CkJsonObjectW_putEmitCompact(json,FALSE);

    success = CkDnsW_Query(dns,L"TXT",L"x.com",json);
    if (success == FALSE) {
        wprintf(L"%s\n",CkDnsW_lastErrorText(dns));
        CkDnsW_Dispose(dns);
        CkJsonObjectW_Dispose(json);
        return;
    }

    wprintf(L"%s\n",CkJsonObjectW_emit(json));

    // Sample response.
    // Parsing code below..

    // {
    //   "answer": {
    //     "txt": [
    //       {
    //         "name": "x.com",
    //         "ttl": 300,
    //         "text": "kkdl3qb3tcrmdhfsm803p67r0my0svs8"
    //       },
    //       {
    //         "name": "x.com",
    //         "ttl": 300,
    //         "text": "v=spf1 ip4:199.16.156.128/26 ip4:199.59.150.64/26 include:_spf.google.com include:spf-008d0a01.pphosted.com -all"
    //       },
    //       {
    //         "name": "x.com",
    //         "ttl": 300,
    //         "text": "google-site-verification=8yQmoVhQedzlt36RPeQP41ytrEFk9aHEnde_xm0626g"
    //       },
    //       {
    //         "name": "x.com",
    //         "ttl": 300,
    //         "text": "google-site-verification=F6u9mGL--d2lbLljvH3b1UUgXtevQPdcamKr9c8914A"
    //       }
    //     ]
    //   }
    // }

    // Use this online tool to generate parsing code from sample JSON: 
    // Generate Parsing Code from JSON

    i = 0;
    count_i = CkJsonObjectW_SizeOfArray(json,L"answer.txt");
    while (i < count_i) {
        CkJsonObjectW_putI(json,i);
        name = CkJsonObjectW_stringOf(json,L"answer.txt[i].name");
        ttl = CkJsonObjectW_IntOf(json,L"answer.txt[i].ttl");
        text = CkJsonObjectW_stringOf(json,L"answer.txt[i].text");
        i = i + 1;
    }



    CkDnsW_Dispose(dns);
    CkJsonObjectW_Dispose(json);

    }