/*
   This program is free software; you can redistribute it and/or modify
   it under the terms of the GNU General Public License as published by
   the Free Software Foundation; either version 2 of the License, or
   (at your option) any later version.

   This program is distributed in the hope that it will be useful,
   but WITHOUT ANY WARRANTY; without even the implied warranty of
   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
   GNU General Public License for more details.

   You should have received a copy of the GNU General Public License
   along with this program; if not, write to the Free Software
   Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.

   xrdp: A Remote Desktop Protocol server.
   Copyright (C) Jay Sorg 2004-2007

   fonts

*/
/*
  The fv1 files contain
  Font File Header (just one)
    FNT1       4 bytes
    Font Name  32 bytes
    Font Size  2 bytes
    Font Style 2 bytes
    Pad        8 bytes
  Font Data (repeats)
    Width      2 bytes
    Height     2 bytes
    Baseline   2 bytes
    Offset     2 bytes
    Incby      2 bytes
    Pad        6 bytes
    Glyph Data var, see FONT_DATASIZE macro
*/

#include "xrdp.h"

#if 0 /* not used */
static char w_char[] =
{
  0x00, 0x00, 0x00,
  0x00, 0x00, 0x00,
  0x00, 0x00, 0x00,
  0x08, 0x20, 0x80,
  0x08, 0x50, 0x80,
  0x04, 0x51, 0x00,
  0x04, 0x51, 0x00,
  0x04, 0x51, 0x00,
  0x02, 0x8a, 0x00,
  0x02, 0x8a, 0x00,
  0x02, 0x8a, 0x00,
  0x01, 0x04, 0x00,
  0x01, 0x04, 0x00,
  0x00, 0x00, 0x00,
  0x00, 0x00, 0x00,
  0x00, 0x00, 0x00,
};
#endif

/*****************************************************************************/
struct xrdp_font* APP_CC
xrdp_font_create(struct xrdp_wm* wm)
{
  struct xrdp_font* self;
  struct stream* s;
  int fd;
  int b;
  int i;
  int index;
  int datasize;
  struct xrdp_font_char* f;

  self = (struct xrdp_font*)g_malloc(sizeof(struct xrdp_font), 1);
  self->wm = wm;
  make_stream(s);
  init_stream(s, 8192 * 2);
  fd = g_file_open("Tahoma-10.fv1");
  if (fd != -1)
  {
    b = g_file_read(fd, s->data, 8192 * 2);
    g_file_close(fd);
    if (b > 0)
    {
      s->end = s->data + b;
      in_uint8s(s, 4);
      in_uint8a(s, self->name, 32);
      in_uint16_le(s, self->size);
      in_uint16_le(s, self->style);
      in_uint8s(s, 8);
      index = 32;
      while (s_check_rem(s, 16))
      {
        f = self->font_items + index;
        in_sint16_le(s, i);
        f->width = i;
        in_sint16_le(s, i);
        f->height = i;
        in_sint16_le(s, i);
        f->baseline = i;
        in_sint16_le(s, i);
        f->offset = i;
        in_sint16_le(s, i);
        f->incby = i;
        in_uint8s(s, 6);
        datasize = FONT_DATASIZE(f);
        if (datasize < 0 || datasize > 512)
        {
          /* shouldn't happen */
          g_writeln("error in xrdp_font_create, datasize wrong");
          g_writeln("%d %d %d", f->width, f->height, datasize);
          break;
        }
        if (s_check_rem(s, datasize))
        {
          f->data = (char*)g_malloc(datasize, 0);
          in_uint8a(s, f->data, datasize);
        }
        else
        {
          g_writeln("error in xrdp_font_create");
        }
        index++;
      }
    }
  }
  free_stream(s);
/*
  self->font_items[0].offset = -4;
  self->font_items[0].baseline = -16;
  self->font_items[0].width = 24;
  self->font_items[0].height = 16;
  self->font_items[0].data = g_malloc(3 * 16, 0);
  g_memcpy(self->font_items[0].data, w_char, 3 * 16);
*/
  return self;
}

/*****************************************************************************/
/* free the font and all the items */
void APP_CC
xrdp_font_delete(struct xrdp_font* self)
{
  int i;

  if (self == 0)
  {
    return;
  }
  for (i = 0; i < 256; i++)
  {
    g_free(self->font_items[i].data);
  }
  g_free(self);
}

/*****************************************************************************/
/* compare the two font items returns 1 if they match */
int APP_CC
xrdp_font_item_compare(struct xrdp_font_char* font1,
                       struct xrdp_font_char* font2)
{
  int datasize;

  if (font1 == 0)
  {
    return 0;
  }
  if (font2 == 0)
  {
    return 0;
  }
  if (font1->offset != font2->offset)
  {
    return 0;
  }
  if (font1->baseline != font2->baseline)
  {
    return 0;
  }
  if (font1->width != font2->width)
  {
    return 0;
  }
  if (font1->height != font2->height)
  {
    return 0;
  }
  datasize = FONT_DATASIZE(font1);
  if (g_memcmp(font1->data, font2->data, datasize) == 0)
  {
    return 1;
  }
  return 0;
}