truetype lib: brunch from GerdtR

git-svn-id: svn://kolibrios.org@3893 a494cfbc-eb01-0410-851d-a64ba20cac60

programs/develop/libraries/truetype/brunch/TRUETYPE.TXT

@@ -0,0 +1,8 @@
+à¨áã¥â ž­¨ª®¤-áâப¨ ­  § ¤ ­­®¬ ä®­¥.
+
+int  text_out(short *string, char *buffer, int height, int color,int back_color, int x, int y)
+int __stdcall get_length(short *text, char *buffer, int height, int max_len)
+float __stdcall get_width(short *text, stbtt_fontinfo *buffer, int height)
+int __stdcall init_font(stbtt_fontinfo *font,unsigned char *FontData)
+unsigned char*  __stdcall text_out_mem(short *string, char *buffer, int height, int color,int back_color) 
+

programs/develop/libraries/truetype/brunch/lib.c

@@ -0,0 +1,365 @@
+#define STB_TRUETYPE_IMPLEMENTATION  // force following include to generate implementation
+#include "stb.h"
+//#include "font_droid.h"
+
+#define __stdcall __attribute__((stdcall))
+
+//inline void getzone(unsigned int x, unsigned int y, unsigned int w, unsigned int h, char * image){
+//unsigned size, psize;
+//
+//size=x*65536+y;
+//psize=w*65536+h;
+//__asm__ __volatile__("int $0x40"::"a"(36),"b"(image),"c"(psize),"d"(size));
+//}
+//
+
+
+
+// inline void f65(unsigned x, unsigned y, unsigned w, unsigned h, char *d)
+//{
+//asm("pusha");
+//asm ("nop"::"D"(0), "c"(w*65536+h), "d"(x*65536+y), "b"(d));
+//asm ("xor %eax, %eax");
+//asm ("movl %eax, %ebp");
+//asm ("pushl $24");
+//asm ("popl %esi");
+//asm ("int $0x40"::"a"(65));
+//asm("popa");
+//}
+
+inline void PutImage(unsigned x, unsigned y, unsigned w, unsigned h, char * image){
+unsigned size, psize;
+size=x*65536+y;
+psize=w*65536+h;
+__asm__ __volatile__("int $0x40"::"a"(7),"b"(image),"c"(psize),"d"(size));
+}
+
+//void kputc(char *c){
+//	asm ("int $0x40"::"a"(63), "b"(1), "c"(c));
+//}
+//
+//void kol_board_puti(int n){
+//	char c;
+//	int i = 0;
+//	do {
+//		if (n<0) {
+//			n=-n;
+//			kputc("-");
+//		}
+//		c = n % 10 + '0';
+//		asm ("int $0x40"::"a"(63), "b"(1), "c"(c));
+//		i++;
+//	}
+//	while ((n /= 10) > 0);
+//}
+
+void font_blit(unsigned char *dst,unsigned char *src, int x, int size) {
+	int lp;
+	float mixed, tp;
+	unsigned char color1;
+	int color2, color3, color4;
+	color2=((x)&0x000000FF);
+	color3=((((x)&0x00FF00)>>8)&0xFF);
+	color4=((((x)&0xFF0000)>>16)&0xFF);
+//kol_board_puti(size);
+	for (lp=0;lp <= size;lp++) {
+		//kol_board_puti(lp);
+		//kputc("\n");
+		if (src[lp]>0) {
+			tp=((float)src[lp])/255;
+
+			color1=dst[lp*3];
+			mixed=(color1 * (1-tp)+color2 * tp);
+			dst[lp*3]=(unsigned char) mixed;
+
+			color1=dst[lp*3+1];
+			mixed=(color1 * (1-tp)+color3 * tp);
+			dst[lp*3+1]=(unsigned char) mixed;
+
+			color1=dst[lp*3+2];
+			mixed=(color1 * (1-tp)+color4 * tp);
+			dst[lp*3+2]=(unsigned char) mixed;
+
+		}
+	}
+
+}
+
+
+inline unsigned kol_process_info(unsigned slot, char buf1k[]){
+	asm ("int $0x40"::"a"(9), "b"(buf1k), "c"(slot));
+}
+
+//void kol_board_puts(char *s){
+//	unsigned i;
+//	i = 0;
+//	while (*(s+i))
+//	{
+//		asm ("int $0x40"::"a"(63),"b"(1),"c"(*(s+i)));
+//		i++;
+//	}
+//}
+
+//unsigned char screen[40*160];
+
+int __stdcall init_font(stbtt_fontinfo *font,unsigned char *FontData)
+{
+	//stbtt_InitFont(font, pdf_font_DroidSans,stbtt_GetFontOffsetForIndex(pdf_font_DroidSans,0) );
+	stbtt_InitFont(font, FontData,stbtt_GetFontOffsetForIndex(FontData,0) );
+//	char *yay;
+//	yay=font;
+//	int i;
+//	for (i=0;i<28;i++)
+//		kputc(*(yay+i));
+//	kol_board_puts("init_font\n");
+}
+
+float __stdcall get_width(short *text, stbtt_fontinfo *buffer, int height)
+{
+	stbtt_fontinfo *font;
+	font=buffer;
+	int ch=0;	//baseline,i,j,ascent,  
+	float scale,xpos=0;
+
+	//baseline=10;
+
+ // if (buffer==-1) {stbtt_InitFont(&font, pdf_font_DroidSans,stbtt_GetFontOffsetForIndex(pdf_font_DroidSans,0) );} else {stbtt_InitFont(&font, buffer,stbtt_GetFontOffsetForIndex(buffer,0) );kol_board_puts("Font loaded..\n");}
+//	kol_board_puts("Engine init..\n");
+//kol_board_puti(&screen);
+	scale = stbtt_ScaleForPixelHeight(font, height*3/4);
+	int advance,lsb;
+
+	while (text[ch]) {
+//	   kol_board_puts("new symbol...\n");
+
+		stbtt_GetCodepointHMetrics(font, text[ch], &advance, &lsb);
+		xpos += (advance * scale);
+		//if (text[ch+1])
+		//	xpos += scale*stbtt_GetCodepointKernAdvance(font, text[ch],text[ch+1]);
+		++ch;
+	}
+	//stbtt_GetCodepointHMetrics(font, text[ch], &advance, &lsb);
+	//xpos += (advance * scale);
+	return xpos;
+}
+
+int __stdcall get_length(short *text, char *buffer, int height, int max_len){
+	stbtt_fontinfo font;
+	int i,j,ascent,baseline,ch,xpos=0;
+	float scale=0;
+
+	baseline=10;
+
+//	if (buffer==-1) {
+//		stbtt_InitFont(&font, pdf_font_DroidSans,stbtt_GetFontOffsetForIndex(pdf_font_DroidSans,0) );
+//	} 
+//	else {
+//		stbtt_InitFont(&font, buffer,stbtt_GetFontOffsetForIndex(buffer,0) );
+//		kol_board_puts("Font loaded..\n");
+//	}
+//kol_board_puts("Engine init..\n");
+//kol_board_puti(&screen);
+	scale = stbtt_ScaleForPixelHeight(&font, height*3/4);
+
+	while (text[ch]) {
+	  // kol_board_puts("new symbol...\n");
+		int advance,lsb;
+		stbtt_GetCodepointHMetrics(&font, text[ch], &advance, &lsb);
+		xpos += (advance * scale);
+		if ((int)xpos>max_len) return ch;
+		//if (text[ch+1])
+		//	xpos += scale*stbtt_GetCodepointKernAdvance(&font, text[ch],text[ch+1]);
+		++ch;
+	}
+	return ch;
+
+}
+
+
+int __stdcall picture(short *text, stbtt_fontinfo *buffer, char *screen1, int width, int height){
+
+ //unsigned char *screen;
+ //screen=zmalloc(20*78);
+	//kol_board_puts(screen);
+	//kol_board_puts("It was text\n");
+
+	stbtt_fontinfo *font;
+	font=buffer;
+	int i,j,ascent,baseline,descent,ch=0;
+	float scale, xpos=0;
+
+   //baseline=10;
+	//kol_board_puts("Font address:\n");
+   //kol_board_puti(buffer);
+// if (buffer==-1) {stbtt_InitFont(&font, pdf_font_DroidSans,stbtt_GetFontOffsetForIndex(pdf_font_DroidSans,0) );kol_board_puts("default font\n");} else {stbtt_InitFont(&font, buffer,stbtt_GetFontOffsetForIndex(buffer,0) );kol_board_puts("Font loaded..\n");}
+
+//kol_board_puti(&screen);
+	scale = stbtt_ScaleForPixelHeight(font, height*3/4);
+   //stbtt_GetFontVMetrics(&font, &ascent,0,0);
+	stbtt_GetFontVMetrics(font, &ascent,&descent,0); //lev
+   //baseline = (int) (ascent*scale);
+	baseline = (int) ((ascent-descent)*scale); //lev
+
+
+//kol_board_puts("Text render:\n");
+
+	while (text[ch]) {
+	   //kol_board_puts("new symbol...\n");
+		int advance,lsb,x0,y0,x1,y1;
+      //float x_shift = xpos - (float) i_floor(xpos);
+
+     // kol_board_puts("floor called!\n");
+		stbtt_GetCodepointHMetrics(font, text[ch], &advance, &lsb);
+		stbtt_GetCodepointBitmapBoxSubpixel(font, text[ch], scale,scale,0,0, &x0,&y0,&x1,&y1);
+
+
+     //10= y0, 20=y1-y0 or so
+		stbtt_MakeCodepointBitmapSubpixel(font, &screen1[(baseline + y0)*width+ (int)xpos + x0], x1-x0,y1-y0, width, scale,scale,0,0, text[ch]);
+
+      // note that this stomps the old data, so where character boxes overlap (e.g. 'lj') it's wrong
+      // because this API is really for baking character bitmaps into textures. if you want to do this,
+      // you need to render the bitmap to a temp buffer, then\n\t"alpha blend" that into the working buffer
+		xpos += (advance * scale);
+		//if (text[ch+1])
+			//xpos += scale*stbtt_GetCodepointKernAdvance(font, text[ch],text[ch+1]);
+		++ch;
+	}
+
+  //zmemcpy(screen1,bitmap,20*20);
+
+//kol_board_puts("finished...\n");
+	return 0;
+}
+
+void __stdcall SetBackColor(int back_color, int width, int height, char *from_zone)
+{
+	int i,j;
+	unsigned char bcr,bcg,bcb;
+	
+	bcr=back_color<<16;
+	bcg=back_color<<8;
+	bcb=back_color;
+		
+	for (j=0;j<height ;j++)
+	{
+		for (i=0;i<width ;i++)
+		{
+			from_zone[(j*width+i)*3]=back_color;
+			from_zone[(j*width+i)*3+1]=back_color>>8;
+			from_zone[(j*width+i)*3+2]=back_color>>16;
+		}
+	}
+}
+
+int __stdcall text_out(short *string, char *buffer, int height, int color,int back_color, int x, int y) {
+	unsigned char *from_zone;
+	unsigned char *to_zone;
+	int px, py;
+	unsigned char app_data[1024];
+
+	int width;
+//kol_board_puts("width...\n");
+//kol_board_puts("\n and now height is ...");
+//kol_board_puti(height);
+
+	//width=600; 
+	width = get_width(string,buffer,height);
+	
+//kol_board_puts("\n Width is ...");
+//kol_board_puti(width);
+//kol_board_puts(" and height is ...");
+//kol_board_puti(height);
+
+//kol_board_puts("\n malloc...\n");
+	from_zone=(char*)zmalloc(3*height*width);
+	to_zone=(char*)zmalloc(height*width);
+//kol_board_puts("malloc done...\n");
+
+	kol_process_info(-1, app_data);
+	//px=app_data[35]*256+app_data[34];
+	px=app_data[35]*256+app_data[34]+app_data[55]*256+app_data[54];//lev
+	//py=app_data[39]*256+app_data[38];
+	py=app_data[39]*256+app_data[38]+app_data[59]*256+app_data[58];//lev
+
+//kol_board_puts("\nzone...\n");
+	//getzone(px+x, py+y, width, height, from_zone);
+	SetBackColor(back_color, width, height,from_zone);
+//kol_board_puts("render...\n");
+	picture(string, buffer, to_zone, width, height);
+//kol_board_puts("blit...\n");
+	font_blit(from_zone,to_zone, color, width*height);
+//kol_board_puts("out...\n");
+ //f65(x,y,width,height,from_zone);
+	PutImage(x,y,width,height,from_zone);//lev
+	zfree(from_zone);
+	zfree(to_zone);
+	return 0;
+}
+
+unsigned char*  __stdcall text_out_mem(short *string, char *buffer, int height, int color,int back_color) {
+	unsigned char *from_zone;
+	unsigned char *to_zone;
+	int px, py;
+	unsigned char app_data[1024];
+	int width;
+
+	width = get_width(string,buffer,height);
+	from_zone=(char*)zmalloc(3*height*width+4);
+	to_zone=(char*)zmalloc(height*width);
+	*(int*)from_zone = width;
+	//kol_process_info(-1, app_data);
+	//px=app_data[35]*256+app_data[34]+app_data[55]*256+app_data[54];//lev
+	//py=app_data[39]*256+app_data[38]+app_data[59]*256+app_data[58];//lev
+	SetBackColor(back_color, width, height,from_zone+4);
+	picture(string, buffer, to_zone, width, height);
+	font_blit(from_zone+4,to_zone, color, width*height);
+	//PutImage(x,y,width,height,from_zone);//lev
+	
+	//zfree(from_zone);
+	zfree(to_zone);
+	return from_zone;
+}
+
+
+int __stdcall start(){
+
+      return 1;
+}
+
+int __stdcall version_major(){
+      return 1;
+}
+
+int __stdcall version_minor(){
+     return 0;
+}
+
+typedef struct{
+  char *name;
+  void *f;
+}export_t;
+
+char szStart[]		="START";
+char szVersion[]	="version";
+char szVersionM[]	="version_min";
+char szTrueType[]	="truetype";
+char szGetLength[]	="get_length";
+char szGetWidth[]	="get_width";
+char szTextOut[]	="text_out";
+char szTextOutMem[] ="text_out_mem";
+char szInitFont[]	="init_font";
+
+
+export_t EXPORTS[] __asm__("EXPORTS") =
+	{
+		{ szStart,		start },
+		{ szVersion,	version_major },
+		{ szVersionM,	version_minor },
+		{ szTrueType,	picture },
+		{ szGetLength,	get_length},
+		{ szGetWidth,	get_width},
+		{ szTextOut,	text_out },
+		{ szTextOutMem, text_out_mem},
+		{ szInitFont,	init_font},
+		{ NULL, NULL },
+	};