| c1100b9b |
#include <unistd.h>
#include "bam_tview.h"
#define UNDERLINE_FLAG 10
typedef struct HtmlTview {
tview_t view;
int row_count;
tixel_t** screen;
FILE* out;
int attributes;/* color... */
} html_tview_t;
#define FROM_TV(ptr) ((html_tview_t*)ptr)
static void html_destroy(tview_t* base)
{
int i;
html_tview_t* tv=(html_tview_t*)base;
if(tv->screen!=NULL)
{
for(i=0;i< tv->row_count;++i) free(tv->screen[i]);
free(tv->screen);
}
base_tv_destroy(base);
free(tv);
}
/*
void (*my_mvprintw)(struct AbstractTview* ,int,int,const char*,...);
void (*my_)(struct AbstractTview*,int,int,int);
void (*my_attron)(struct AbstractTview*,int);
void (*my_attroff)(struct AbstractTview*,int);
void (*my_clear)(struct AbstractTview*);
int (*my_colorpair)(struct AbstractTview*,int);
*/
static void html_mvprintw(struct AbstractTview* tv,int y ,int x,const char* fmt,...)
{
int i,nchars=0;
unsigned int size=tv->mcol+2;
char* str=malloc(size);
if(str==0) exit(EXIT_FAILURE);
va_list argptr;
va_start(argptr, fmt);
nchars=vsnprintf(str,size, fmt, argptr);
va_end(argptr);
for(i=0;i< nchars;++i)
{
tv->my_mvaddch(tv,y,x+i,str[i]);
}
free(str);
}
static void html_mvaddch(struct AbstractTview* tv,int y,int x,int ch)
{
tixel_t* row=NULL;
html_tview_t* ptr=FROM_TV(tv);
if( x >= tv->mcol ) return; //out of screen
while(ptr->row_count<=y)
{
int x;
row=(tixel_t*)calloc(tv->mcol,sizeof(tixel_t));
if(row==0) exit(EXIT_FAILURE);
for(x=0;x<tv->mcol;++x) {row[x].ch=' ';row[x].attributes=0;}
ptr->screen=(tixel_t**)realloc(ptr->screen,sizeof(tixel_t*)*(ptr->row_count+1));
ptr->screen[ptr->row_count++]=row;
}
row=ptr->screen[y];
row[x].ch=ch;
row[x].attributes=ptr->attributes;
}
static void html_attron(struct AbstractTview* tv,int flag)
{
html_tview_t* ptr=FROM_TV(tv);
ptr->attributes |= flag;
}
static void html_attroff(struct AbstractTview* tv,int flag)
{
html_tview_t* ptr=FROM_TV(tv);
ptr->attributes &= ~(flag);
}
static void html_clear(struct AbstractTview* tv)
{
html_tview_t* ptr=FROM_TV(tv);
if(ptr->screen!=NULL)
{
int i;
for(i=0;i< ptr->row_count;++i) free(ptr->screen[i]);
free(ptr->screen);
ptr->screen=NULL;
}
ptr->row_count=0;
ptr->attributes=0;
}
static int html_colorpair(struct AbstractTview* tv,int flag)
{
return (1 << (flag));
}
static int html_drawaln(struct AbstractTview* tv, int tid, int pos)
{
int y,x;
html_tview_t* ptr=FROM_TV(tv);
html_clear(tv);
base_draw_aln(tv, tid, pos);
fputs("<html><head>",ptr->out);
fprintf(ptr->out,"<title>%s:%d</title>",
tv->header->target_name[tid],
pos+1
);
//style
fputs("<style type='text/css'>\n",ptr->out);
fputs(".tviewbody { margin:5px; background-color:white;text-align:center;}\n",ptr->out);
fputs(".tviewtitle {text-align:center;}\n",ptr->out);
fputs(".tviewpre { margin:5px; background-color:white;}\n",ptr->out);
#define CSS(id,col) fprintf(ptr->out,".tviewc%d {color:%s;}\n.tviewcu%d {color:%s;text-decoration:underline;}\n",id,col,id,col);
CSS(0, "black");
CSS(1, "blue");
CSS(2, "green");
CSS(3, "yellow");
CSS(4, "black");
CSS(5, "green");
CSS(6, "cyan");
CSS(7, "yellow");
CSS(8, "red");
CSS(9, "blue");
#undef CSS
fputs("</style>",ptr->out);
fputs("</head><body>",ptr->out);
fprintf(ptr->out,"<div class='tviewbody'><div class='tviewtitle'>%s:%d</div>",
tv->header->target_name[tid],
pos+1
);
fputs("<pre class='tviewpre'>",ptr->out);
for(y=0;y< ptr->row_count;++y)
{
for(x=0;x< tv->mcol;++x)
{
if(x== 0 || ptr->screen[y][x].attributes != ptr->screen[y][x-1].attributes)
{
int css=0;
fprintf(ptr->out,"<span");
while(css<32)
{
//if(y>1) fprintf(stderr,"css=%d pow2=%d vs %d\n",css,(1 << (css)),ptr->screen[y][x].attributes);
if(( (ptr->screen[y][x].attributes) & (1 << (css)))!=0)
{
fprintf(ptr->out," class='tviewc%s%d'",
(( (ptr->screen[y][x].attributes) & (1 << (UNDERLINE_FLAG)) )!=0?"u":""),
css);
break;
}
++css;
}
fputs(">",ptr->out);
}
int ch=ptr->screen[y][x].ch;
switch(ch)
{
case '<': fputs("<",ptr->out);break;
case '>': fputs(">",ptr->out);break;
case '&': fputs("&",ptr->out);break;
default: fputc(ch,ptr->out); break;
}
if(x+1 == tv->mcol || ptr->screen[y][x].attributes!=ptr->screen[y][x+1].attributes)
{
fputs("</span>",ptr->out);
}
}
if(y+1 < ptr->row_count) fputs("<br/>",ptr->out);
}
fputs("</pre></div></body></html>",ptr->out);
return 0;
}
#define ANSI_COLOR_RED "\x1b[31m"
#define ANSI_COLOR_GREEN "\x1b[32m"
#define ANSI_COLOR_YELLOW "\x1b[33m"
#define ANSI_COLOR_BLUE "\x1b[34m"
#define ANSI_COLOR_MAGENTA "\x1b[35m"
#define ANSI_COLOR_CYAN "\x1b[36m"
#define ANSI_COLOR_BLACK "\x1b[0m"
#define ANSI_COLOR_RESET ANSI_COLOR_BLACK
#define ANSI_UNDERLINE_SET "\033[4m"
#define ANSI_UNDERLINE_UNSET "\033[0m"
static int text_drawaln(struct AbstractTview* tv, int tid, int pos)
{
int y,x;
html_tview_t* ptr=FROM_TV(tv);
html_clear(tv);
base_draw_aln(tv, tid, pos);
int is_term= isatty(fileno(ptr->out));
for(y=0;y< ptr->row_count;++y)
{
for(x=0;x< tv->mcol;++x)
{
if(is_term)
{
int css=0;
while(css<32)
{
if(( (ptr->screen[y][x].attributes) & (1 << (css)))!=0)
{
break;
}
++css;
}
switch(css)
{
//CSS(0, "black");
case 1: fputs(ANSI_COLOR_BLUE,ptr->out); break;
case 2: fputs(ANSI_COLOR_GREEN,ptr->out); break;
case 3: fputs(ANSI_COLOR_YELLOW,ptr->out); break;
//CSS(4, "black");
case 5: fputs(ANSI_COLOR_GREEN,ptr->out); break;
case 6: fputs(ANSI_COLOR_CYAN,ptr->out); break;
case 7: fputs(ANSI_COLOR_YELLOW,ptr->out); break;
case 8: fputs(ANSI_COLOR_RED,ptr->out); break;
case 9: fputs(ANSI_COLOR_BLUE,ptr->out); break;
default:break;
}
if(( (ptr->screen[y][x].attributes) & (1 << (UNDERLINE_FLAG)))!=0)
{
fputs(ANSI_UNDERLINE_SET,ptr->out);
}
}
int ch=ptr->screen[y][x].ch;
fputc(ch,ptr->out);
if(is_term)
{
fputs(ANSI_COLOR_RESET,ptr->out);
if(( (ptr->screen[y][x].attributes) & (1 << (UNDERLINE_FLAG)))!=0)
{
fputs(ANSI_UNDERLINE_UNSET,ptr->out);
}
}
}
fputc('\n',ptr->out);
}
return 0;
}
static int html_loop(tview_t* tv)
{
//tv->my_drawaln(tv, tv->curr_tid, tv->left_pos);
return 0;
}
static int html_underline(tview_t* tv)
{
return (1 << UNDERLINE_FLAG);
}
/*
static void init_pair(html_tview_t *tv,int id_ge_1, const char* pen, const char* paper)
{
}
*/
tview_t* html_tv_init(const char *fn, const char *fn_fa, const char *samples)
{
char* colstr=getenv("COLUMNS");
html_tview_t *tv = (html_tview_t*)calloc(1, sizeof(html_tview_t));
tview_t* base=(tview_t*)tv;
if(tv==0)
{
fprintf(stderr,"Calloc failed\n");
return 0;
}
tv->row_count=0;
tv->screen=NULL;
tv->out=stdout;
tv->attributes=0;
base_tv_init(base,fn,fn_fa,samples);
/* initialize callbacks */
#define SET_CALLBACK(fun) base->my_##fun=html_##fun;
SET_CALLBACK(destroy);
SET_CALLBACK(mvprintw);
SET_CALLBACK(mvaddch);
SET_CALLBACK(attron);
SET_CALLBACK(attroff);
SET_CALLBACK(clear);
SET_CALLBACK(colorpair);
SET_CALLBACK(drawaln);
SET_CALLBACK(loop);
SET_CALLBACK(underline);
#undef SET_CALLBACK
if(colstr!=0)
{
base->mcol=atoi(colstr);
if(base->mcol<10) base->mcol=80;
}
base->mrow=99999;
/*
init_pair(tv,1, "blue", "white");
init_pair(tv,2, "green", "white");
init_pair(tv,3, "yellow", "white");
init_pair(tv,4, "white", "white");
init_pair(tv,5, "green", "white");
init_pair(tv,6, "cyan", "white");
init_pair(tv,7, "yellow", "white");
init_pair(tv,8, "red", "white");
init_pair(tv,9, "blue", "white");
*/
return base;
}
tview_t* text_tv_init(const char *fn, const char *fn_fa, const char *samples)
{
tview_t* tv=html_tv_init(fn,fn_fa,samples);
tv->my_drawaln=text_drawaln;
return tv;
}
|
