/******************************************************************************
 *
 * Copyright (c) 2015 Antillia.com TOSHIYUKI ARAI. ALL RIGHTS RESERVED.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions
 * are met:
 * 1. Redistributions of source code must retain the above copyright
 *    notice, this list of conditions, and the following disclaimer.
 *
 * 2. The name of the author may not be used to endorse or promote products
 *    derived from this software without specific prior written permission.
 *
 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
 * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
 * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS;
 * OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
 * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
 * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF
 * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
 *
 *
 *      FTPicture.h
 *
 *****************************************************************************/


#pragma once

#include <oz++/CharString.h>
#include <oz++/Exception.h>
#include <oz++/xft/FTResource.h>
#include <oz++/xft/FTPattern.h>

#include <oz++/xft/FTNames.h>

namespace OZ {

class FTRendition :public FTResource {
private:
  XftFont*   font;
  CharString string;  //string for fontconfigpattern or xlfd

  FTPattern* pattern;
  
public:
  FTFont(Display* display, Args& args)
  :FTResource(display),
   font(NULL),
   string(""),
   pattern(new FTPattern())
  { 
    const char* name = (const char*)args.get(XftNfamily);
    double size      = (double)args.get(XftNsize);
    
    if (name == NULL) {
      name = "Times";
      args.set(XftNfamily, name);
    }
    if (size <= 0.0) {
      size = 10.0;
      args.set(XftNsize, size);
    }
    pattern -> add(args);
    
    FcPattern* matchedPattern = pattern->match(display);
    //printf("FreeTypeFont %lx %lx \n", (long)pattern->get(), (long)matchedPattern);

    this -> font = XftFontOpenPattern(display, matchedPattern);
    
    if (this -> font ==NULL) {
      FcPatternDestroy(matchedPattern);
      throw IException("Failed to XftFontOpen family=%s, size%f", name, size);
    }
    delete pattern;
    pattern = new FTPattern(matchedPattern);
  }
  
public:
  //name is for fontconfig or xlfd
  FTFont(Display* display, const char* name)
  :FTResource(display),
  font(NULL),
  string(""),
  pattern(NULL)
  {
    if (name) {
      string = name;
    int screen = defaultScreen();
    this -> font = XftFontOpenName(display, screen, name);  //string for config pattern;
      if (this -> font == NULL) {
        printf("Failed to XftFontOpenName=%s", name);
        this -> font = XftFontOpenXlfd(display, screen, name); //string for an X Logical Font Description (XLFD), "fixed"?
        if (this -> font == NULL) {
          throw IException("Failed to XftFontOpenXlfd name=%s", name);
        }
      }
    } else {
      throw IException("Invalid argument");
    }
  }
  
  ~FTFont()
  {
    if (pattern) {
      delete pattern;
      pattern = NULL;
    }

    if (font) {
      XftFontClose (getDisplay(), font);
      font = NULL;
    }
  }
  
  XftFont* get()
  {
    return font;
  }
  
  
/*  XftFont* operator (XftFont*)()
  {
    return font;
  }
 */

  XftFont* copy()
  {
    return XftFontCopy(getDisplay(), font);
  }
  
  FT_Face lockFace()
  {
   return XftLockFace (font);
  }
  
  void unlockFace()
  {
    XftUnlockFace(font);
  }
  
/*
typedef struct _XGlyphInfo {
    unsigned short  width;
    unsigned short  height;
    short      x;
    short      y;
    short      xOff;
    short      yOff;
} XGlyphInfo;
  */
  void glyphExtents(
         const unsigned int    *glyphs,
         int            nglyphs,
         XGlyphInfo     *extents)
  {
    XftGlyphExtents(getDisplay(),
         font,
         (_Xconst FT_UInt*)glyphs,
         nglyphs,
         extents);
  }
  
  void textExtents8(
         _Xconst FcChar8    *string,
         int            len,
         XGlyphInfo     *extents)
  {
    XftTextExtents8 (getDisplay(),
         font,
         (_Xconst FcChar8*)string,
         len,
         extents);
  }
  
  void textExtents16(
          const unsigned short  *string,
          int           len,
          XGlyphInfo        *extents)
  {
    XftTextExtents16 (getDisplay(),
          font,
          (_Xconst FcChar16*)string,
          len,
          extents);
  }
  
  void textExtents32(
          const int32_t  *string,
          int           len,
          XGlyphInfo        *extents)
  {
     XftTextExtents32 (getDisplay(),
          font,
          (_Xconst FcChar32 *)string,
          len,
          extents);
          
  }
         
  void textExtentsUtf8(
            const char *string,
            int         len,
            XGlyphInfo      *extents)
  {
    XftTextExtentsUtf8 (getDisplay(),
            font,
            (_Xconst FcChar8 *)string,
            len,
            extents);
  }
  
  void textExtentsUtf16(
             const char  *string,
             FcEndian       endian,
             int        len,
             XGlyphInfo     *extents)
  {
    XftTextExtentsUtf16 (getDisplay(),
             font,
             ( _Xconst FcChar8*)string,
             endian,
             len,
             extents);
  }
  

};

}