// Font.cc
// Copyright (c) 2002 Henrik Kinnunen (fluxgen@linuxmail.org)
// 
// Permission is hereby granted, free of charge, to any person obtaining a
// copy of this software and associated documentation files (the "Software"),
// to deal in the Software without restriction, including without limitation
// the rights to use, copy, modify, merge, publish, distribute, sublicense,
// and/or sell copies of the Software, and to permit persons to whom the
// Software is furnished to do so, subject to the following conditions:
//
// The above copyright notice and this permission notice shall be included in
// all copies or substantial portions of the Software.
//
// THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
// IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
// FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.  IN NO EVENT SHALL
// THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
// LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
// FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
// DEALINGS IN THE SOFTWARE.

//$Id: Font.cc,v 1.18 2002/10/24 11:30:45 fluxgen Exp $


#include "Font.hh"
#include "FontImp.hh"

#ifdef    HAVE_CONFIG_H
#include "../config.h"
#endif // HAVE_CONFIG_H

// for antialias 
#ifdef USE_XFT
#include "XftFontImp.hh"
#endif // USE_XFT

// standard font system
#include "XFontImp.hh"
#include "XmbFontImp.hh"

#include "StringUtil.hh"

//use gnu extensions
#ifndef _GNU_SOURCE
#define _GNU_SOURCE
#endif //_GNU_SOURCE

#ifndef __USE_GNU
#define __USE_GNU
#endif //__USE_GNU

#include <iostream> 
#include <cstring>
#include <cstdlib>
using namespace std;

#ifdef HAVE_SETLOCALE
#include <locale.h>
#endif //HAVE_SETLOCALE



namespace FbTk {

bool Font::m_multibyte = false; 
bool Font::m_utf8mode = false;

Font::Font(const char *name, bool antialias):
m_fontimp(0),
m_antialias(false) {
	
	// MB_CUR_MAX returns the size of a char in the current locale
	if (MB_CUR_MAX > 1) // more than one byte, then we're multibyte
		m_multibyte = true;

	char *s; // temporary string for enviroment variable
	// check for utf-8 mode
	if (((s = getenv("LC_ALL")) && *s) ||
		((s = getenv("LC_CTYPE")) && *s) ||
		((s = getenv("LANG")) && *s)) {
		if (strstr(s, "UTF-8"))
			m_utf8mode = true;
	}

	// create the right font implementation
	// antialias is prio 1
#ifdef USE_XFT
	if (antialias) {
		m_fontimp.reset(new XftFontImp(0, m_utf8mode));
		m_antialias = true;
	}
#endif //USE_XFT
	// if we didn't create a Xft font then create basic font
	if (m_fontimp.get() == 0) {
		if (m_multibyte || m_utf8mode)
			m_fontimp.reset(new XmbFontImp(0, m_utf8mode));
		else // basic font implementation
			m_fontimp.reset(new XFontImp());
	}
	
	if (name != 0) {
		load(name);
	}

}

Font::~Font() {

}

void Font::setAntialias(bool flag) {
	bool loaded = m_fontimp->loaded();
#ifdef USE_XFT
	if (flag && !isAntialias()) {
		m_fontimp.reset(new XftFontImp(m_fontstr.c_str(), m_utf8mode));
	} else if (!flag && isAntialias()) 
#endif // USE_XFT
	{
		if (m_multibyte || m_utf8mode)
			m_fontimp.reset(new XmbFontImp(m_fontstr.c_str(), m_utf8mode));
		else {
			m_fontimp.reset(new XFontImp(m_fontstr.c_str()));
		}
	}

	if (m_fontimp->loaded() != loaded) { // if the new font failed to load, fall back to 'fixed'
		if (!m_fontimp->load("fixed")) // if that failes too, output warning
			cerr<<"Warning: can't load fallback font 'fixed'."<<endl;
	}

	m_antialias = flag;
}

bool Font::load(const char *name) {
	if (name == 0)
		return false;
	bool ret_val = m_fontimp->load(name);
	if (ret_val && name == 0) { //prevent from having a bad fontimp
		m_fontstr = name; // if the load really succeded then set font string
	} else {
		m_fontstr = "";
	}

	return ret_val;
}

unsigned int Font::textWidth(const char * const text, unsigned int size) const {
	return m_fontimp->textWidth(text, size);
}

unsigned int Font::height() const {
	return m_fontimp->height();
}

int Font::ascent() const {
	return m_fontimp->ascent();
}

int Font::descent() const { 
	return m_fontimp->descent();
}
void Font::drawText(Drawable w, int screen, GC gc, const char *text, size_t len, int x, int y) const {
	if (text == 0 || len == 0)
		return;
	m_fontimp->drawText(w, screen, gc, text, len, x, y);		
}	

};