forked from KolibriOS/kolibrios
321 lines
8.4 KiB
C
321 lines
8.4 KiB
C
#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 },
|
|
};
|