#include "qsutil.h"

#include <unistd.h>

#include "buffer.h"
#include "stralloc.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);
}

static 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);
}