#include "stralloc.h"
#include "dnsresolv.h"

/**
	@file dns_dtda.c
	@author djb
	@source ucspi-tcp
	@brief domain to dot append
*/

int dns_domain_todot_cat(stralloc *out,const char *d)
{
  char ch;
  char ch2;
  unsigned char ch3;
  char buf[4];

  if (!*d)
    return stralloc_append(out,".");

  for (;;) {
    ch = *d++;
    while (ch--) {
      ch2 = *d++;
      if ((ch2 >= 'A') && (ch2 <= 'Z')) ch2 += 32;   // FQDN -> lowercase
      if (((ch2 >= 'a') && (ch2 <= 'z')) || 
          ((ch2 >= '0') && (ch2 <= '9')) || 
           (ch2 == '-') || (ch2 == '_')) {
        if (!stralloc_append(out,&ch2)) return DNS_MEM;
      }
      else {                                         // decimal -> octal
        ch3 = ch2;
        buf[3] = '0' + (ch3 & 7); ch3 >>= 3;
        buf[2] = '0' + (ch3 & 7); ch3 >>= 3;
        buf[1] = '0' + (ch3 & 7);
        buf[0] = '\\';
        if (!stralloc_catb(out,buf,4)) return DNS_MEM;
      }
    }
    if (!*d) return 1;
    if (!stralloc_append(out,".")) return DNS_MEM;
  }
}