/* ************************************************************************** */
/*                                                                            */
/*                                                        :::      ::::::::   */
/*   io.c                                               :+:      :+:    :+:   */
/*                                                    +:+ +:+         +:+     */
/*   By: cacharle <me@cacharle.xyz>                 +#+  +:+       +#+        */
/*                                                +#+#+#+#+#+   +#+           */
/*   Created: 2020/09/30 10:03:53 by cacharle          #+#    #+#             */
/*   Updated: 2021/01/10 10:12:23 by cacharle         ###   ########.fr       */
/*                                                                            */
/* ************************************************************************** */

#include "common.h"

static size_t	st_strlen(char *s)
{
	size_t	counter;

	counter = 0;
	while (s[counter])
		counter++;
	return (counter);
}

#define PHILO_PUT_BUF_SIZE 20000

static char		g_buf[PHILO_PUT_BUF_SIZE + 256] = {'\0'};
static char		*g_curr = g_buf;

void			philo_put(size_t id, t_philo_event event, t_time initial_time)
{
	g_curr = h_nbrcpy(g_curr, h_time_now() - initial_time);
	g_curr = h_strcpy_end(g_curr, " ");
	g_curr = h_nbrcpy(g_curr, id);
	if (event == EVENT_FORK)
		g_curr = h_strcpy_end(g_curr, " has taken fork\n");
	else if (event == EVENT_EAT)
		g_curr = h_strcpy_end(g_curr, " is eating\n");
	else if (event == EVENT_SLEEP)
		g_curr = h_strcpy_end(g_curr, " is sleeping\n");
	else if (event == EVENT_THINK)
		g_curr = h_strcpy_end(g_curr, " is thinking\n");
	else if (event == EVENT_DIE)
		g_curr = h_strcpy_end(g_curr, " died\n");
	if (g_curr - g_buf > PHILO_PUT_BUF_SIZE)
		philo_put_flush();
}

void			philo_put_flush(void)
{
	write(STDOUT_FILENO, g_buf, g_curr - g_buf);
	g_curr = g_buf;
	g_buf[0] = '\0';
}

int				h_err(int ret, const char *format, char *str)
{
	while (*format != '\0')
	{
		if (format[0] == '%' && format[1] == 's')
		{
			if (str != NULL)
				write(STDERR_FILENO, str, st_strlen(str));
			format += 2;
		}
		else
		{
			write(STDERR_FILENO, format, 1);
			format++;
		}
	}
	write(STDERR_FILENO, "\n", 1);
	return (ret);
}