truetype library 11.10.12 (by SoUrcerer and Lev)

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

programs/develop/libraries/truetype/trunk/history.txt

@@ -0,0 +1,27 @@
+SoUrcerer
+11.4.12
+пусть сам автор напишет...
+----------
+SoUrcerer
+20.6.12
+...
+----------
+SoUrcerer
+24.8.12 
+Исправил определение длины выводимой строки в пикселах. Теперь text_out работает корректно на длинных строках. 
+Исправил вывод русских букв.
+
+Вопрос с блиттером остается открытым. Нужен блиттер с поддержкой прозрачности, учитывающий флаг "рисовать относительно клиентской области окна". В том числе он нужен для букв с умляутами, типа ё и й. А так же составных символов. Иначе глиф-черточка или глиф-точечки "зарисует" остаток буквы в некоторых шрифтах. И вообще, так явно будет быстрее, чем грабить экран, смешивать и выводить на экран, вызывая 2 системных функции и гоняя цикл в пользовательском режиме
+---------
+11.10.12
+Lev
+stb.h
+синхронизировал stb.h с stb_truetype0.6c.h
+
+в строке if (num_vertices > 0) STBTT_memcpy(tmp, vertices, num_vertices*sizeof(stbtt_vertex));
+вставил STBTT_memcpy вместо STBTT_memset по аналогии с исходным stb_truetype0.6c.h (если это было неправильно - верните назад)
+
+lib.c
+заменил 65-ю функцию на 7-ю, по коду чуть проще и вылетало у меня постоянно с 65-й
+внёс поправки для правильной работы с окнами отсчитывающими координаты от клиентского окна
+Добавил учёт descent, чтобы не вылетало на диакритике типа "Й", dos2utf править не стал - вместо Ё и т.п. показываются символы расширенной латиницы

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

@@ -0,0 +1,320 @@
+#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++;
+	}
+}
+ 
+int dos2utf (unsigned char some){
+	
+	 int same;
+	
+	   if (some>=0x80 && some <=0xAF) {same=(4<<8)+some-0x70;} 
+	   else if (some>=0xE0 && some <=0xEF) {same=(4<<8)+some-0xA0;} 
+	   else {same=some;} 
+	   	   return same;
+	      
+	
+}
+
+//unsigned char screen[40*160];
+ 
+int __stdcall get_width(char *text, char *buffer, int height)
+{
+
+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);
+   int advance,lsb;
+   
+ while (dos2utf(text[ch])) {
+//	   kol_board_puts("new symbol...\n");
+    
+       stbtt_GetCodepointHMetrics(&font, dos2utf(text[ch]), &advance, &lsb);
+  xpos += (advance * scale);
+      if (text[ch+1])
+         xpos += scale*stbtt_GetCodepointKernAdvance(&font, dos2utf(text[ch]),dos2utf(text[ch+1]));
+      ++ch;
+   }
+   stbtt_GetCodepointHMetrics(&font, dos2utf(text[ch]), &advance, &lsb);
+     xpos += (advance * scale);
+   return xpos;
+
+}
+
+ 
+ 
+int __stdcall get_length(char *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 (dos2utf(text[ch])) {
+	  // kol_board_puts("new symbol...\n");
+      int advance,lsb;
+       stbtt_GetCodepointHMetrics(&font, dos2utf(text[ch]), &advance, &lsb);
+  xpos += (advance * scale);
+  if ((int)xpos>max_len) return ch;
+      if (text[ch+1])
+         xpos += scale*stbtt_GetCodepointKernAdvance(&font, dos2utf(text[ch]),dos2utf(text[ch+1]));
+      ++ch;
+      }
+   return ch;
+
+}
+ 
+ 
+int __stdcall picture(char *text, char *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;
+   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 (dos2utf(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, dos2utf(text[ch]), &advance, &lsb);
+      stbtt_GetCodepointBitmapBoxSubpixel(&font, dos2utf(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, dos2utf(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, dos2utf(text[ch]),dos2utf(text[ch+1]));
+      ++ch;
+   }
+   
+  //zmemcpy(screen1,bitmap,20*20);
+
+//kol_board_puts("finished...\n");
+return 0;
+}
+
+int __stdcall text_out(char *string, char *buffer, int height, int color, int x, int y) {
+	unsigned char *from_zone;
+	unsigned char *to_zone;
+	int px, py;
+	unsigned char app_data[1024];
+	
+	int width=0;
+	//kol_board_puts("width...\n");
+	//kol_board_puts("\n and now height is ...");
+	//kol_board_puti(height);
+	
+	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);
+//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;
+}
+
+
+
+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";
+
+
+
+export_t EXPORTS[] __asm__("EXPORTS") =
+         {
+           { szStart,           start },
+           { szVersion,          version_major },
+           { szVersionM,         version_minor },
+           { szTrueType,              picture },
+           { szGetLength,	get_length},
+           { szGetWidth, get_width}, 
+           { szTextOut, text_out },
+           { NULL, NULL },
+         };