+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 = 4;
+ 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 (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, font->glyphnames[c]);
+ else
+ swf_SetString(t, "");
+ }
+ }
+
+ if (1) //neccessary only for df1, but pretty to look at anyhow, so do it always
+ {
+ int textscale = 400;
+ int s;
+ int xmax = 0;
+ int ymax = 0;
+ int ypos = 1;
+ U8 gbits, abits;
+ int x, y, c;
+ int range = font->maxascii;
+
+ c = 0;
+ if (useDefineFont2 && range > 256) {
+ range = 256;
+ }
+
+ for (s = 0; s < range; s++) {
+ int g = font->ascii2glyph[s];
+ if (g >= 0) {
+ if ((font->glyph[g].advance * textscale / 20) / 64 > xmax) {
+ xmax = (font->glyph[g].advance * textscale / 20) / 64;
+ }
+ c++;
+ }
+ if ((s & 15) == 0) {
+ if (c) {
+ ypos++;
+ }
+ c = 0;
+ }
+ }
+ ymax = ypos * textscale * 2;
+
+ swf.movieSize.xmax = xmax * 20;
+ swf.movieSize.ymax = ymax;
+
+ t = swf_InsertTag(t, ST_DEFINETEXT);
+
+ swf_SetU16(t, font->id + 1); // ID
+
+ r.xmin = 0;
+ r.ymin = 0;
+ r.xmax = swf.movieSize.xmax;
+ r.ymax = swf.movieSize.ymax;
+
+ swf_SetRect(t, &r);
+
+ swf_SetMatrix(t, NULL);
+
+ abits = swf_CountBits(xmax * 16, 0);
+ gbits = 8;
+
+ swf_SetU8(t, gbits);
+ swf_SetU8(t, abits);
+
+ rgb.r = 0x00;
+ rgb.g = 0x00;
+ rgb.b = 0x00;
+ ypos = 1;
+ for (y = 0; y < ((range + 15) / 16); y++) {
+ int c = 0, lastx = -1;
+ for (x = 0; x < 16; x++) {
+ int g = (y * 16 + x < range) ? font->ascii2glyph[y * 16 + x] : -1;
+ if (g >= 0 && font->glyph[g].shape) {
+ c++;
+ if (lastx < 0)
+ lastx = x * xmax;
+ }
+ }
+ if (c) {
+ swf_TextSetInfoRecord(t, font, textscale, &rgb, lastx + 1, textscale * ypos * 2);
+ for (x = 0; x < 16; x++) {
+ int g = (y * 16 + x < range) ? font->ascii2glyph[y * 16 + x] : -1;
+ if (g >= 0 && font->glyph[g].shape) {
+ if (lastx != x * xmax) {
+ swf_TextSetInfoRecord(t, 0, 0, 0, x * xmax + 1, 0);
+ }
+ swf_SetU8(t, 1);
+ swf_SetBits(t, g, gbits);
+ swf_SetBits(t, font->glyph[g].advance / 20, abits);
+ lastx = x * xmax + (font->glyph[g].advance / 20);
+ swf_ResetWriteBits(t);
+ }
+ }
+ ypos++;
+ }
+ }
+ swf_SetU8(t, 0);
+
+
+ t = swf_InsertTag(t, ST_PLACEOBJECT2);
+
+ swf_ObjectPlace(t, font->id + 1, 1, NULL, NULL, NULL);
+
+ t = swf_InsertTag(t, ST_SHOWFRAME);
+
+ }
+
+ t = swf_InsertTag(t, ST_END);
+
+ f = open(filename, O_RDWR | O_CREAT | O_TRUNC | O_BINARY, 0644);
+ if FAILED
+ (swf_WriteSWF(f, &swf)) fprintf(stderr, "WriteSWF() failed in writeFont().\n");
+ close(f);
+
+ swf_FreeTags(&swf);
+}
+
+
+void swf_SetEditText(TAG * tag, U16 flags, SRECT r, char *text, RGBA * color, int maxlength, U16 font, U16 height, EditTextLayout * layout, char *variable)
+{
+ swf_SetRect(tag, &r);
+ swf_ResetWriteBits(tag);
+
+ flags &= ~(ET_HASTEXT | ET_HASTEXTCOLOR | ET_HASMAXLENGTH | ET_HASFONT | ET_HASLAYOUT);
+ if (text)
+ flags |= ET_HASTEXT;
+ if (color)
+ flags |= ET_HASTEXTCOLOR;
+ if (maxlength)
+ flags |= ET_HASMAXLENGTH;
+ if (font)
+ flags |= ET_HASFONT;
+ if (layout)
+ flags |= ET_HASLAYOUT;
+
+ swf_SetBits(tag, flags, 16);
+
+ if (flags & ET_HASFONT) {
+ swf_SetU16(tag, font); //font
+ swf_SetU16(tag, height); //fontheight
+ }
+ if (flags & ET_HASTEXTCOLOR) {
+ swf_SetRGBA(tag, color);
+ }
+ if (flags & ET_HASMAXLENGTH) {
+ swf_SetU16(tag, maxlength); //maxlength
+ }
+ if (flags & ET_HASLAYOUT) {
+ swf_SetU8(tag, layout->align); //align
+ swf_SetU16(tag, layout->leftmargin); //left margin
+ swf_SetU16(tag, layout->rightmargin); //right margin
+ swf_SetU16(tag, layout->indent); //indent
+ swf_SetU16(tag, layout->leading); //leading
+ }
+ swf_SetString(tag, variable);
+ if (flags & ET_HASTEXT)
+ swf_SetString(tag, text);
+}
+
+SRECT swf_SetDefineText(TAG * tag, SWFFONT * font, RGBA * rgb, char *text, int scale)
+{
+ SRECT r;
+ U8 gbits, abits;
+ U8 *c = (U8 *) text;
+ int pos = 0;
+ if (font->layout) {
+ r = swf_TextCalculateBBoxUTF8(font, text, scale * 20);
+ } else {
+ fprintf(stderr, "No layout information- can't compute text bbox accurately");
+ /* Hm, without layout information, we can't compute a bounding
+ box. We could call swf_FontCreateLayout to create a layout,
+ but the caller probably doesn't want us to mess up his font
+ structure.
+ */
+ r.xmin = r.ymin = 0;
+ r.xmax = r.ymax = 1024 * 20;
+ }
+
+ swf_SetRect(tag, &r);
+
+ /* The text matrix is pretty boring, as it doesn't apply to
+ individual characters, but rather whole text objects (or
+ at least whole char records- haven't tested).
+ So it can't do anything which we can't already do with
+ the placeobject tag we use for placing the text on the scene.
+ */
+ swf_SetMatrix(tag, 0);
+
+ swf_TextCountBitsUTF8(font, text, scale * 20, &gbits, &abits);
+ swf_SetU8(tag, gbits);
+ swf_SetU8(tag, abits);
+
+ /* now set the text params- notice that a font size of
+ 1024 means that the glyphs will be displayed exactly
+ as they would be in/with a defineshape. (Try to find
+ *that* in the flash specs)
+ */
+ swf_TextSetInfoRecord(tag, font, (scale * 1024) / 100, rgb, 0, 0); //scale
+
+ /* set the actual text- notice that we just pass our scale
+ parameter over, as TextSetCharRecord calculates with
+ percent, too */
+ swf_TextSetCharRecordUTF8(tag, font, text, scale * 20, gbits, abits);
+
+ swf_SetU8(tag, 0);
+ return r;
+}
+
+void swf_FontCreateLayout(SWFFONT * f)
+{
+ S16 leading = 0;
+ int t;
+ if (f->layout)
+ return;
+ if (!f->numchars)
+ return;
+
+ f->layout = (SWFLAYOUT *) rfx_calloc(sizeof(SWFLAYOUT));
+ f->layout->bounds = (SRECT *) rfx_alloc(f->numchars * sizeof(SRECT));
+ f->layout->ascent = -32767;
+ f->layout->descent = -32767;
+
+ for (t = 0; t < f->numchars; t++) {
+ SHAPE2 *shape2;
+ SRECT bbox;
+ int width;
+ shape2 = swf_ShapeToShape2(f->glyph[t].shape);
+ if (!shape2) {
+ fprintf(stderr, "Shape parse error\n");
+ exit(1);
+ }
+ bbox = swf_GetShapeBoundingBox(shape2);
+ swf_Shape2Free(shape2);
+ f->layout->bounds[t] = bbox;
+
+ width = (bbox.xmax);
+
+ /* The following is a heuristic- it may be that extractfont_DefineText
+ has already found out some widths for individual characters (from the way
+ they are used)- we now have to guess whether that width might be possible,
+ which is the case if it isn't either much too big or much too small */
+ if (width > f->glyph[t].advance * 3 / 2 || width < f->glyph[t].advance / 2)
+ f->glyph[t].advance = width;
+
+ if (-bbox.ymin > f->layout->ascent)
+ f->layout->ascent = bbox.ymin;
+ if (bbox.ymax > f->layout->descent)
+ f->layout->descent = bbox.ymax;
+ }
+}