package com.hfg.xml.msofficexml.docx.wordprocessingml.style;

import com.hfg.css.*;
import com.hfg.graphics.units.GfxSize;
import com.hfg.graphics.units.GfxUnits;
import com.hfg.graphics.units.Pixels;
import com.hfg.graphics.units.Points;
import com.hfg.html.attribute.HTMLColor;
import com.hfg.graphics.ColorUtil;
import com.hfg.util.StringUtil;
import com.hfg.xml.XMLName;
import com.hfg.xml.XMLTag;
import com.hfg.xml.msofficexml.docx.DocxException;
import com.hfg.xml.msofficexml.docx.wordprocessingml.WmlXML;

import java.awt.Color;
import java.util.ArrayList;
import java.util.List;
import java.util.regex.Matcher;
import java.util.regex.Pattern;


// Section 17.3.4 (pg. 351) of Ecma Office Open XML Part 1

public class WmlTableCellBorder
{
   private Position     mPosition;
   private WmlLineBorderStyle mStyle;
   private Integer      mSize;
   private Integer      mSpace;
   private Color        mColor;
   private Boolean      mAutoColor;

   public static enum Position {
      top,
      bottom,
      left,
      right,
      start,
      end,
      insideH,
      insideV,
      tl2br,    // Top left to bottom right (diagonal)
      tr2bl     // Top right to bottom left (diagonal)
   }

   private static final Pattern sizePattern = Pattern.compile("(\\d+)(px)?");

   //---------------------------------------------------------------------------
   public WmlTableCellBorder()
   {
      init();
   }

   //---------------------------------------------------------------------------
   public WmlTableCellBorder(CSSDeclaration inCSSDeclaration)
   {
      this();

      if (inCSSDeclaration.getProperty().equals(CSSProperty.border))
      {
         // Don't set a value for position. It will be expanded into top, bottom, left, right
      }
      else if (inCSSDeclaration.getProperty().equals(CSSProperty.border_top))
      {
         setPosition(Position.top);
      }
      else if (inCSSDeclaration.getProperty().equals(CSSProperty.border_bottom))
      {
         setPosition(Position.bottom);
      }
      else if (inCSSDeclaration.getProperty().equals(CSSProperty.border_left))
      {
         setPosition(Position.left);
      }
      else if (inCSSDeclaration.getProperty().equals(CSSProperty.border_right))
      {
         setPosition(Position.right);
      }
      else
      {
         throw new CSSException("The CSS declaration " + StringUtil.singleQuote(inCSSDeclaration.toString())
                                + " cannot be used to construct a " + this.getClass().getSimpleName() + " object!");
      }

      // Ex: '1px solid blue'

      boolean findSize  = true;
      boolean findStyle = true;
      boolean findColor = true;

      String[] valuePieces = inCSSDeclaration.getValue().split("\\s+");
      for (int i = 0; i < valuePieces.length; i++)
      {
         String token = valuePieces[i];

         if (findSize)
         {
            findSize = false; // Size should always come first
            Matcher m = sizePattern.matcher(token);
            if (m.matches())
            {
               setSize(new Pixels(Integer.parseInt(m.group(1))));
               continue;
            }
         }

         if (findStyle)
         {
            findStyle = false;
            CSSBorderStyle style = CSSBorderStyle.valueOf(token);
            if (style != null)
            {
               WmlLineBorderStyle wmlStyle = WmlLineBorderStyle.valueOf(style);
               if (wmlStyle != null)
               {
                  setStyle(wmlStyle);
               }
               continue;
            }

         }

         if (findColor)
         {
            findColor = false;
            if (token.equals("transparent"))
            {
               // I would set this to null but that seems to result in a black border
               setColor(Color.WHITE);
            }
            else
            {
               HTMLColor color = HTMLColor.valueOf(token);
               if (color != null)
               {
                  setColor(color);
               }
            }
         }
      }
   }

   //---------------------------------------------------------------------------
   private void init()
   {
      // Set some default values
      setStyle(WmlLineBorderStyle.single);
      setSize(new Points(1));
      setColor(Color.black);
   }

   //---------------------------------------------------------------------------
   /**
    * If a position is not specified via this method, a complete border set (top, end, bottom, and start) will be generated.
    * @param inValue the border position
    */
   public WmlTableCellBorder setPosition(Position inValue)
   {
      mPosition = inValue;
      return this;
   }

   //---------------------------------------------------------------------------
   /**
    * Specifies the width of the border in eighths of a point, with a minimum value
    * of 1/4 of a point and a maximum value of twelve points.
    * @param inValue width of the border
    */
   public WmlTableCellBorder setSize(GfxSize inValue)
   {
      int eighthOfAPointValue = (int) (inValue.to(GfxUnits.points) * 8);
      if (eighthOfAPointValue < 2)
      {
         throw new DocxException("The border size must be between 1/4 to 12 points!");
      }

      mSize = eighthOfAPointValue;
      return this;
   }

   //---------------------------------------------------------------------------
   public WmlTableCellBorder setStyle(WmlLineBorderStyle inValue)
   {
      mStyle = inValue;
      return this;
   }

   //---------------------------------------------------------------------------
   public WmlTableCellBorder setColor(Color inValue)
   {
      mColor = inValue;
      return this;
   }

   //---------------------------------------------------------------------------
   public WmlTableCellBorder setAutoColor(boolean inValue)
   {
      mAutoColor = inValue;
      return this;
   }

   //---------------------------------------------------------------------------
   /**
    * The padding (in points) between the text and the border.
    * @param inValue padding (in points)
    */
   public WmlTableCellBorder setSpace(int inValue)
   {
      mSpace = inValue;
      return this;
   }

   //---------------------------------------------------------------------------
   public List<XMLTag> toXMLTags()
   {
      List<XMLTag> tags = new ArrayList<XMLTag>(4);

      List<Position> positions =  new ArrayList<Position>(4);
      if (mPosition != null)
      {
         positions.add(mPosition);
      }
      else
      {
         positions.add(Position.top);
         // The spec says to use start & end but those seem to cause errors
//         positions.add(Position.start);
//         positions.add(Position.end);
         positions.add(Position.left);
         positions.add(Position.right);
         positions.add(Position.bottom);
      }

      for (Position position : positions)
      {
         XMLTag tag = new XMLTag(new XMLName(position.name(), WmlXML.WORDPROCESSINGML_NAMESPACE));

         if (mSize != null)
         {
            tag.setAttribute(WmlXML.SIZE_ATT, mSize);
         }

         if (mStyle != null)
         {
            tag.setAttribute(WmlXML.VALUE_ATT, mStyle.name());
         }

         if (mSpace != null)
         {
            tag.setAttribute(WmlXML.SPACE_ATT, mSpace);
         }

         if (mColor != null)
         {
            tag.setAttribute(WmlXML.COLOR_ATT, ColorUtil.colorToHex(mColor));
         }
         else if (mAutoColor != null
               && mAutoColor)
         {
            tag.setAttribute(WmlXML.COLOR_ATT, "auto");
         }

         tags.add(tag);
      }

      return tags;
   }
}