/*
 * Copyright (C) 2008 Emweb bvba, Kessel-Lo, Belgium.
 *
 * See the LICENSE file for terms of use.
 */
#include <boost/lexical_cast.hpp>

#include "Wt/WFont"
#include "Wt/WStringStream"
#include "Wt/WWebWidget"

#include "DomElement.h"

namespace Wt {

WFont::WFont()
  : widget_(0),
    genericFamily_(Default),
    style_(NormalStyle),
    variant_(NormalVariant),
    weight_(NormalWeight),
    weightValue_(400),
    size_(Medium),
    familyChanged_(false),
    styleChanged_(false),
    variantChanged_(false),
    weightChanged_(false),
    sizeChanged_(false)
{ }

WFont::WFont(GenericFamily family)
  : widget_(0),
    genericFamily_(family),
    style_(NormalStyle),
    variant_(NormalVariant),
    weight_(NormalWeight),
    weightValue_(400),
    size_(Medium),
    familyChanged_(false),
    styleChanged_(false),
    variantChanged_(false),
    weightChanged_(false),
    sizeChanged_(false)
{ }

void WFont::setWebWidget(WWebWidget *w)
{
  widget_ = w;
}

bool WFont::operator==(const WFont& other) const
{
  return
       genericFamily_    == other.genericFamily_
    && specificFamilies_ == other.specificFamilies_
    && style_            == other.style_
    && variant_          == other.variant_
    && weight_           == other.weight_
    && weightValue_      == other.weightValue_
    && size_             == other.size_
    && sizeLength_       == other.sizeLength_;
}

bool WFont::operator!=(const WFont& other) const
{
  return !(*this == other);
}

void WFont::setFamily(GenericFamily genericFamily,
		      const WString& specificFamilies)
{
  genericFamily_ = genericFamily;
  specificFamilies_ = specificFamilies;
  familyChanged_ = true;
  if (widget_) widget_->repaint(RepaintPropertyAttribute);
}

void WFont::setStyle(Style style)
{
  style_ = style;
  styleChanged_ = true;
  if (widget_) widget_->repaint(RepaintPropertyAttribute);
}

void WFont::setVariant(Variant variant)
{
  variant_ = variant;
  variantChanged_ = true;
  if (widget_) widget_->repaint(RepaintPropertyAttribute);
}

void WFont::setWeight(Weight weight, int value)
{
  weight_ = weight;
  weightValue_ = value;
  weightChanged_ = true;
  if (widget_) widget_->repaint(RepaintPropertyAttribute);
}

WFont::Weight WFont::weight() const
{
  if (weight_ != Value)
    return weight_;
  else
    return weightValue_ >= 700 ? WFont::Bold : WFont::NormalWeight;
}

int WFont::weightValue() const
{
  switch (weight_) {
  case NormalWeight:
  case Lighter:
    return 400;
  case Bold:
  case Bolder:
    return 700;
  case Value:
    return weightValue_;
  }

  assert(false);
  return -1;
}

void WFont::setSize(Size size, const WLength& length)
{
  if (size == FixedSize)
    setSize(length);
  else
    setSize(size);
}

void WFont::setSize(Size size)
{
  size_ = size;
  sizeLength_ = WLength::Auto;
  sizeChanged_ = true;
  if (widget_) widget_->repaint(RepaintPropertyAttribute);
}

void WFont::setSize(const WLength& size)
{
  size_ = FixedSize;
  sizeLength_ = size;
  sizeChanged_ = true;
  if (widget_) widget_->repaint(RepaintPropertyAttribute);
}

WFont::Size WFont::size(double mediumSize) const
{
  if (size_ != FixedSize)
    return size_;
  else {
    double pixels = sizeLength_.toPixels();

    if (pixels == mediumSize)
      return Medium;
    else if (pixels > mediumSize) {
      if (pixels < 1.2 * 1.19 * mediumSize)
	return Large;
      else if (pixels < 1.2 * 1.2 * 1.19 * mediumSize)
	return XLarge;
      else
	return XXLarge;
    } else {
      if (pixels > mediumSize / 1.2 / 1.19)
	return Small;
      else if (pixels > mediumSize / 1.2 / 1.2 / 1.19)
	return XSmall;
      else
	return XXSmall;
    }
  }
}

WLength WFont::fixedSize() const
{
  return sizeLength();
}

WLength WFont::sizeLength(double mediumSize) const
{
  switch (size_) {
  case FixedSize:
    return sizeLength_;
  case XXSmall:
    return WLength(mediumSize / 1.2 / 1.2 / 1.2);
  case XSmall:
    return WLength(mediumSize / 1.2 / 1.2);
  case Small:
    return WLength(mediumSize / 1.2);
  case Medium:
    return WLength(mediumSize);
  case Large:
    return WLength(mediumSize * 1.2);
  case XLarge:
    return WLength(mediumSize * 1.2 * 1.2);
  case XXLarge:
    return WLength(mediumSize * 1.2 * 1.2 * 1.2);    
  case Smaller:
    return WLength(1 / 1.2, WLength::FontEm);
  case Larger:
    return WLength(1.2, WLength::FontEm);
  }

  assert(false);
  return WLength();
}

void WFont::updateDomElement(DomElement& element, bool fontall, bool all)
{
  if (familyChanged_ || fontall || all) {
    std::string family = cssFamily(fontall);

    if (!family.empty())
      element.setProperty(PropertyStyleFontFamily, family);

    familyChanged_ = false;
  }

  if (styleChanged_ || fontall || all) {
    std::string style = cssStyle(fontall);

    if (!style.empty())
      element.setProperty(PropertyStyleFontStyle, style);

    styleChanged_ = false;
  }

  if (variantChanged_ || fontall || all) {
    std::string variant = cssVariant(fontall);

    if (!variant.empty())
      element.setProperty(PropertyStyleFontVariant, variant);

    variantChanged_ = false;
  }

  if (weightChanged_ || fontall || all) {
    std::string weight = cssWeight(fontall);

    if (!weight.empty())
      element.setProperty(PropertyStyleFontWeight, weight);

    weightChanged_ = false;
  }

  if (sizeChanged_ || fontall || all) {
    std::string size = cssSize(fontall);

    if (!size.empty())
      element.setProperty(PropertyStyleFontSize, size);

    sizeChanged_ = false;
  }
}

std::string WFont::cssStyle(bool all) const
{
  switch (style_) {
  case NormalStyle:
    if (styleChanged_ || all)
      return "normal";
    break;
  case Italic: return "italic";
  case Oblique: return "oblique";
  }

  return std::string();
}

std::string WFont::cssVariant(bool all) const
{
  switch (variant_) {
  case NormalVariant:
    if (variantChanged_ || all)
      return "normal";
    break;
  case SmallCaps:
    return "small-caps";
  }

  return std::string();
}


std::string WFont::cssWeight(bool all) const
{
  switch (weight_) {
  case NormalWeight:
    if (weightChanged_ || all)
      return "normal";
    break;
    case Bold: return "bold";
    case Bolder:return "bolder";
    case Lighter: return "lighter";
    case Value: {
      int v = std::min(900, std::max(100, ((weightValue_ / 100))*100));
      return boost::lexical_cast<std::string>(v);
    }
  }

  return std::string();
}

std::string WFont::cssSize(bool all) const
{
  switch (size_) {
  case Medium:
    if (sizeChanged_ || all)
      return "medium";
    break;
  case XXSmall: return "xx-small";
  case XSmall: return "x-small";
  case Small: return "small";
  case Large: return "large" ;
  case XLarge: return "x-large" ;
  case XXLarge: return "xx-large";
  case Smaller: return "smaller";
  case Larger: return "larger";
  case FixedSize: return sizeLength_.cssText();
  }

  return std::string();
}

std::string WFont::cssFamily(bool all) const
{
  std::string family = specificFamilies_.toUTF8();

  if ((!family.empty()) &&
      genericFamily_ != Default)
    family += ',';

  switch (genericFamily_) {
  case Default:
    break;
  case Serif:
    family += "serif"; break;
  case SansSerif:
    family += "sans-serif"; break;
  case Cursive:
    family += "cursive"; break;
  case Fantasy:
    family += "fantasay"; break;
  case Monospace:
    family += "monospace"; break;
  }

  return family;
}

const std::string WFont::cssText(bool combined) const
{
  WStringStream result;

  if (combined) {
    std::string s;
    s = cssStyle(false);
    if (!s.empty())
      result << s << ' ';

    s = cssVariant(false);
    if (!s.empty())
      result << s << ' ';

    s = cssWeight(false);
    if (!s.empty())
      result << s << ' ';

    result << cssSize(true) << ' ';

    s = cssFamily(true);
    if (!s.empty())
      result << s << ' ';
    else
      result << s << " inherit";
  } else {
    std::string s;
    s = cssSize(false);
    if (!s.empty())
      result << "font-size: " << s << ";";

    s = cssStyle(false);
    if (!s.empty())
      result << "font-style: " << s << ";";

    s = cssVariant(false);
    if (!s.empty())
      result << "font-variant: " << s << ";";

    s = cssWeight(false);
    if (!s.empty())
      result << "font-weight: " << s << ";";

    // Last because of workaround in WVmlImage that searches for a ','
    s = cssFamily(false);
    if (!s.empty())
      result << "font-family: " << s << ";";

  }

  return result.str();
}

}
