/*
   * Copyright 1999-2008 by Marco d'Itri <md@linux.it>.
   *
   * do_nofail and merge_args come from the module-init-tools package.
   * Copyright 2001 by Rusty Russell.
   * Copyright 2002, 2003 by Rusty Russell, IBM Corporation.
   *
   * This program 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 of the License, or
   * (at your option) any later version.
   *
   * This program is distributed in the hope that it will be useful,
   * 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 program; if not, write to the Free Software Foundation, Inc.,
   * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
   */
  
  /* for strdup */
  #define _XOPEN_SOURCE 500
  
  /* System library */
  #include <stdio.h>
  #include <stdlib.h>
  #include <stdarg.h>
  #include <string.h>
  #include <errno.h>
  
  /* Application-specific */
  #include "utils.h"
  
  void *do_nofail(void *ptr, const char *file, const int line)
  {
      if (ptr)
  	return ptr;
  
      err_quit("Memory allocation failure at %s:%d.", file, line);
  }
  
  /* Prepend options from a string. */
  char **merge_args(char *args, char *argv[], int *argc)
  {
      char *arg, *argstring;
      char **newargs = NULL;
      unsigned int i, num_env = 0;
  
      if (!args)
  	return argv;
  
      argstring = NOFAIL(strdup(args));
      for (arg = strtok(argstring, " "); arg; arg = strtok(NULL, " ")) {
  	num_env++;
  	newargs = NOFAIL(realloc(newargs,
  		    sizeof(newargs[0]) * (num_env + *argc + 1)));
  	newargs[num_env] = arg;
      }
  
      if (!newargs)
  	return argv;
  
      /* Append commandline args */
      newargs[0] = argv[0];
      for (i = 1; i <= *argc; i++)
  	newargs[num_env + i] = argv[i];
  
      *argc += num_env;
      return newargs;
  }
  
  /* Error routines */
  void err_sys(const char *fmt, ...)
  {
      va_list ap;
  
      va_start(ap, fmt);
      vfprintf(stderr, fmt, ap);
      fprintf(stderr, ": %s
  ", strerror(errno));
      va_end(ap);
      exit(2);
  }
  
  void err_quit(const char *fmt, ...)
  {
      va_list ap;
  
      va_start(ap, fmt);
      vfprintf(stderr, fmt, ap);
      fputs("
  ", stderr);
      va_end(ap);
      exit(2);
  }