#include <unistd.h>
#include "stralloc.h"
#include "buffer.h"
#include "qsutil.h"

static stralloc foo = {0};

static char errbuf[1];
static struct buffer be = BUFFER_INIT(write,0,errbuf,1);


void logsa(stralloc *sa) 
{
  buffer_putflush(&be,sa->s,sa->len); 
}

void log1s(char *s1) 
{
  buffer_putsflush(&be,s1); 
}

void log2s(char *s1,char *s2) 
{
  buffer_putsflush(&be,s1);
  buffer_putsflush(&be,s2); 
}

void log3s(char *s1,char *s2,char *s3) 
{
  buffer_putsflush(&be,s1);
  buffer_putsflush(&be,s2);
  buffer_putsflush(&be,s3); 
}

void log4s(char *s1,char *s2,char *s3,char *s4) 
{
  buffer_putsflush(&be,s1);
  buffer_putsflush(&be,s2);
  buffer_putsflush(&be,s3); 
  buffer_putsflush(&be,s4); 
}

void log5s(char *s1,char *s2,char *s3,char *s4,char *s5) 
{
  buffer_putsflush(&be,s1);
  buffer_putsflush(&be,s2);
  buffer_putsflush(&be,s3); 
  buffer_putsflush(&be,s4); 
  buffer_putsflush(&be,s5); 
}

void nomem() 
{ 
  log1s("alert: out of memory, sleeping...\n"); 
  sleep(10); 
}

void pausedir(char *dir)
{ 
  log3s("alert: unable to opendir ",dir,", sleeping...\n"); 
  sleep(10); 
}

int issafe(char ch)
{
  if (ch == '%') return 0; /* general principle: allman's code is crap */
  if (ch < 33) return 0;
  if (ch > 126) return 0;
  return 1;
}

void logsafe(char *s)
{
  int i;

  while (!stralloc_copys(&foo,s)) nomem();
  for (i = 0; i < foo.len; ++i)
    if (foo.s[i] == '\n')
      foo.s[i] = '/';
    else
      if (!issafe(foo.s[i]))
        foo.s[i] = '_';

  logsa(&foo);
}