#include <stdio.h>
#include <stdarg.h>
#include "bsp/bsp.h"
#include "logger.h"
#include "os/co_task.h"
#include "os/queue.h"

static uint32_t level_data[2];
static co_queue_t log_queue = NULL;

static void log_co_task(void *args) {
	log_chan_t log_v;
	while(1) {
		if (queue_get(log_queue, &log_v)){
			sys_debug("%d: %d\n", log_v.id, log_v.value);
		}
		co_task_yield();
	}
}

void log_start_task(void) {
	log_queue = queue_create(1000, sizeof(log_chan_t));
	co_task_create(log_co_task, NULL, 512);
}

void log_chan_value(u16 id, s32 value) {
	log_chan_t log_v;
	log_v.id = id;
	log_v.value = value;
	queue_put(log_queue, &log_v);
}

static int _get_level(int mod){
	int index = mod_bit_start(mod)/(32+1);
	mod = mod_bit_start(mod) % 32;
	return (level_data[index] >> mod) & LEVEL_MASK;
}

void set_log_level(int mod, int l){
	int index = mod_bit_start(mod)/(32+1);
	mod = mod_bit_start(mod) % 32;
	level_data[index] = (level_data[index] & (~(LEVEL_MASK<<mod))) | ((l & LEVEL_MASK)<<mod);
}

static void log_out(char *fmt, va_list args){
	vprintf(fmt, args);
	if (fmt[strlen(fmt) - 1] != '\n'){
		printf("\n");
	}
}

void log_debug(int mod, char *fmt, ...){
	if (_get_level(mod) >= L_debug){
		va_list args;
		va_start(args, fmt);		
		log_out(fmt, args);
		va_end(args);
	}
}

void log_warning(int mod, char *fmt, ...){
	if (_get_level(mod) >= L_warning){
		va_list args;
		va_start(args, fmt);		
		log_out(fmt, args);
		va_end(args);
	}
}

void log_error(int mod, char *fmt, ...){
	if (_get_level(mod) >= L_error){
		va_list args;
		va_start(args, fmt);		
		log_out(fmt, args);
		va_end(args);
	}
}
//rewrite the fputc, so that the printf,vprintf can log the info the can
#if LOG_UART==0
static char log_buffer[8];
static int log_index = 0;
int fputc(int c, FILE *fp){
	can_id_t frame_id;
	frame_id.id=0;
	frame_id.src 	= CAN_MY_ADDRESS;
	frame_id.type 		= ptype_indicater;

	if (c == '\n'){ //don't send '\n'
		if (log_index != 0){
			frame_id.dest 	= 0x72;
			shark_can0_send_message(frame_id.id, log_buffer, log_index);
		}
		log_index = 0;
	}else if (log_index == sizeof(log_buffer)){
		frame_id.dest 	= 0x70;
		shark_can0_send_message(frame_id.id, log_buffer, log_index);
		log_index = 0;
		log_buffer[log_index++] = c;
	}else{
		log_buffer[log_index++] = c;
	}
	return 1;
}
#endif