-/* swftext.c\r
-\r
- Text and font routines\r
- \r
- Extension module for the rfxswf library.\r
- Part of the swftools package.\r
-\r
- Copyright (c) 2001 Rainer Böhme <rfxswf@reflex-studio.de>\r
- \r
- This file is distributed under the GPL, see file COPYING for details \r
-\r
-*/\r
-\r
-#define TF_TEXTCONTROL 0x80\r
-#define TF_HASFONT 0x08\r
-#define TF_HASCOLOR 0x04\r
-#define TF_HASYOFFSET 0x02\r
-#define TF_HASXOFFSET 0x01\r
-\r
-#define FF_WIDECODES 0x01\r
-#define FF_BOLD 0x02\r
-#define FF_ITALIC 0x04\r
-#define FF_ANSI 0x08\r
-#define FF_SHIFTJIS 0x10\r
-#define FF_UNICODE 0x20\r
-\r
-int FontEnumerate(LPSWF swf,void (*FontCallback) (U16,U8*))\r
-{ int n;\r
- LPTAG t;\r
- if (!swf) return -1;\r
- t = swf->FirstTag;\r
- n = 0;\r
-\r
- while (t)\r
- { if (GetTagID(t)==ST_DEFINEFONTINFO)\r
- { n++;\r
- if (FontCallback)\r
- { U16 id;\r
- int l;\r
- U8 s[257];\r
- SaveTagPos(t);\r
- SetTagPos(t,0);\r
-\r
- id = GetU16(t);\r
- l = GetU8(t);\r
- GetBlock(t,s,l);\r
- s[l] = 0;\r
-\r
- (FontCallback)(id,s); \r
- \r
- RestoreTagPos(t);\r
- }\r
- }\r
- t = NextTag(t);\r
- }\r
- return n;\r
-}\r
-\r
-int FontExtract_DefineFont(int id,LPSWFFONT f,LPTAG t,LPSHAPE * shapes)\r
-{ U16 fid;\r
- SaveTagPos(t);\r
- SetTagPos(t,0);\r
-\r
- fid = GetU16(t);\r
- if ((!id)||(id==fid))\r
- { U16 ofs[MAX_CHAR_PER_FONT];\r
- int n,i;\r
- \r
- id = fid;\r
- f->id = fid;\r
-\r
- ofs[0] = GetU16(t);\r
- n = ofs[0]/2;\r
-\r
- for (i=1;i<n;i++) if (i<MAX_CHAR_PER_FONT) ofs[i] = GetU16(t); else GetU16(t);\r
- for (i=0;i<n;i++) if (i<MAX_CHAR_PER_FONT) GetSimpleShape(t,&shapes[i]);\r
- \r
- }\r
-\r
- RestoreTagPos(t);\r
- return id;\r
-}\r
-\r
-int FontExtract_DefineFontInfo(int id,LPSWFFONT f,LPTAG t,LPSHAPE * shapes)\r
-{ U16 fid;\r
- SaveTagPos(t);\r
- SetTagPos(t,0);\r
-\r
- fid = GetU16(t);\r
- if (fid==id)\r
- { U8 l = GetU8(t);\r
- int i;\r
- \r
- if (l)\r
- { if (f->name) free(f->name);\r
- f->name = (U8*)malloc(l+1);\r
- if (f->name)\r
- { GetBlock(t,f->name,l);\r
- f->name[l] = 0;\r
- }\r
- else\r
- { RestoreTagPos(t);\r
- return -1;\r
- }\r
- }\r
- f->flags = GetU8(t);\r
-\r
- i = 0;\r
- while (shapes[i])\r
- { U16 code = ((f->flags&FF_WIDECODES)?GetU16(t):GetU8(t))%MAX_CHAR_PER_FONT;\r
- \r
- f->glyph[code].shape = shapes[i];\r
- f->glyph[code].gid = i;\r
- if (i<MAX_CHAR_PER_FONT) f->codes[i] = code;\r
-\r
- i++;\r
- }\r
- }\r
-\r
- RestoreTagPos(t);\r
- return id;\r
-}\r
-\r
-#define FEDTJ_PRINT 0x01\r
-#define FEDTJ_MODIFY 0x02\r
-\r
-int FontExtract_DefineText(int id,LPSWFFONT f,LPTAG t,int jobs)\r
-{ U16 cid;\r
- SRECT r;\r
- MATRIX m;\r
- U8 gbits, abits, flags;\r
- int fid;\r
-\r
- fid = 0;\r
-\r
- SaveTagPos(t);\r
- SetTagPos(t,0);\r
-\r
- cid = GetU16(t);\r
- GetRect(t,&r);\r
- GetMatrix(t,&m);\r
- gbits = GetU8(t);\r
- abits = GetU8(t);\r
-\r
- flags = GetU8(t);\r
- \r
- while(flags)\r
- { if (flags&TF_TEXTCONTROL)\r
- { if (flags&TF_HASFONT) fid = GetU16(t);\r
- if (flags&TF_HASCOLOR)\r
- { GetU8(t); // rgb\r
- GetU8(t);\r
- GetU8(t);\r
- if (GetTagID(t)==ST_DEFINETEXT2) GetU8(t);\r
- }\r
- if (flags&TF_HASXOFFSET) GetS16(t);\r
- if (flags&TF_HASYOFFSET) GetS16(t);\r
- if (flags&TF_HASFONT) GetU16(t);\r
- }\r
- else\r
- { int i;\r
- for (i=0;i<flags;i++)\r
- { int glyph;\r
- int adv;\r
- glyph = GetBits(t,gbits);\r
- adv = GetBits(t,abits);\r
- if (id==fid) // mitlesen ?\r
- { int code = f->codes[glyph];\r
- if (jobs&FEDTJ_PRINT) printf("%c",code);\r
- if (jobs&FEDTJ_MODIFY)\r
- /*if (f->glyph[code].advance)*/ f->glyph[code].advance = adv;\r
- }\r
- }\r
- if ((id==fid)&&(jobs&FEDTJ_PRINT)) printf("\n");\r
- }\r
- flags = GetU8(t);\r
- }\r
- \r
- RestoreTagPos(t);\r
- return id;\r
-} \r
-\r
-int FontExtract(LPSWF swf,int id,LPSWFFONT * font)\r
-{ LPTAG t;\r
- LPSWFFONT f;\r
- LPSHAPE shapes[MAX_CHAR_PER_FONT];\r
- \r
- if ((!swf)||(!font)) return -1;\r
-\r
- f = (LPSWFFONT)malloc(sizeof(SWFFONT)); font[0] = f;\r
- if (!f) return -1;\r
- \r
- memset(shapes,0x00,sizeof(shapes));\r
- memset(f,0x00,sizeof(SWFFONT));\r
-\r
- t = swf->FirstTag;\r
-\r
- while (t)\r
- { int nid = 0;\r
- switch (GetTagID(t))\r
- { case ST_DEFINEFONT:\r
- nid = FontExtract_DefineFont(id,f,t,shapes);\r
- break;\r
- \r
- case ST_DEFINEFONTINFO:\r
- nid = FontExtract_DefineFontInfo(id,f,t,shapes);\r
- break;\r
- \r
- case ST_DEFINETEXT:\r
- case ST_DEFINETEXT2:\r
- nid = FontExtract_DefineText(id,f,t,FEDTJ_MODIFY);\r
- break;\r
- }\r
- if (nid>0) id = nid;\r
- t = NextTag(t);\r
- }\r
- return 0;\r
-}\r
-\r
-int FontIsItalic(LPSWFFONT f) { return f->flags&FF_ITALIC; }\r
-int FontIsBold(LPSWFFONT f) { return f->flags&FF_BOLD; }\r
-\r
-int FontSetID(LPSWFFONT f,U16 id) { if (!f) return -1; f->id = id; return 0; }\r
-\r
-int FontReduce(LPSWFFONT f,LPFONTUSAGE use)\r
-{ int i,j;\r
- if ((!f)||(!use)) return -1;\r
-\r
- memset(&f->codes,0x00,sizeof(f->codes));\r
-\r
- j = 0;\r
- for (i=0;i<MAX_CHAR_PER_FONT;i++)\r
- if (f->glyph[i].shape)\r
- { if (use->code[i])\r
- { f->glyph[i].gid = j;\r
- f->codes[j] = i;\r
- j++;\r
- }\r
- else\r
- { ShapeFree(f->glyph[i].shape);\r
- f->glyph[i].shape = 0;\r
- f->glyph[i].gid = 0;\r
- f->glyph[i].advance = 0;\r
- }\r
- } else f->glyph[i].gid = 0;\r
- \r
- return j;\r
-}\r
-\r
-int FontInitUsage(LPFONTUSAGE use)\r
-{ if (!use) return -1;\r
- memset(&use->code,0x00,sizeof(use->code));\r
- return 0;\r
-}\r
-\r
-int FontUse(LPFONTUSAGE use,U8 * s)\r
-{ if ((!use)||(!s)) return -1;\r
- while (s[0])\r
- { use->code[s[0]] = 1;\r
- s++;\r
- }\r
- return 0; \r
-}\r
-\r
-int FontSetDefine(LPTAG t,LPSWFFONT f)\r
-{ U16 ofs[MAX_CHAR_PER_FONT];\r
- int p,i,j;\r
- \r
- if ((!t)||(!f)) return -1;\r
- ResetBitcount(t);\r
- SetU16(t,f->id);\r
-\r
- p = 0; j = 0;\r
- for (i=0;i<MAX_CHAR_PER_FONT;i++)\r
- if (f->glyph[i].shape)\r
- { ofs[j++] = p;\r
- p+=SetSimpleShape(NULL,f->glyph[i].shape);\r
- }\r
-\r
- for (i=0;i<j;i++) SetU16(t,ofs[i]+j*2);\r
- \r
- for (i=0;i<MAX_CHAR_PER_FONT;i++)\r
- if (f->glyph[i].shape)\r
- SetSimpleShape(t,f->glyph[i].shape);\r
- \r
- ResetBitcount(t);\r
- return 0;\r
-}\r
-\r
-int FontSetInfo(LPTAG t,LPSWFFONT f)\r
-{ int l,i;\r
- if ((!t)||(!f)) return -1;\r
- ResetBitcount(t);\r
- SetU16(t,f->id);\r
- l = strlen(f->name); if (l>255) l = 255;\r
- SetU8(t,l);\r
- SetBlock(t,f->name,l);\r
- SetU8(t,f->flags&0xfe); // no Wide-Codes\r
-\r
- for (i=0;i<MAX_CHAR_PER_FONT;i++)\r
- if (f->glyph[i].shape)\r
- SetU8(t,i);\r
- \r
- return 0;\r
-}\r
-\r
-int FontExport(int handle,LPSWFFONT f)\r
-{ int l;\r
- int i;\r
- if (!f) return 0;\r
-\r
- l = sizeof(SWFFONT);\r
- if (handle>=0)\r
- if (write(handle,f,sizeof(SWFFONT))!=sizeof(SWFFONT)) return -1;\r
-\r
- if (f->name)\r
- { U16 ln = strlen(f->name);\r
- l+=2+ln;\r
- if (handle>=0)\r
- { if (write(handle,&ln,2)!=2) return -1;\r
- if (write(handle,f->name,ln)!=ln) return -1;\r
- }\r
- }\r
-\r
- if (f->layout)\r
- { l+=sizeof(SWFLAYOUT);\r
- if (handle>=0)\r
- if (write(handle,f->layout,sizeof(SWFLAYOUT))!=sizeof(SWFLAYOUT)) return -1;\r
- if (f->layout->kerning.data)\r
- { l+=f->layout->kerning.count*4;\r
- if (handle>=0)\r
- if (write(handle,f->layout->kerning.data,f->layout->kerning.count*4)!=f->layout->kerning.count*4) return -1;\r
- }\r
- }\r
-\r
- for (i=0;i<MAX_CHAR_PER_FONT;i++)\r
- { if (f->glyph[i].shape)\r
- { int ll = ShapeExport(handle,f->glyph[i].shape);\r
- if (ll<0) return -1;\r
- l+=ll;\r
- } \r
- }\r
-\r
- return l;\r
-}\r
-\r
-int FontImport(int handle,LPSWFFONT * font)\r
-{ LPSWFFONT f;\r
- int layout;\r
- int i = 0;\r
-\r
- if ((!font)||(handle<0)) return -1;\r
-\r
- f = (LPSWFFONT)malloc(sizeof(SWFFONT)); font[0] = f;\r
- if (!f) return -1;\r
-\r
- memset(f,0x00,sizeof(SWFFONT));\r
- \r
- if (read(handle,f,sizeof(SWFFONT))!=sizeof(SWFFONT)) goto fehler;\r
-\r
- layout = (f->layout)?1:0; // avoid illegal free()\r
- f->layout = NULL;\r
-\r
- if (f->name)\r
- { U16 ln;\r
- f->name = NULL;\r
- if (read(handle,&ln,2)!=2) goto fehler;\r
- f->name = (U8*)malloc(ln+1);\r
- if (!f->name) goto fehler;\r
- if (read(handle,f->name,ln)!=ln) goto fehler;\r
- f->name[ln] = 0;\r
- }\r
-\r
- if (f->layout)\r
- { f->layout = (LPSWFLAYOUT)malloc(sizeof(SWFLAYOUT));\r
- if (!f->layout) goto fehler;\r
- if (read(handle,f->layout,sizeof(SWFLAYOUT))!=sizeof(SWFLAYOUT)) goto fehler;\r
- if (f->layout->kerning.data)\r
- { int l = f->layout->kerning.count*4;\r
- f->layout->kerning.data = (U8*)malloc(l);\r
- if (!f->layout->kerning.data) goto fehler;\r
- if (read(handle,f->layout->kerning.data,l)!=l) goto fehler;\r
- }\r
- }\r
-\r
- for (i=0;i<MAX_CHAR_PER_FONT;i++)\r
- { if (f->glyph[i].shape)\r
- { if (ShapeImport(handle,&f->glyph[i].shape)<0) goto fehler;\r
- }\r
- }\r
-\r
- f->id = 0;\r
- \r
- return 0;\r
- \r
-fehler:\r
- if (f) for (;i<MAX_CHAR_PER_FONT;i++) f->glyph[i].shape = NULL;\r
- FontFree(f);\r
- font[0] = NULL;\r
- return -1;\r
-}\r
-\r
-int TextPrintDefineText(LPTAG t,LPSWFFONT f)\r
-{ int id = GetTagID(t);\r
- if ((id==ST_DEFINETEXT)||(id==ST_DEFINETEXT2)) FontExtract_DefineText(f->id,f,t,FEDTJ_PRINT);\r
- else return -1;\r
- return 0;\r
-}\r
-\r
-void LayoutFree(LPSWFLAYOUT l)\r
-{ if (l)\r
- { if (l->kerning.data) free(l->kerning.data);\r
- l->kerning.data = NULL;\r
- }\r
- free(l);\r
-}\r
-\r
-void FontFree(LPSWFFONT f)\r
-{ if (f)\r
- { int i;\r
- \r
- if (f->name) free(f->name);\r
- if (f->layout) LayoutFree(f->layout);\r
-\r
- f->name = NULL;\r
- f->layout = NULL;\r
-\r
- for (i=0;i<MAX_CHAR_PER_FONT;i++)\r
- if (f->glyph[i].shape)\r
- { ShapeFree(f->glyph[i].shape);\r
- f->glyph[i].shape = NULL;\r
- }\r
- }\r
- free(f);\r
-}\r
-\r
-int TextSetInfoRecord(LPTAG t,LPSWFFONT font,U16 size,LPRGBA color,S16 dx,S16 dy)\r
-{ U8 flags;\r
- if (!t) return -1;\r
-\r
- flags = TF_TEXTCONTROL|(font?TF_HASFONT:0)|(color?TF_HASCOLOR:0)|(dx?TF_HASXOFFSET:0)|(dy?TF_HASYOFFSET:0);\r
-\r
- SetU8(t,flags);\r
- if (font) SetU16(t,font->id);\r
- if (color)\r
- { if (GetTagID(t)==ST_DEFINETEXT2) SetRGBA(t,color);\r
- else SetRGB(t,color);\r
- }\r
- if (dx) SetS16(t,dx);\r
- if (dy) SetS16(t,dy);\r
- if (font) SetU16(t,size);\r
- \r
- return 0;\r
-}\r
-\r
-int TextCountBits(LPSWFFONT font,U8 * s,int scale,U8 * gbits,U8 * abits)\r
-{ U16 g,a;\r
- if ((!s)||(!font)||((!gbits)&&(!abits))) return -1;\r
- g = a = 0;\r
-\r
- while(s[0])\r
- { g = CountBits(font->glyph[s[0]].gid,g);\r
- a = CountBits((((U32)font->glyph[s[0]].advance)*scale)/100,a);\r
- s++;\r
- }\r
-\r
- if (gbits) gbits[0] = (U8)g;\r
- if (abits) abits[0] = (U8)a;\r
-\r
- return 0;\r
-}\r
-\r
-int TextSetCharRecord(LPTAG t,LPSWFFONT font,U8 * s,int scale,U8 gbits,U8 abits)\r
-{ int l,i;\r
- \r
- if ((!t)||(!font)||(!s)) return -1;\r
-\r
- l = strlen(s);\r
- if (l>0x7f) l = 0x7f;\r
- SetU8(t,l);\r
-\r
- for (i=0;i<l;i++)\r
- { SetBits(t,font->glyph[s[i]].gid,gbits);\r
- SetBits(t,(((U32)font->glyph[s[i]].advance)*scale)/100,abits);\r
- }\r
-\r
- ResetBitcount(t);\r
- return 0;\r
-}\r
-\r
-U32 TextGetWidth(LPSWFFONT font,U8 * s,int scale)\r
-{ U32 res = 0;\r
-\r
- if (font&&s)\r
- { while (s[0])\r
- { res += font->glyph[s[0]].advance;\r
- s++;\r
- }\r
- if (scale) res = (res*scale)/100;\r
- }\r
- \r
- return res;\r
-}\r
+/* swftext.c
+
+ Text and font routines
+
+ Extension module for the rfxswf library.
+ Part of the swftools package.
+
+ Copyright (c) 2001 Rainer Böhme <rfxswf@reflex-studio.de>
+
+ This file is distributed under the GPL, see file COPYING for details
+
+*/
+
+#define TF_TEXTCONTROL 0x80
+#define TF_HASFONT 0x08
+#define TF_HASCOLOR 0x04
+#define TF_HASYOFFSET 0x02
+#define TF_HASXOFFSET 0x01
+
+#define FF_WIDECODES 0x01
+#define FF_BOLD 0x02
+#define FF_ITALIC 0x04
+#define FF_ANSI 0x08
+#define FF_SHIFTJIS 0x10
+#define FF_UNICODE 0x20
+
+int FontEnumerate(SWF * swf,void (*FontCallback) (U16,U8*))
+{ int n;
+ TAG * t;
+ if (!swf) return -1;
+ t = swf->FirstTag;
+ n = 0;
+
+ while (t)
+ { if (GetTagID(t)==ST_DEFINEFONTINFO)
+ { n++;
+ if (FontCallback)
+ { U16 id;
+ int l;
+ U8 s[257];
+ SaveTagPos(t);
+ SetTagPos(t,0);
+
+ id = GetU16(t);
+ l = GetU8(t);
+ GetBlock(t,s,l);
+ s[l] = 0;
+
+ (FontCallback)(id,s);
+
+ RestoreTagPos(t);
+ }
+ }
+ t = NextTag(t);
+ }
+ return n;
+}
+
+int FontExtract_DefineFont(int id,SWFFONT * f,TAG * t,SHAPE * * shapes)
+{ U16 fid;
+ SaveTagPos(t);
+ SetTagPos(t,0);
+
+ fid = GetU16(t);
+ if ((!id)||(id==fid))
+ { U16 ofs[MAX_CHAR_PER_FONT];
+ int n,i;
+
+ id = fid;
+ f->id = fid;
+
+ ofs[0] = GetU16(t);
+ n = ofs[0]/2;
+
+ for (i=1;i<n;i++) if (i<MAX_CHAR_PER_FONT) ofs[i] = GetU16(t); else GetU16(t);
+ for (i=0;i<n;i++) if (i<MAX_CHAR_PER_FONT) GetSimpleShape(t,&shapes[i]);
+
+ }
+
+ RestoreTagPos(t);
+ return id;
+}
+
+int FontExtract_DefineFontInfo(int id,SWFFONT * f,TAG * t,SHAPE * * shapes)
+{ U16 fid;
+ SaveTagPos(t);
+ SetTagPos(t,0);
+
+ fid = GetU16(t);
+ if (fid==id)
+ { U8 l = GetU8(t);
+ int i;
+
+ if (l)
+ { if (f->name) free(f->name);
+ f->name = (U8*)malloc(l+1);
+ if (f->name)
+ { GetBlock(t,f->name,l);
+ f->name[l] = 0;
+ }
+ else
+ { RestoreTagPos(t);
+ return -1;
+ }
+ }
+ f->flags = GetU8(t);
+
+ i = 0;
+ while (shapes[i])
+ { U16 code = ((f->flags&FF_WIDECODES)?GetU16(t):GetU8(t))%MAX_CHAR_PER_FONT;
+
+ f->glyph[code].shape = shapes[i];
+ f->glyph[code].gid = i;
+ if (i<MAX_CHAR_PER_FONT) f->codes[i] = code;
+
+ i++;
+ }
+ }
+
+ RestoreTagPos(t);
+ return id;
+}
+
+#define FEDTJ_PRINT 0x01
+#define FEDTJ_MODIFY 0x02
+
+int FontExtract_DefineText(int id,SWFFONT * f,TAG * t,int jobs)
+{ U16 cid;
+ SRECT r;
+ MATRIX m;
+ U8 gbits, abits, flags;
+ int fid;
+
+ fid = 0;
+
+ SaveTagPos(t);
+ SetTagPos(t,0);
+
+ cid = GetU16(t);
+ GetRect(t,&r);
+ GetMatrix(t,&m);
+ gbits = GetU8(t);
+ abits = GetU8(t);
+
+ flags = GetU8(t);
+
+ while(flags)
+ { if (flags&TF_TEXTCONTROL)
+ { if (flags&TF_HASFONT) fid = GetU16(t);
+ if (flags&TF_HASCOLOR)
+ { GetU8(t); // rgb
+ GetU8(t);
+ GetU8(t);
+ if (GetTagID(t)==ST_DEFINETEXT2) GetU8(t);
+ }
+ if (flags&TF_HASXOFFSET) GetS16(t);
+ if (flags&TF_HASYOFFSET) GetS16(t);
+ if (flags&TF_HASFONT) GetU16(t);
+ }
+ else
+ { int i;
+ for (i=0;i<flags;i++)
+ { int glyph;
+ int adv;
+ glyph = GetBits(t,gbits);
+ adv = GetBits(t,abits);
+ if (id==fid) // mitlesen ?
+ { int code = f->codes[glyph];
+ if (jobs&FEDTJ_PRINT) printf("%c",code);
+ if (jobs&FEDTJ_MODIFY)
+ /*if (f->glyph[code].advance)*/ f->glyph[code].advance = adv;
+ }
+ }
+ if ((id==fid)&&(jobs&FEDTJ_PRINT)) printf("\n");
+ }
+ flags = GetU8(t);
+ }
+
+ RestoreTagPos(t);
+ return id;
+}
+
+int FontExtract(SWF * swf,int id,SWFFONT * * font)
+{ TAG * t;
+ SWFFONT * f;
+ SHAPE * shapes[MAX_CHAR_PER_FONT];
+
+ if ((!swf)||(!font)) return -1;
+
+ f = (SWFFONT *)malloc(sizeof(SWFFONT)); font[0] = f;
+ if (!f) return -1;
+
+ memset(shapes,0x00,sizeof(shapes));
+ memset(f,0x00,sizeof(SWFFONT));
+
+ t = swf->FirstTag;
+
+ while (t)
+ { int nid = 0;
+ switch (GetTagID(t))
+ { case ST_DEFINEFONT:
+ nid = FontExtract_DefineFont(id,f,t,shapes);
+ break;
+
+ case ST_DEFINEFONTINFO:
+ nid = FontExtract_DefineFontInfo(id,f,t,shapes);
+ break;
+
+ case ST_DEFINETEXT:
+ case ST_DEFINETEXT2:
+ nid = FontExtract_DefineText(id,f,t,FEDTJ_MODIFY);
+ break;
+ }
+ if (nid>0) id = nid;
+ t = NextTag(t);
+ }
+ return 0;
+}
+
+int FontIsItalic(SWFFONT * f) { return f->flags&FF_ITALIC; }
+int FontIsBold(SWFFONT * f) { return f->flags&FF_BOLD; }
+
+int FontSetID(SWFFONT * f,U16 id) { if (!f) return -1; f->id = id; return 0; }
+
+int FontReduce(SWFFONT * f,FONTUSAGE * use)
+{ int i,j;
+ if ((!f)||(!use)) return -1;
+
+ memset(&f->codes,0x00,sizeof(f->codes));
+
+ j = 0;
+ for (i=0;i<MAX_CHAR_PER_FONT;i++)
+ if (f->glyph[i].shape)
+ { if (use->code[i])
+ { f->glyph[i].gid = j;
+ f->codes[j] = i;
+ j++;
+ }
+ else
+ { ShapeFree(f->glyph[i].shape);
+ f->glyph[i].shape = 0;
+ f->glyph[i].gid = 0;
+ f->glyph[i].advance = 0;
+ }
+ } else f->glyph[i].gid = 0;
+
+ return j;
+}
+
+int FontInitUsage(FONTUSAGE * use)
+{ if (!use) return -1;
+ memset(&use->code,0x00,sizeof(use->code));
+ return 0;
+}
+
+int FontUse(FONTUSAGE * use,U8 * s)
+{ if ((!use)||(!s)) return -1;
+ while (s[0])
+ { use->code[s[0]] = 1;
+ s++;
+ }
+ return 0;
+}
+
+int FontSetDefine(TAG * t,SWFFONT * f)
+{ U16 ofs[MAX_CHAR_PER_FONT];
+ int p,i,j;
+
+ if ((!t)||(!f)) return -1;
+ ResetBitcount(t);
+ SetU16(t,f->id);
+
+ p = 0; j = 0;
+ for (i=0;i<MAX_CHAR_PER_FONT;i++)
+ if (f->glyph[i].shape)
+ { ofs[j++] = p;
+ p+=SetSimpleShape(NULL,f->glyph[i].shape);
+ }
+
+ for (i=0;i<j;i++) SetU16(t,ofs[i]+j*2);
+
+ for (i=0;i<MAX_CHAR_PER_FONT;i++)
+ if (f->glyph[i].shape)
+ SetSimpleShape(t,f->glyph[i].shape);
+
+ ResetBitcount(t);
+ return 0;
+}
+
+int FontSetInfo(TAG * t,SWFFONT * f)
+{ int l,i;
+ if ((!t)||(!f)) return -1;
+ ResetBitcount(t);
+ SetU16(t,f->id);
+ l = strlen(f->name); if (l>255) l = 255;
+ SetU8(t,l);
+ SetBlock(t,f->name,l);
+ SetU8(t,f->flags&0xfe); // no Wide-Codes
+
+ for (i=0;i<MAX_CHAR_PER_FONT;i++)
+ if (f->glyph[i].shape)
+ SetU8(t,i);
+
+ return 0;
+}
+
+int FontExport(int handle,SWFFONT * f)
+{ int l;
+ int i;
+ if (!f) return 0;
+
+ l = sizeof(SWFFONT);
+ if (handle>=0)
+ if (write(handle,f,sizeof(SWFFONT))!=sizeof(SWFFONT)) return -1;
+
+ if (f->name)
+ { U16 ln = strlen(f->name);
+ l+=2+ln;
+ if (handle>=0)
+ { if (write(handle,&ln,2)!=2) return -1;
+ if (write(handle,f->name,ln)!=ln) return -1;
+ }
+ }
+
+ if (f->layout)
+ { l+=sizeof(SWFLAYOUT);
+ if (handle>=0)
+ if (write(handle,f->layout,sizeof(SWFLAYOUT))!=sizeof(SWFLAYOUT)) return -1;
+ if (f->layout->kerning.data)
+ { l+=f->layout->kerning.count*4;
+ if (handle>=0)
+ if (write(handle,f->layout->kerning.data,f->layout->kerning.count*4)!=f->layout->kerning.count*4) return -1;
+ }
+ }
+
+ for (i=0;i<MAX_CHAR_PER_FONT;i++)
+ { if (f->glyph[i].shape)
+ { int ll = ShapeExport(handle,f->glyph[i].shape);
+ if (ll<0) return -1;
+ l+=ll;
+ }
+ }
+
+ return l;
+}
+
+int FontImport(int handle,SWFFONT * * font)
+{ SWFFONT * f;
+ int layout;
+ int i = 0;
+
+ if ((!font)||(handle<0)) return -1;
+
+ f = (SWFFONT *)malloc(sizeof(SWFFONT)); font[0] = f;
+ if (!f) return -1;
+
+ memset(f,0x00,sizeof(SWFFONT));
+
+ if (read(handle,f,sizeof(SWFFONT))!=sizeof(SWFFONT)) goto fehler;
+
+ layout = (f->layout)?1:0; // avoid illegal free()
+ f->layout = NULL;
+
+ if (f->name)
+ { U16 ln;
+ f->name = NULL;
+ if (read(handle,&ln,2)!=2) goto fehler;
+ f->name = (U8*)malloc(ln+1);
+ if (!f->name) goto fehler;
+ if (read(handle,f->name,ln)!=ln) goto fehler;
+ f->name[ln] = 0;
+ }
+
+ if (f->layout)
+ { f->layout = (SWFLAYOUT *)malloc(sizeof(SWFLAYOUT));
+ if (!f->layout) goto fehler;
+ if (read(handle,f->layout,sizeof(SWFLAYOUT))!=sizeof(SWFLAYOUT)) goto fehler;
+ if (f->layout->kerning.data)
+ { int l = f->layout->kerning.count*4;
+ f->layout->kerning.data = (U8*)malloc(l);
+ if (!f->layout->kerning.data) goto fehler;
+ if (read(handle,f->layout->kerning.data,l)!=l) goto fehler;
+ }
+ }
+
+ for (i=0;i<MAX_CHAR_PER_FONT;i++)
+ { if (f->glyph[i].shape)
+ { if (ShapeImport(handle,&f->glyph[i].shape)<0) goto fehler;
+ }
+ }
+
+ f->id = 0;
+
+ return 0;
+
+fehler:
+ if (f) for (;i<MAX_CHAR_PER_FONT;i++) f->glyph[i].shape = NULL;
+ FontFree(f);
+ font[0] = NULL;
+ return -1;
+}
+
+int TextPrintDefineText(TAG * t,SWFFONT * f)
+{ int id = GetTagID(t);
+ if ((id==ST_DEFINETEXT)||(id==ST_DEFINETEXT2)) FontExtract_DefineText(f->id,f,t,FEDTJ_PRINT);
+ else return -1;
+ return 0;
+}
+
+void LayoutFree(SWFLAYOUT * l)
+{ if (l)
+ { if (l->kerning.data) free(l->kerning.data);
+ l->kerning.data = NULL;
+ }
+ free(l);
+}
+
+void FontFree(SWFFONT * f)
+{ if (f)
+ { int i;
+
+ if (f->name) free(f->name);
+ if (f->layout) LayoutFree(f->layout);
+
+ f->name = NULL;
+ f->layout = NULL;
+
+ for (i=0;i<MAX_CHAR_PER_FONT;i++)
+ if (f->glyph[i].shape)
+ { ShapeFree(f->glyph[i].shape);
+ f->glyph[i].shape = NULL;
+ }
+ }
+ free(f);
+}
+
+int TextSetInfoRecord(TAG * t,SWFFONT * font,U16 size,RGBA * color,S16 dx,S16 dy)
+{ U8 flags;
+ if (!t) return -1;
+
+ flags = TF_TEXTCONTROL|(font?TF_HASFONT:0)|(color?TF_HASCOLOR:0)|(dx?TF_HASXOFFSET:0)|(dy?TF_HASYOFFSET:0);
+
+ SetU8(t,flags);
+ if (font) SetU16(t,font->id);
+ if (color)
+ { if (GetTagID(t)==ST_DEFINETEXT2) SetRGBA(t,color);
+ else SetRGB(t,color);
+ }
+ if (dx) SetS16(t,dx);
+ if (dy) SetS16(t,dy);
+ if (font) SetU16(t,size);
+
+ return 0;
+}
+
+int TextCountBits(SWFFONT * font,U8 * s,int scale,U8 * gbits,U8 * abits)
+{ U16 g,a;
+ if ((!s)||(!font)||((!gbits)&&(!abits))) return -1;
+ g = a = 0;
+
+ while(s[0])
+ { g = CountBits(font->glyph[s[0]].gid,g);
+ a = CountBits((((U32)font->glyph[s[0]].advance)*scale)/100,a);
+ s++;
+ }
+
+ if (gbits) gbits[0] = (U8)g;
+ if (abits) abits[0] = (U8)a;
+
+ return 0;
+}
+
+int TextSetCharRecord(TAG * t,SWFFONT * font,U8 * s,int scale,U8 gbits,U8 abits)
+{ int l,i;
+
+ if ((!t)||(!font)||(!s)) return -1;
+
+ l = strlen(s);
+ if (l>0x7f) l = 0x7f;
+ SetU8(t,l);
+
+ for (i=0;i<l;i++)
+ { SetBits(t,font->glyph[s[i]].gid,gbits);
+ SetBits(t,(((U32)font->glyph[s[i]].advance)*scale)/100,abits);
+ }
+
+ ResetBitcount(t);
+ return 0;
+}
+
+U32 TextGetWidth(SWFFONT * font,U8 * s,int scale)
+{ U32 res = 0;
+
+ if (font&&s)
+ { while (s[0])
+ { res += font->glyph[s[0]].advance;
+ s++;
+ }
+ if (scale) res = (res*scale)/100;
+ }
+
+ return res;
+}
git.asbjorn.biz / swftools.git / blobdiff