+}
+
+int swf_TextPrintDefineText(TAG * t, SWFFONT * f)
+{
+ int id = swf_GetTagID(t);
+ if ((id == ST_DEFINETEXT) || (id == ST_DEFINETEXT2))
+ swf_FontExtract_DefineText(f->id, f, t, FEDTJ_PRINT);
+ else
+ return -1;
+ return 0;
+}
+
+void swf_FontFree(SWFFONT * f)
+{
+ int i;
+ if (!f)
+ return;
+
+ if (f->glyph)
+ {
+ for (i = 0; i < f->numchars; i++)
+ if (f->glyph[i].shape)
+ {
+ swf_ShapeFree(f->glyph[i].shape);
+ f->glyph[i].shape = NULL;
+ }
+ rfx_free(f->glyph);
+ f->glyph = NULL;
+ }
+ if (f->ascii2glyph)
+ {
+ rfx_free(f->ascii2glyph);
+ f->ascii2glyph = NULL;
+ }
+ if (f->glyph2ascii)
+ {
+ rfx_free(f->glyph2ascii);
+ f->glyph2ascii = NULL;
+ }
+ font_freename(f);
+ font_freelayout(f);
+ font_freeglyphnames(f);
+ font_freeusage(f);
+
+ rfx_free(f);
+}
+
+int swf_TextSetInfoRecord(TAG * t, SWFFONT * font, U16 size, RGBA * color, int x, int y)
+{
+ U8 flags;
+ if (!t)
+ return -1;
+
+ flags = TF_TEXTCONTROL | (font ? TF_HASFONT : 0) | (color ? TF_HASCOLOR : 0) | (x ? TF_HASXOFFSET : 0)
+ | (y ? TF_HASYOFFSET : 0);
+
+ swf_SetU8(t, flags);
+ if (font)
+ swf_SetU16(t, font->id);
+ if (color) {
+ if (swf_GetTagID(t) == ST_DEFINETEXT2)
+ swf_SetRGBA(t, color);
+ else
+ swf_SetRGB(t, color);
+ }
+ if (x) {
+ if(x != SET_TO_ZERO) {
+ if(x>32767 || x<-32768)
+ fprintf(stderr, "Warning: Horizontal char position overflow: %d\n", x);
+ swf_SetS16(t, x);
+ } else {
+ swf_SetS16(t, 0);
+ }
+ }
+ if (y) {
+ if(y != SET_TO_ZERO) {
+ if(y>32767 || y<-32768)
+ fprintf(stderr, "Warning: Vertical char position overflow: %d\n", y);
+ swf_SetS16(t, y);
+ } else {
+ swf_SetS16(t, 0);
+ }
+ }
+ if (font)
+ swf_SetU16(t, size);
+
+ return 0;
+}
+
+static int swf_TextCountBits2(SWFFONT * font, U8 * s, int scale, U8 * gbits, U8 * abits, char *encoding)
+{
+ U16 g, a;
+ char utf8 = 0;
+ if ((!s) || (!font) || ((!gbits) && (!abits)) || (!font->ascii2glyph))
+ return -1;
+ g = a = 0;
+
+ if (!strcmp(encoding, "UTF8"))
+ utf8 = 1;
+ else if (!strcmp(encoding, "iso-8859-1"))
+ utf8 = 0;
+ else
+ fprintf(stderr, "Unknown encoding: %s", encoding);
+
+ while (*s) {
+ int glyph = -1, c;
+
+ if (!utf8)
+ c = *s++;
+ else
+ c = readUTF8char(&s);
+
+ if (c < font->maxascii)
+ glyph = font->ascii2glyph[c];
+ if (glyph >= 0) {
+ g = swf_CountUBits(glyph, g);
+ a = swf_CountBits(((((U32) font->glyph[glyph].advance) * scale) / 20) / 100, a);
+ }
+ }
+
+ if (gbits)
+ gbits[0] = (U8) g;
+ if (abits)
+ abits[0] = (U8) a;
+ return 0;
+}
+
+static int swf_TextSetCharRecord2(TAG * t, SWFFONT * font, U8 * s, int scale, U8 gbits, U8 abits, char *encoding)
+{
+ int l = 0, pos;
+ char utf8 = 0;
+
+ if ((!t) || (!font) || (!s) || (!font->ascii2glyph))
+ return -1;
+
+ if (!strcmp(encoding, "UTF8"))
+ utf8 = 1;
+ else if (!strcmp(encoding, "iso-8859-1"))
+ utf8 = 0;
+ else
+ fprintf(stderr, "Unknown encoding: %s", encoding);
+
+ pos = t->len;
+ swf_SetU8(t, l); //placeholder
+
+ while (*s) {
+ int g = -1, c;
+
+ if (!utf8)
+ c = *s++;
+ else
+ c = readUTF8char(&s);
+
+ if (c < font->maxascii)
+ g = font->ascii2glyph[c];
+ if (g >= 0) {
+ swf_SetBits(t, g, gbits);
+ swf_SetBits(t, ((((U32) font->glyph[g].advance) * scale) / 20) / 100, abits);
+ l++;
+ /* We split into 127 characters per text field.
+ We could do 255, by the (formerly wrong) flash specification,
+ but some SWF parsing code out there still assumes that char blocks
+ are at max 127 characters, and it would save only a few bits.
+ */
+ if (l == 0x7f)
+ break;
+ }
+ }
+
+ PUT8(&t->data[pos], l);
+
+ swf_ResetWriteBits(t);
+ return 0;
+}
+
+int swf_TextCountBits(SWFFONT * font, U8 * s, int scale, U8 * gbits, U8 * abits)
+{
+ return swf_TextCountBits2(font, s, scale, gbits, abits, "iso-8859-1");
+}
+
+int swf_TextSetCharRecord(TAG * t, SWFFONT * font, U8 * s, int scale, U8 gbits, U8 abits)
+{
+ return swf_TextSetCharRecord2(t, font, s, scale, gbits, abits, "iso-8859-1");
+}
+
+int swf_TextCountBitsUTF8(SWFFONT * font, U8 * s, int scale, U8 * gbits, U8 * abits)
+{
+ return swf_TextCountBits2(font, s, scale, gbits, abits, "UTF8");
+}
+
+int swf_TextSetCharRecordUTF8(TAG * t, SWFFONT * font, U8 * s, int scale, U8 gbits, U8 abits)
+{
+ return swf_TextSetCharRecord2(t, font, s, scale, gbits, abits, "UTF8");
+}
+
+U32 swf_TextGetWidth(SWFFONT * font, U8 * s, int scale)
+{
+ U32 res = 0;
+
+ if (font && s) {
+ while (s[0]) {
+ int g = -1;
+ if (*s < font->maxascii)
+ g = font->ascii2glyph[*s];
+ if (g >= 0)
+ res += font->glyph[g].advance / 20;
+ s++;
+ }
+ if (scale)
+ res = (res * scale) / 100;
+ }
+ return res;
+}
+
+SRECT swf_TextCalculateBBoxUTF8(SWFFONT * font, U8 * s, int scale)
+{
+ int xpos = 0;
+ int ypos = 0;
+ SRECT r;
+ swf_GetRect(0, &r);
+ while (*s) {
+ int c = readUTF8char(&s);
+ if(c==13 || c==10) {
+ if(s[0] == 10) {
+ s++;
+ }
+ xpos=0;
+ ypos+=font->layout->leading;
+ continue;
+ }
+ if (c < font->maxascii) {
+ int g = font->ascii2glyph[c];
+ if (g >= 0) {
+ SRECT rn = font->layout->bounds[g];
+ rn.xmin = (rn.xmin * scale) / 20 / 100 + xpos;
+ rn.xmax = (rn.xmax * scale) / 20 / 100 + xpos;
+ rn.ymin = (rn.ymin * scale) / 20 / 100 + ypos;
+ rn.ymax = (rn.ymax * scale) / 20 / 100 + ypos;
+ swf_ExpandRect2(&r, &rn);
+ xpos += (font->glyph[g].advance * scale) / 20 / 100;
+ }
+ }
+ }
+ return r;
+}
+
+
+SWFFONT *swf_ReadFont(const char *filename)
+{
+ int f;
+ SWF swf;
+ if (!filename)
+ return 0;
+ f = open(filename, O_RDONLY|O_BINARY);
+
+ if (f < 0 || swf_ReadSWF(f, &swf) < 0) {
+ fprintf(stderr, "%s is not a valid SWF font file or contains errors.\n", filename);
+ close(f);
+ return 0;
+ } else {
+ SWFFONT *font;
+ close(f);
+ if (swf_FontExtract(&swf, WRITEFONTID, &font) < 0)
+ return 0;
+ swf_FreeTags(&swf);
+ return font;
+ }
+}
+
+void swf_WriteFont(SWFFONT * font, char *filename)
+{
+ SWF swf;
+ TAG *t;
+ SRECT r;
+ RGBA rgb;
+ int f;
+ int useDefineFont2 = 0;
+ int storeGlyphNames = 1;
+
+ if (font->layout)
+ useDefineFont2 = 1; /* the only thing new in definefont2
+ is layout information. */
+
+ font->id = WRITEFONTID; //"FN"
+
+ memset(&swf, 0x00, sizeof(SWF));
+
+ swf.fileVersion = 9;
+ swf.frameRate = 0x4000;
+
+ /* if we use DefineFont1 to store the characters,
+ we have to build a textfield to store the
+ advance values. While at it, we can also
+ make the whole .swf viewable */
+
+ /* we now always create viewable swfs, even if we
+ did use definefont2 -mk */
+ t = swf_InsertTag(NULL, ST_SETBACKGROUNDCOLOR);
+ swf.firstTag = t;
+ rgb.r = 0xef;
+ rgb.g = 0xef;
+ rgb.b = 0xff;
+ swf_SetRGB(t, &rgb);
+ if (!useDefineFont2) {
+ t = swf_InsertTag(t, ST_DEFINEFONT);
+ swf_FontSetDefine(t, font);
+ t = swf_InsertTag(t, ST_DEFINEFONTINFO);
+ swf_FontSetInfo(t, font);
+ } else {
+ t = swf_InsertTag(t, ST_DEFINEFONT2);
+ swf_FontSetDefine2(t, font);
+ }
+ if(font->name) {
+ t = swf_InsertTag(t, ST_NAMECHARACTER);
+ swf_SetU16(t, WRITEFONTID);
+ swf_SetString(t, font->name);
+ t = swf_InsertTag(t, ST_EXPORTASSETS);
+ swf_SetU16(t, 1);
+ swf_SetU16(t, WRITEFONTID);
+ swf_SetString(t, font->name);
+
+ t = swf_AddAS3FontDefine(t, WRITEFONTID, font->name);
+ }
+
+ if (storeGlyphNames && font->glyphnames) {
+ int c;
+ t = swf_InsertTag(t, ST_GLYPHNAMES);
+ swf_SetU16(t, WRITEFONTID);
+ swf_SetU16(t, font->numchars);
+ for (c = 0; c < font->numchars; c++) {
+ if (font->glyphnames[c])
+ swf_SetString(t, (U8*)font->glyphnames[c]);
+ else
+ swf_SetString(t, (U8*)"");
+ }
+ }
+
+ if (1) //neccessary only for df1, but pretty to look at anyhow, so do it always
+ {
+ int textscale = 400;