/*
 * Copyright notice from original mutt:
 * [none]
 *
 * This file is part of mutt-ng, see http://www.muttng.org/.
 * It's licensed under the GNU General Public License,
 * please see the file GPL in the top level source directory.
 */

#if HAVE_CONFIG_H
# include "config.h"
#endif

#include <stdio.h>
#include <ctype.h>
#include <string.h>

#include "mutt.h"

#ifndef STDC_HEADERS
int fclose ();
#endif

/* poor man's version of getdomainname() for systems where it does not return
 * return the DNS domain, but the NIS domain.
 */

static void strip_trailing_dot (char *q)
{
  char *p = q;

  for (; *q; q++)
    p = q;

  if (*p == '.')
    *p = '\0';
}

int getdnsdomainname (char *s, size_t l)
{
  FILE *f;
  char tmp[1024];
  char *p = NULL;
  char *q;

  if ((f = fopen ("/etc/resolv.conf", "r")) == NULL)
    return (-1);

  tmp[sizeof (tmp) - 1] = 0;

  l--;                          /* save room for the terminal \0 */

  while (fgets (tmp, sizeof (tmp) - 1, f) != NULL) {
    p = tmp;
    while (ISSPACE (*p))
      p++;
    if (str_ncmp ("domain", p, 6) == 0
        || str_ncmp ("search", p, 6) == 0) {
      p += 6;

      for (q = strtok (p, " \t\n"); q; q = strtok (NULL, " \t\n"))
        if (strcmp (q, "."))
          break;

      if (q) {
        strip_trailing_dot (q);
        strfcpy (s, q, l);
        safe_fclose (&f);
        return 0;
      }

    }
  }

  safe_fclose (&f);
  return (-1);
}