workbench/libs/freetype2/ftglyphengine.c

   1 /*
   2  * Based on the code from the ft2.library from MorphOS and the ttf.library by
   3  * Richard Griffith
   4  */
   5 #include "ftglyphengine.h"
   6
   7 //#define DEBUG 1
   8 #include <aros/debug.h>
   9 #include <exec/memory.h>
  10 #include <diskfont/oterrors.h>
  11 #include <libraries/codesets.h>
  12
  13 #include <proto/codesets.h>
  14 #include <proto/exec.h>
  15 #include <proto/dos.h>
  16
  17 int set_last_error(FT_GlyphEngine *ge,int error)
  18 {
  19     ge->last_error=error;
  20     return(error);
  21 }
  22
  23 void set_default_codepage(FT_GlyphEngine *ge)
  24 {
  25     struct Library *CodesetsBase;
  26     struct codeset *sys_codeset;
  27
  28     int i;
  29
  30     for(i=0;i<256;++i)
  31         ge->codepage[i]=i;
  32
  33     D(bug("getting codepage environment var\n"));
  34
  35     if (GetVar("ftcodepage", (STRPTR)&ge->codepage, 512,
  36            LV_VAR | GVF_BINARY_VAR | GVF_DONT_NULL_TERM) == 512)
  37         return;
  38
  39     CodesetsBase = OpenLibrary("codesets.library", 0);
  40     if (!CodesetsBase)
  41         return;
  42
  43     sys_codeset = CodesetsFindA(NULL, NULL);
  44     if (sys_codeset) {
  45         for (i = 0; i < 256; i++)
  46             ge->codepage[i] = sys_codeset->table[i].ucs4;
  47     }
  48
  49     CloseLibrary(CodesetsBase);
  50 }
  51
  52 /* close down and dispose of GlyphEngine */
  53 void FreeGE(FT_GlyphEngine *ge)
  54 {
  55     if(ge==NULL) return;
  56
  57     if(ge->face_established)
  58         FT_Done_Face( ge->face );
  59
  60     FT_Done_Library( ge->engine );
  61
  62     FreeVec(ge);
  63 }
  64
  65 /* initialize and setup the GlyphEngine structure */
  66 FT_GlyphEngine *AllocGE(void)
  67 {
  68     FT_GlyphEngine *ge;
  69     FT_Error  error;
  70
  71     D(bug("Allocating new glyph engine\n"));
  72
  73     ge=AllocVec(sizeof(FT_GlyphEngine),MEMF_PUBLIC | MEMF_CLEAR);
  74
  75     D(bug(" at 0x%lx\n",ge));
  76
  77     if(ge!=NULL)
  78     {
  79         set_last_error(ge,OTERR_Success);
  80
  81         D(bug("FT_Init_FreeType( 0x%lx ) ...\n",&ge->engine));
  82
  83         if ((error = FT_Init_FreeType( &ge->engine ) ))
  84         {
  85             D(bug("Error initializing engine, code = %ld.\n",
  86                   (LONG) error ));
  87
  88             FreeVec(ge);
  89             ge=NULL;
  90         }
  91         else
  92         {
  93             /* pre-inits */
  94             ge->shear_matrix.xx = 0x10000;
  95             ge->shear_matrix.yy = 0x10000;
  96             ge->rotate_matrix = ge->shear_matrix;
  97             ge->matrix = ge->shear_matrix;
  98
  99             ge->cmap_index=NO_CMAP_SET;
 100
 101             D(bug("Setting default codepage\n"));
 102
 103             set_default_codepage(ge);
 104         }
 105
 106         D(bug("Returning new glyph engine 0x%lx\n",ge));
 107     }
 108
 109     return(ge);
 110 }