/* $Id$ */

#include "ssdeep.h"
#include <stdarg.h>

void print_status(const char *fmt, ...)
{
  va_list(ap);
  
  va_start(ap,fmt); 
  vprintf(fmt,ap); 
  va_end(ap); 
  
  printf ("%s", NEWLINE);
}


void print_error(const state *s, const char *fmt, ...)
{
  if (NULL == s)
    internal_error("%s: NULL state passed to print_error", __progname);

  if (s->mode & mode_silent)
    return;

  va_list(ap);
  
  va_start(ap,fmt); 
  vfprintf(stderr,fmt,ap); 
  va_end(ap); 
  
  fprintf (stderr,"%s", NEWLINE);

}

#define MD5DEEP_PRINT_MSG(HANDLE,MSG) \
va_list(ap);  \
va_start(ap,MSG); \
if (vfprintf(HANDLE,MSG,ap) < 0)  \
{ \
   fprintf(stderr, "%s: %s", __progname, strerror(errno)); \
   exit(EXIT_FAILURE);  \
} \
va_end(ap); fprintf (HANDLE,"%s", NEWLINE);


void print_error_unicode(state *s, const TCHAR *fn, const char *fmt, ...)
{
  if (NULL == s)
    internal_error("%s: NULL state passed to print_error_unicode", __progname);

  if (!(s->mode & mode_silent))
    {
      display_filename(stderr,fn,FALSE);
      fprintf(stderr,": ");
      MD5DEEP_PRINT_MSG(stderr,fmt);
    }
}



/* Internal errors are so serious that we ignore the user's wishes 
   about silent mode. Our need to debug the program outweighs their
   preferences. Besides, the program is probably crashing anyway... */
void internal_error(const char *fmt, ... )
{
  MD5DEEP_PRINT_MSG(stderr,fmt);  
  print_status ("%s: Internal error. Contact developer!", __progname);  
  exit (EXIT_FAILURE);
}



void fatal_error(const char *fmt, ... )
{
  va_list(ap);
  
  va_start(ap,fmt); 
  vprintf(fmt,ap); 
  va_end(ap); 
  
  printf ("%s", NEWLINE);
  exit (EXIT_FAILURE);
}


#ifdef _WIN32
void display_filename(FILE *out, const TCHAR *fn, int escape_quotes)
{
  size_t pos,len;

  if (NULL == fn || NULL == out)
    return;

  len = _tcslen(fn);

  for (pos = 0 ; pos < len ; ++pos)
  {
    // If desired, escape quotation marks. Used for CSV modes 
    if (escape_quotes && ('"' == ((fn[pos] & 0xff00) >> 16)))
    {
      fprintf(out,"\\\"");
    }
    else
    {
      // Windows can only display the English (00) code page
      // on the command line. 
      if (0 == (fn[pos] & 0xff00))
	fputc(fn[pos],out);
      //	_ftprintf(out, _TEXT("%c"), fn[pos]);
      else 
	fputc('?',out);
      //	_ftprintf(out, _TEXT("?"));
    }
  }
}
#else
void display_filename(FILE *out, const TCHAR *fn, int escape_quotes)
{
  size_t pos, len;

  if (NULL == fn || NULL == out)
    return;

  len = _tcslen(fn);
  for (pos = 0 ; pos < len ; ++pos)
  {
    if (escape_quotes && '"' == fn[pos])
      _ftprintf(out, _TEXT("\\\""));
    else
      _ftprintf(out, _TEXT("%c"), fn[pos]);
  } 
}
#endif