#ifndef __BAR_PROGRESS_H__
#define __BAR_PROGRESS_H__

#include <stdio.h>
#include <stdlib.h>
#include <string.h>
//#include <unistd.h>
#include <signal.h>
#include <sys/ioctl.h>



/*
 * Prepares screen for progress bar.
 */
void bar_progress_start(void);

void bar_progress_step_msg(int step_progress, int all_progress, char *msg, char fill_bar, char fill_dot, int colored);

/*
 * progress  value 0 to 100
 */
void bar_progress_step(float step_percent);

/*
 * Removes progress bar and restores original screen size.
 */
void bar_progress_stop(void);

#define bg_red "\033[0;41m"
#define bg_green "\033[0;42m"
#define bg_yellow "\033[0;43m"
#define bg_blue "\033[0;44m"
#define bg_magenta "\033[0;45m"
#define bg_cyan "\033[0;46m"
#define bg_white "\033[30;47m"
#define bg_gray "\033[37;40m"

#define BG_GREEN "\033[42;30m"
#define BG_RED "\033[41m"



#endif /* __BAR_PROGRESS_H */








#define IMPLEMENTATION_PROGRESS_BAR()\
\
static struct winsize w;\
static int initialized = 0;\
\
\
static void set_window_height_for_bar_progress(int height)\
{\
	fprintf(stdout, "\n\0337"		/* save cursor*/\
			"\033[0;%dr"		/* set scroll region (this will place the cursor in the top left)*/\
			"\0338\033[1A\033[J"	/* restore cursor but ensure its inside the scrolling area*/\
			, height);\
	fflush(stdout);\
}\
\
\
static void init_progress_bar()\
{\
	/*ioctl(STDOUT_FILENO, TIOCGWINSZ, &w);*/\
	ioctl(1, TIOCGWINSZ, &w);\
	set_window_height_for_bar_progress(w.ws_row - 1);\
}\
\
\
static void abort_progress_bar()\
{\
	bar_progress_stop();\
	exit(0);\
}\
\
\
void bar_progress_start()\
{\
	signal(SIGWINCH, init_progress_bar);\
	signal(SIGINT, abort_progress_bar);\
	/*signal(SIGSEGV, abort_progress_bar);*/\
	init_progress_bar();\
	initialized = 1;\
	bar_progress_step(0);\
}\
\
\
void bar_progress_step_msg(int step_progress, int all_progress, char *msg, char fill_bar, char fill_dot, int colored /*bool */)\
{\
  static int cur_round=0;\
  char prgss[]="\\|/-";\
  int len = strlen(prgss);\
\
	if (initialized == 0) {\
		fprintf(stderr, "error: bar_progress_step() called before bar_progress_start().\n");\
		exit(1);\
	}\
\
	if (step_progress < 0) {\
		step_progress = 0;\
	} \
  else if (step_progress >= all_progress) {\
		step_progress = all_progress -1;\
	}\
  int size_char_log= strlen(msg) + strlen("(-) Progress: [100a] [aaaa/bbbb] a");\
	int width = (w.ws_col - size_char_log);\
  /*int j;*/\
  /*\
  for(int j=0; j< width ; ++j)\
    if (j<(int)(width * (step_progress / 100))) bar[j]='=';\
    else bar[j]='.';\
	bar[width] = 0;\
  */\
  int status_percent =  (step_progress+1) * 100 / all_progress;\
  int status_progress = (step_progress+1) * width / all_progress;\
\
	char *bar = malloc(status_progress + 1);  /*w.ws_col);*/\
	char *dot = malloc(width - status_progress +1 ); /*w.ws_col);*/\
\
  memset(bar,fill_bar,status_progress); \
\
  bar[status_progress]='\0';\
\
  memset(dot,fill_dot, width-status_progress);\
  dot[width - status_progress]='\0'; \
   \
\
	if(colored)printf("\e[s\e[%d;0H(%c) "bg_white"Progress: [%3d%%]\e[0m ["bg_green"%s"bg_red"%s\e[0m] %s [%3d/%3d]\e[u", w.ws_row + 1, prgss[cur_round], status_percent, bar, dot, msg, step_progress + 1, all_progress);\
  else printf("\e[s\e[%d;0H(%c) "bg_gray"Progress: [%3d%%]\e[0m ["bg_white"%s"bg_gray"%s\e[0m] %s [%3d/%3d]\e[u", w.ws_row + 1, prgss[cur_round], status_percent, bar, dot, msg, step_progress + 1, all_progress);\
	/*fprintf(stdout, "\e[s\e[%d;0H(%c) "bg_green"Progress: [%3d%%]\e[0m ["bg_green"%s"bg_red"%s\e[0m] %s [%3d/%3d]\e[u", w.ws_row + 1,prgss[cur_round], status_percent, bar,dot,msg,step_progress,all_progress);*/\
	/*fprintf(stdout, "\e[s\e[%d;0H(%c) "bg_green"Progress: [%3d%%]\e[0m ["BG_GREEN"%s"BG_RED"%s\e[0m] %s [%3d/%3d]\e[u", w.ws_row + 1,prgss[cur_round], status_percent, bar,dot,msg,step_progress,all_progress);*/\
	/*fprintf(stdout, "\e[s\e[%d;0H(%c) \e[42;30mProgress: [%3d%%]\e[0m [%s%s%s%s\033[0m] %s [%3d/%3d]\e[u", w.ws_row + 1,prgss[cur_round], status_percent,BG_GREEN, bar, BG_RED,dot,msg,step_progress,all_progress);*/\
	/*fprintf(stdout, "\e[s\e[%d;0H\e[42;30mProgress: [%3d%%]\e[0m [\033[42;30m%s\033[41m%s\033[0m]\e[u", w.ws_row + 1, (int) step_progress, bar,dot);*/\
	/*fprintf(stdout, "\e[s\e[%d;0H\e[42;30mProgress: [%3d%%]\e[0m [%s]\e[u", w.ws_row + 1, (int) step_progress, bar);*/\
	/*fprintf(stdout, "\e[s\e[%d;0H\e[42;30mProgress: [%3d%%]\e[0m [%s%s]\e[u", w.ws_row + 1, (int) step_progress, bar,dot);*/\
	\
  fflush(stdout);\
\
  if(cur_round<len-1) ++cur_round;\
  else cur_round = 0;\
\
	free(bar);\
	free(dot);\
}\
\
void bar_progress_step(float step_progress)\
{\
	if (initialized == 0) {\
		fprintf(stderr, "error: bar_progress_step() called before bar_progress_start().\n");\
		exit(1);\
	}\
	char *bar = malloc(w.ws_col);\
	char *dot = malloc(w.ws_col);\
\
	if (step_progress < 0) {\
		step_progress = 0;\
	} else if (step_progress > 100) {\
		step_progress = 100;\
	}\
	int width = (w.ws_col - 20);\
  int j;\
  /*\
  for(int j=0; j< width ; ++j)\
    if (j<(int)(width * (step_progress / 100))) bar[j]='=';\
    else bar[j]='.';\
	bar[width] = 0;\
  */\
  int status = (int)(width * (step_progress / 100));\
  for(j=0; j< status ; ++j)\
    bar[j]='=';\
    \
  bar[j]='\0';\
  for(j=0;j<width-status; ++j)\
     dot[j]='.';\
  dot[j]='\0'; \
   \
\
	fprintf(stdout, "\e[s\e[%d;0H\e[42;30mProgress: [%3d%%]\e[0m [%s%s%s%s\033[0m]\e[u", w.ws_row + 1, (int) step_progress,BG_GREEN, bar, BG_RED,dot);\
	/*fprintf(stdout, "\e[s\e[%d;0H\e[42;30mProgress: [%3d%%]\e[0m [\033[42;30m%s\033[41m%s\033[0m]\e[u", w.ws_row + 1, (int) step_progress, bar,dot);*/\
	/*fprintf(stdout, "\e[s\e[%d;0H\e[42;30mProgress: [%3d%%]\e[0m [%s]\e[u", w.ws_row + 1, (int) step_progress, bar);*/\
	/*fprintf(stdout, "\e[s\e[%d;0H\e[42;30mProgress: [%3d%%]\e[0m [%s%s]\e[u", w.ws_row + 1, (int) step_progress, bar,dot);*/\
	\
  fflush(stdout);\
\
	free(bar);\
	free(dot);\
}\
\
\
void bar_progress_stop()\
{\
	set_window_height_for_bar_progress(w.ws_row);\
}\

;