[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[freetype2] parthw-wip b50f318 06/23: [gf] Initialised internal utility
From: |
Parth Wazurkar |
Subject: |
[freetype2] parthw-wip b50f318 06/23: [gf] Initialised internal utility functions specific to GF format. |
Date: |
Wed, 27 Jun 2018 11:53:22 -0400 (EDT) |
branch: parthw-wip
commit b50f31868113d013989e7fec6128e32e2e38a92c
Author: Parth Wazurkar <address@hidden>
Commit: Parth Wazurkar <address@hidden>
[gf] Initialised internal utility functions specific to GF format.
* src/gf/gf.h Added some required definitions.
* src/gf/gflib.c Added gf_font_load, gf_read_glyph, gf_font_done functions.
---
src/gf/gf.h | 10 ++
src/gf/gflib.c | 498 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++
2 files changed, 508 insertions(+)
diff --git a/src/gf/gf.h b/src/gf/gf.h
index 3d03614..a5e1348 100644
--- a/src/gf/gf.h
+++ b/src/gf/gf.h
@@ -58,6 +58,16 @@ FT_BEGIN_HEADER
#define GF_YYY 243
#define GF_NO_OP 244
+
+typedef char INT1;
+typedef unsigned char UINT1;
+typedef int INT2;
+typedef unsigned int UINT2;
+typedef long INT3;
+typedef unsigned long UINT3;
+typedef long INT4;
+typedef unsigned long UINT4;
+
FT_END_HEADER
diff --git a/src/gf/gflib.c b/src/gf/gflib.c
new file mode 100644
index 0000000..78b9c02
--- /dev/null
+++ b/src/gf/gflib.c
@@ -0,0 +1,498 @@
+/***************************************************************************/
+/* */
+/* gfdrivr.h */
+/* */
+/* FreeType font driver for TeX's GF FONT files */
+/* */
+/* Copyright 1996-2018 by */
+/* David Turner, Robert Wilhelm, and Werner Lemberg. */
+/* */
+/* This file is part of the FreeType project, and may only be used, */
+/* modified, and distributed under the terms of the FreeType project */
+/* license, LICENSE.TXT. By continuing to use, modify, or distribute */
+/* this file you indicate that you have read the license and */
+/* understand and accept it fully. */
+/* */
+/***************************************************************************/
+
+#include <ft2build.h>
+
+#include FT_FREETYPE_H
+#include FT_INTERNAL_DEBUG_H
+#include FT_INTERNAL_STREAM_H
+#include FT_INTERNAL_OBJECTS_H
+
+#include "gf.h"
+#include "gferror.h"
+
+
+ /*************************************************************************/
+ /* */
+ /* The macro FT_COMPONENT is used in trace mode. It is an implicit */
+ /* parameter of the FT_TRACE() and FT_ERROR() macros, used to print/log */
+ /* messages during execution. */
+ /* */
+#undef FT_COMPONENT
+#define FT_COMPONENT trace_gflib
+
+
+ /*************************************************************************/
+ /* */
+ /* GF font utility functions. */
+ /* */
+ /*************************************************************************/
+
+ long gf_read_intn(FILE*,int);
+ unsigned long gf_read_uintn(FILE*,int);
+ void gf_skip_n(FILE*,int);
+
+#define READ_INT1(fp) (INT1)gf_read_intn((fp), 1)
+#define READ_UINT1(fp) (UINT1)gf_read_uintn((fp), 1)
+#define READ_INT2(fp) (INT2)gf_read_intn((fp), 2)
+#define READ_UINT2(fp) (UINT2)gf_read_uintn((fp), 2)
+#define READ_INT3(fp) (INT3)gf_read_intn((fp), 3)
+#define READ_UINT3(fp) (UINT3)gf_read_uintn((fp), 3)
+#define READ_INT4(fp) (INT4)gf_read_intn((fp), 4)
+#define READ_UINT4(fp) (UINT4)gf_read_uintn((fp), 4)
+#define READ_INTN(fp,n) (INT4)gf_read_intn((fp), (n))
+#define READ_UINTN(fp,n) (UINT4)gf_read_uintn((fp), (n))
+#define SKIP_N(fp,k) gf_skip_n((fp), (k))
+
+
+/*
+ * Reading a Number from file
+ */
+ unsigned long
+ gf_read_uintn(FILE* fp, int size)
+ {
+ unsigned long v;
+
+ v = 0L;
+ while (size >= 1)
+ {
+ v = v*256L + (unsigned long)getc(fp);
+ --size;
+ }
+ return v;
+ }
+
+ long
+ gf_read_intn(FILE* fp, int size)
+ {
+ long v;
+
+ v = (long)getc(fp) & 0xffL;
+ if (v & 0x80L)
+ v = v - 256L;
+ --size;
+ while (size >= 1){
+ v = v*256L + (unsigned long)getc(fp);
+ --size;
+ }
+
+ return v;
+ }
+
+ void
+ gf_skip_n(FILE* fp, int size)
+ {
+
+ while (size > 0)
+ {
+ (void)getc(fp);
+ --size;
+ }
+
+ }
+
+ unsigned long
+ gf_get_uintn(unsigned char *p, int size)
+ {
+ unsigned long v;
+
+ v = 0L;
+ while (size >= 1)
+ {
+ v = v*256L + (unsigned long) *(p++);
+ --size;
+ }
+
+ return v;
+ }
+
+ long
+ gf_get_intn(unsigned char *p, int size)
+ {
+ long v;
+
+ v = (long)*(p++) & 0xffL;
+ if (v & 0x80L)
+ v = v - 256L;
+ --size;
+ while (size >= 1)
+ {
+ v = v*256L + (unsigned long) *(p++);
+ --size;
+ }
+
+ return v;
+ }
+
+
+
+ /*************************************************************************/
+ /* */
+ /* API. */
+ /* */
+ /*************************************************************************/
+
+ FT_LOCAL_DEF( FT_Error )
+ gf_read_glyph(FT_FILE* fp, GF_BITMAP bm)
+ {
+ long m, n;
+ int paint_sw;
+ int instr;
+ INT4 min_m, max_m, min_n, max_n, del_m, del_n;
+ long w, h, d;
+ int m_b, k;
+ unsigned char *ptr;
+
+ switch (READ_UINT1(fp))
+ {
+ case GF_BOC:
+ SKIP_N(fp, 4);
+ SKIP_N(fp, 4);
+ min_m = READ_INT4(fp);
+ max_m = READ_INT4(fp);
+ min_n = READ_INT4(fp);
+ max_n = READ_INT4(fp);
+ break;
+ case GF_BOC1:
+ SKIP_N(fp, 1);
+ del_m = (INT4)READ_UINT1(fp);
+ max_m = (INT4)READ_UINT1(fp);
+ del_n = (INT4)READ_UINT1(fp);
+ max_n = (INT4)READ_UINT1(fp);
+ min_m = max_m - del_m;
+ min_n = max_n - del_n;
+ break;
+ default:
+ return -1;
+ }
+
+ w = max_m - min_m + 1;
+ h = max_n - min_n + 1;
+ if ((w < 0) || (h < 0))
+ {
+ vf_error = VF_ERR_ILL_FONT_FILE;
+ return -1;
+ }
+
+ if ((bm->bitmap = (unsigned char*)malloc(h*((w+7)/8))) == NULL)
+ {
+ vf_error = VF_ERR_NO_MEMORY;
+ return -1;
+ }
+
+ memclr(bm->bitmap, h*((w+7)/8));
+ bm->raster = (w+7)/8;
+ bm->bbx_width = w;
+ bm->bbx_height = h;
+ bm->off_x = -min_m;
+ bm->off_y = max_n;
+ #if 0
+ bm->mv_x = -min_m;
+ bm->mv_y = max_n;
+ #endif
+
+ m = min_m;
+ n = max_n;
+ paint_sw = 0;
+ while ((instr = (int)READ_UINT1(fp)) != GF_EOC)
+ {
+ if (instr == GF_PAINT_0)
+ {
+ paint_sw = 1 - paint_sw;
+ }
+ else if ((GF_NEW_ROW_0 <= instr) && (instr <= GF_NEW_ROW_164))
+ {
+ m = min_m + (instr - GF_NEW_ROW_0);
+ n = n - 1;
+ paint_sw = 1;
+ }
+ else if ((GF_PAINT_1 <= instr) && (instr <= GF_PAINT_63))
+ {
+ d = (instr - GF_PAINT_1 + 1);
+ goto Paint;
+ }
+ else
+ {
+ switch ((int)instr)
+ {
+ case GF_PAINT1:
+ case GF_PAINT2:
+ case GF_PAINT3:
+ d = (UINT4)READ_UINTN(fp, (instr -
GF_PAINT1 + 1));
+ Paint:
+ if (paint_sw == 0)
+ {
+ m = m + d;
+ }
+ else
+ {
+ ptr = &bm->bitmap[(max_n - n) *
bm->raster + (m - min_m)/8];
+ m_b = (m - min_m) % 8;
+ while (d > 0)
+ {
+ *ptr |= bit_table[m_b];
+ m++;
+ if (++m_b >= 8)
+ {
+ m_b = 0;
+ ++ptr;
+ }
+ d--;
+ }
+ }
+ paint_sw = 1 - paint_sw;
+ break;
+
+ case GF_SKIP0:
+ m = min_m;
+ n = n - 1;
+ paint_sw = 0;
+ break;
+
+ case GF_SKIP1:
+ case GF_SKIP2:
+ case GF_SKIP3:
+ m = min_m;
+ n = n - (UINT4)READ_UINTN(fp, (instr -
GF_SKIP1 + 1)) - 1;
+ paint_sw = 0;
+ break;
+
+ case GF_XXX1:
+ case GF_XXX2:
+ case GF_XXX3:
+ case GF_XXX4:
+ k = READ_UINTN(fp, instr - GF_XXX1 + 1);
+ SKIP_N(fp, k);
+ break;
+
+ case GF_YYY:
+ SKIP_N(fp, 4);
+ break;
+
+ case GF_NO_OP:
+ break;
+
+ default:
+ vf_free(bm->bitmap);
+ bm->bitmap = NULL;
+ vf_error = VF_ERR_ILL_FONT_FILE;
+ return -1;
+ }
+ }
+ }
+
+ return 0;
+ }
+
+
+ FT_LOCAL_DEF( FT_Error )
+ gf_load_font( FT_Stream stream,
+ GF_Face face )
+ {
+ GF_GLYPH go;
+ GF_BITMAP bm;
+ UINT1 instr, d;
+ UINT4 ds, check_sum, hppp, vppp;
+ INT4 min_m, max_m, min_n, max_n;
+ INT4 w;
+ UINT4 code;
+ double dx, dy;
+ long ptr_post, ptr_p, ptr, optr, gptr;
+ int bc, ec, nchars, i;
+ FT_FILE *fp = stream->descriptor.pointer
+ go = NULL;
+ nchars = -1;
+
+ /* seek to post_post instr. */
+ ft_fseek(fp, -1, SEEK_END);
+
+ while ((d = READ_UINT1(fp)) == 223)
+ fseek(fp, -2, SEEK_CUR);
+
+ if (d != GF_ID)
+ {
+ vf_error = VF_ERR_ILL_FONT_FILE;
+ goto ErrExit;
+ }
+
+ fseek(fp, -6, SEEK_CUR);
+
+ /* check if the code is post_post */
+ if (READ_UINT1(fp) != GF_POST_POST)
+ {
+ vf_error = VF_ERR_ILL_FONT_FILE;
+ goto ErrExit;
+ }
+
+ /* read pointer to post instr. */
+ if ((ptr_post = READ_UINT4(fp)) == -1)
+ {
+ vf_error = VF_ERR_ILL_FONT_FILE;
+ goto ErrExit;
+ }
+
+ /* goto post instr. and read it */
+ fseek(fp, ptr_post, SEEK_SET);
+ if (READ_UINT1(fp) != GF_POST)
+ {
+ vf_error = VF_ERR_ILL_FONT_FILE;
+ goto ErrExit;
+ }
+
+ ptr_p = READ_UINT4(fp);
+ ds = READ_UINT4(fp);
+ check_sum = READ_UINT4(fp);
+ hppp = READ_UINT4(fp);
+ vppp = READ_UINT4(fp);
+ min_m = READ_INT4(fp);
+ max_m = READ_INT4(fp);
+ min_n = READ_INT4(fp);
+ max_n = READ_INT4(fp);
+
+ gptr = ftell(fp);
+
+ #if 0
+ /* read min & max char code */
+ bc = 256;
+ ec = -1;
+ for (;;){
+ instr = READ_UINT1(fp);
+ if (instr == GF_POST_POST){
+ break;
+ } else if (instr == GF_CHAR_LOC){
+ code = READ_UINT1(fp);
+ (void)SKIP_N(fp, 16);
+ } else if (instr == GF_CHAR_LOC0){
+ code = READ_UINT1(fp);
+ (void)SKIP_N(fp, 9);
+ } else {
+ vf_error = VF_ERR_ILL_FONT_FILE;
+ goto ErrExit;
+ }
+ if (code < bc)
+ bc = code;
+ if (code > ec)
+ ec = code;
+ }
+ #else
+ bc = 0;
+ ec = 255;
+ #endif
+
+ nchars = ec - bc + 1;
+ ALLOC_IF_ERR(go, struct s_gf_glyph)
+ {
+ vf_error = VF_ERR_NO_MEMORY;
+ goto ErrExit;
+ }
+ ALLOCN_IF_ERR(go->bm_table, struct vf_s_bitmap, nchars)
+ {
+ vf_error = VF_ERR_NO_MEMORY;
+ goto ErrExit;
+ }
+
+ for (i = 0; i < nchars; i++)
+ go->bm_table[i].bitmap = NULL;
+
+ go->ds = (double)ds/(1<<20);
+ go->hppp = (double)hppp/(1<<16);
+ go->vppp = (double)vppp/(1<<16);
+ go->font_bbx_w = max_m - min_m;
+ go->font_bbx_h = max_n - min_n;
+ go->font_bbx_xoff = min_m;
+ go->font_bbx_yoff = min_n;
+ go->code_min = bc;
+ go->code_max = ec;
+
+ /* read glyph */
+ #if 0
+ fseek(fp, gptr, SEEK_SET);
+ #endif
+ for (;;)
+ {
+ if ((instr = READ_UINT1(fp)) == GF_POST_POST)
+ break;
+ switch ((int)instr)
+ {
+
+ case GF_CHAR_LOC:
+ code = READ_UINT1(fp);
+ dx = (double)READ_INT4(fp)/(double)(1<<16);
+ dy = (double)READ_INT4(fp)/(double)(1<<16);
+ w = READ_INT4(fp);
+ ptr = READ_INT4(fp);
+ break;
+
+ case GF_CHAR_LOC0:
+ code = READ_UINT1(fp);
+ dx = (double)READ_INT1(fp);
+ dy = (double)0;
+ w = READ_INT4(fp);
+ ptr = READ_INT4(fp);
+ break;
+
+ default:
+ vf_error = VF_ERR_ILL_FONT_FILE;
+ goto ErrExit;
+
+ }
+ optr = ftell(fp);
+ fseek(fp, ptr, SEEK_SET);
+
+ bm = &go->bm_table[code - bc];
+ if (gf_read_glyph(fp, bm) < 0)
+ goto ErrExit;
+
+ bm->mv_x = dx;
+ bm->mv_y = dy;
+ fseek(fp, optr, SEEK_SET);
+ }
+ return go;
+
+ ErrExit:
+ printf("*ERROR\n");
+ if (go != NULL)
+ {
+ if (go->bm_table != NULL)
+ {
+ for (i = 0; i < nchars; i++)
+ vf_free(go->bm_table[i].bitmap);
+ }
+ vf_free(go->bm_table);
+ }
+ vf_free(go);
+ return NULL;
+ }
+
+
+ FT_LOCAL_DEF( void )
+ gf_free_font( GF_Glyph gf_glyph )
+ {
+ if (go != NULL)
+ {
+ if (go->bm_table != NULL)
+ {
+ for (i = 0; i < nchars; i++)
+ vf_free(go->bm_table[i].bitmap);
+ }
+ vf_free(go->bm_table);
+ }
+ vf_free(go);
+ }
+
+
+/* END */
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [freetype2] parthw-wip b50f318 06/23: [gf] Initialised internal utility functions specific to GF format.,
Parth Wazurkar <=