#include "gb-include.h"

#include "HashTableX.h"

#include "Domains.h"

#include "Mem.h"

static bool isTLD ( char *tld, int32_t tldLen );

char *getDomainOfIp ( char *host , int32_t hostLen , int32_t *dlen ) {

// get host length

//int32_t hostLen = gbstrlen(host);

// if ip != 0 then host is a numeric ip, point to first 3 #'s

char *s = host + hostLen - 1;

while ( s > host && *s!='.' ) s--;

// if no '.' return NULL and 0

if ( s == host ) { *dlen = 0; return NULL; }

// otherwise, set length

*dlen = s - host;

// return the first 3 #'s (1.2.3) as the domain

return host;

}

char *getDomain ( char *host , int32_t hostLen , char *tld , int32_t *dlen ) {

// assume no domain

*dlen = 0;

// get host length

//int32_t hostLen = gbstrlen(host);

// get the tld in host, if any, if not, it returns NULL

char *s = tld; // getTLD ( host , hostLen );

// return NULL if host contains no valid tld

if ( ! s ) return NULL;

// if s is host we just have tld

if ( s == host ) return NULL;

// there MUST be a period before s

s--; if ( *s != '.' ) return NULL;

// back up over the period

s--;

// now go back until s hits "host" or another period

while ( s > host && *s !='.' ) s--;

// . now *s=='.' or s==host

// . if s is host then "host" is an acceptable domain w/o a hostname

// . fix http://.xyz.com/...... by checking for period

if ( s == host && *s !='.' ) { *dlen = hostLen; return s; }

// skip s forward over the period to point to domain name

s++;

// set domain length

*dlen = hostLen - ( s - host );

return s;

}

// host must be NULL terminated

char *getTLD ( char *host , int32_t hostLen ) {

// make "s" point to last period in the host

//char *s = host + gbstrlen(host) - 1;

char *hostEnd = host + hostLen;

char *s = hostEnd - 1;

while ( s > host && *s !='.' ) s--;

// point to the tld in question

char *t = s;

if ( *t == '.' ) t++;

// reset our current tld ptr

char *tld = NULL;

// is t a valid tld? if so, set "tld" to "t".

if ( isTLD ( t , hostEnd - t ) ) tld = t;

// host had no period at most we had just a tld so return NULL

if ( s == host ) return tld;

// back up over last period

s--;

// just because it's in table doesn't mean we can't try going up more

while ( s > host && *s !='.' ) s--;

// point to the tld in question

t = s;

if ( *t == '.' ) t++;

// is t a valid tld? if so, set "tld" to "t".

if ( isTLD ( t , hostEnd - t ) ) tld = t;

// host had no period at most we had just a tld so return NULL

if ( s == host ) return tld;

// . now only 1 tld has 2 period and that is "LKD.CO.IM"

// . so waste another iteration for that (TODO: speed up?)

// . back up over last period

s--;

// just because it's in table doesn't mean we can't try going up more

while ( s > host && *s !='.' ) s--;

// point to the tld in question

t = s;

if ( *t == '.' ) t++;

// is t a valid tld? if so, set "tld" to "t".

if ( isTLD ( t , hostEnd - t ) ) tld = t;

// we must have gotten the tld by this point, if there was a valid one

return tld;

}

//static TermTable s_table(false);

static HashTableX s_table;

static bool isTLD ( char *tld , int32_t tldLen ) {