/* GNU Talkfilters
   Copyright (C) 1998-2003 Free Software Foundation, Inc.

   This file is part of GNU Talkfilters

   GNU Talkfilters is free software; you can redistribute it and/or
   modify it under the terms of the GNU General Public License as
   published by the Free Software Foundation; either version 2, or (at
   your option) any later version.

   This software is distributed in the hope that it will be amusing, but
   WITHOUT ANY WARRANTY; without even the implied warranty of
   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
   General Public License for more details.

   You should have received a copy of the GNU General Public License
   along with this software; see the file COPYING.  If not, write to the
   Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
*/

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

#include <stdlib.h>
#include <stddef.h>
#include <stdarg.h>
#include <unistd.h>
#include <stdio.h>
#include <time.h>
#ifdef HAVE_STRING_H
#include <string.h>
#endif

#include "getopt.h"
#include "common.h"

/*
 */

static const struct option __gtf_options[] = { { "help", 0, NULL, 0  },
                                               { "version", 0, NULL, 0 },
                                               { NULL, 0, NULL, 0 } };

/*
 */

void gtf_parse_args_basic(int argc, char **argv, const char *help,
                          const char *version)
{
  int c, option_index;

  while((c = getopt_long(argc, argv, "g", __gtf_options, &option_index))
        != EOF)
  {
    switch(c)
    {
      case 0:
        if(option_index == HELP_OPTION)
          fprintf(stderr, help, *argv);
        else if(option_index == VERSION_OPTION)
        {
          fputs(version, stderr);
          fputc('\n', stderr);
        }
        exit(EXIT_SUCCESS);
        break;

      default:
        fprintf(stderr, help, *argv);
        exit(EXIT_FAILURE);
        break;
    }
  }
}

/*
 */

void gtf_strbuf_init(gtf_databuf_t *sbuf, char *buf, size_t bufsz)
{
  sbuf->buf = buf;
  sbuf->bufsz = bufsz;
  sbuf->left = bufsz - 1;
  sbuf->pos = sbuf->buf;
  sbuf->overflow = 0;
}

/*
 */

int gtf_strbuf_vprintf(gtf_databuf_t *buf, const char *fmt, ...)
{
  va_list vp;
  int l;

  va_start(vp, fmt);
  l = vsnprintf(buf->pos, buf->left, fmt, vp);
  va_end(vp);

  if(l > buf->left)
  {
    buf->pos += buf->left;
    buf->left = 0;
    buf->overflow = 1;
  }
  else
  {
    buf->left -= l;
    buf->pos += l;
    *(buf->pos) = 0;
  }

  return(l);
}

/*
 */

int gtf_strbuf_puts(gtf_databuf_t *buf, const char *s)
{
  int l = strlen(s);

  if(l > buf->left)
  {
    buf->overflow = 1;
    l = buf->left;
  }

  strncpy(buf->pos, s, l);
  buf->pos += l;
  buf->left -= l;

  *(buf->pos) = 0;

  return(l);
}

/*
 */

int gtf_strbuf_putc(gtf_databuf_t *buf, char c)
{
  if(buf->left < 1)
  {
    buf->overflow = 1;
    return(0);
  }

  *(buf->pos) = c;
  buf->pos++;
  *(buf->pos) = 0;

  buf->left--;

  return(1);
}

/*
 */

void gtf_random_seed(void)
{
  srand(time(NULL) | getpid());
}

/* end of source file */