/*
    Copyright (c) 2008-2022 Jan W. Krieger (<jan@jkrieger.de>)

    

    This software is free software: you can redistribute it and/or modify
    it under the terms of the GNU Lesser General Public License (LGPL) as published by
    the Free Software Foundation, either version 2.1 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 Lesser General Public License (LGPL) for more details.

    You should have received a copy of the GNU Lesser General Public License (LGPL)
    along with this program.  If not, see <http://www.gnu.org/licenses/>.
*/



#include "jkqtmathtext/nodes/jkqtmathtextsqrtnode.h"
#include "jkqtmathtext/jkqtmathtexttools.h"
#include "jkqtmathtext/jkqtmathtext.h"
#include "jkqtcommon/jkqtpcodestructuring.h"
#include "jkqtcommon/jkqtpstringtools.h"
#include <cmath>
#include <QFontMetricsF>
#include <QDebug>
#include <QFontDatabase>
#include <QFontInfo>
#include <QApplication>
#include <QFont>




JKQTMathTextSqrtNode::JKQTMathTextSqrtNode(JKQTMathText* _parent, JKQTMathTextNode* child__, JKQTMathTextNode *childDegree__):
    JKQTMathTextMultiChildNode(_parent),
    child(child__), childDegree(childDegree__)
{
    if (child) child->setParentNode(this);
    if (childDegree) childDegree->setParentNode(this);
}

JKQTMathTextSqrtNode::~JKQTMathTextSqrtNode() {
    if (child) { delete child; }
    child=nullptr;
    if (childDegree) { delete childDegree; }
    childDegree=nullptr;
}

JKQTMathTextNodeSize JKQTMathTextSqrtNode::getSizeInternal(QPainter& painter, JKQTMathTextEnvironment currentEv) const {
    JKQTMathTextNodeSize s;
    const QFontMetricsF fm(currentEv.getFont(parentMathText), painter.device());
    JKQTMathTextEnvironment evSmall=currentEv;
    evSmall.fontSize=currentEv.fontSize*parentMathText->getSqrtSmallFontFactor();
    evSmall.italic=false;

    const JKQTMathTextNodeSize cs=getChild()->getSize(painter, currentEv);
    const double descent=cs.getDescent();
    const double sqrtwidth=fm.boundingRect("X").width()*parentMathText->getSqrtWidthXFactor();
    const double newAscent=qMax(cs.baselineHeight*parentMathText->getSqrtHeightFactor(), fm.ascent());
    const double newDescent=qMax(descent*parentMathText->getSqrtHeightFactor(), fm.descent());

    s.overallHeight=newAscent+newDescent;
    s.baselineHeight=newAscent;
    s.width=cs.width+sqrtwidth;
    s.strikeoutPos=cs.strikeoutPos;
    if (childDegree) {
        const JKQTMathTextNodeSize ds=childDegree->getSize(painter, evSmall);
        const double smalltextIndent=0.6*sqrtwidth;
        if (ds.width>smalltextIndent) s.width=s.width+(ds.width-smalltextIndent);
    }
    return s;
}

double JKQTMathTextSqrtNode::draw(QPainter& painter, double x, double y, JKQTMathTextEnvironment currentEv) const {
    doDrawBoxes(painter, x, y, currentEv);

    const QFont f=currentEv.getFont(parentMathText);
    const QFontMetricsF fm(f, painter.device());
    JKQTMathTextEnvironment evSmall=currentEv;
    evSmall.fontSize=currentEv.fontSize*parentMathText->getSqrtSmallFontFactor();
    evSmall.italic=false;

    const JKQTMathTextNodeSize cs=getChild()->getSize(painter, currentEv);
    const double descent=cs.overallHeight-cs.baselineHeight;
    const double sqrtwidth=fm.boundingRect("X").width()*parentMathText->getSqrtWidthXFactor();
    const double newAscent=qMax(cs.baselineHeight*parentMathText->getSqrtHeightFactor(), fm.ascent());
    const double newDescent=qMax(descent*parentMathText->getSqrtHeightFactor(), fm.descent());
    const double linewidth=fm.lineWidth();
    const double tinyhookSize=sqrtwidth*0.1;
    const double smalltextIndent=0.6*sqrtwidth;

    JKQTMathTextNodeSize ds;
    if (childDegree) ds=childDegree->getSize(painter, evSmall);
    const double degheight=ds.overallHeight;
    const double degree_overwidth=(ds.width>smalltextIndent)?(ds.width-smalltextIndent):0.0;

    //painter.save(); auto __finalpaint=JKQTPFinally([&painter]() {painter.restore();});
    QPen p=painter.pen();
    p.setColor(currentEv.color);
    p.setWidthF(linewidth);
    p.setCapStyle(Qt::RoundCap);
    p.setJoinStyle(Qt::RoundJoin);
    //painter.setPen(p);

    double xnew=getChild()->draw(painter, x+sqrtwidth+degree_overwidth, y, currentEv);

    const bool useAltForm=cs.overallHeight>4.0*sqrtwidth;
    const double y_tinyhooktop=y-cs.strikeoutPos;
    const double y_bottom=y+newDescent-linewidth/2.0;
    const double y_top=y-newAscent+linewidth/2.0;
    const double x_start=x+degree_overwidth+linewidth/2.0;
    const double x_tinyhooktop=x_start+tinyhookSize;
    const double x_hookbottom=(!useAltForm)?(x_start+0.33*sqrtwidth):(x_start+0.66*sqrtwidth);
    const double x_hooktop=(!useAltForm)?(x_start+sqrtwidth):x_hookbottom;
    const double x_smalltextend=x_start+smalltextIndent;
    const double y_smalltext=y_top+ds.baselineHeight+(fabs(y_top-(y_tinyhooktop-linewidth))-degheight)/2.0;
    if (sqrtwidth>0) {
        QPainterPath path;
        path.moveTo(x_start, y_tinyhooktop+tinyhookSize);
        path.lineTo(x_tinyhooktop, y_tinyhooktop);
        path.lineTo(x_hookbottom, y_bottom);
        path.lineTo(x_hooktop, y_top);
        path.lineTo(xnew-linewidth/2.0, y_top);
        path.moveTo(x_tinyhooktop,y_tinyhooktop);
        path.lineTo(x_tinyhooktop+linewidth*0.8, y_tinyhooktop-linewidth*0.8);
        path.lineTo(x_hookbottom, y_bottom-2.0*linewidth);
        painter.setPen(p);
        painter.drawPath(path);
    }
    if (childDegree) {
        childDegree->draw(painter, x_smalltextend-ds.width, y_smalltext, evSmall);
    }

    return xnew;
}

bool JKQTMathTextSqrtNode::toHtml(QString &html, JKQTMathTextEnvironment currentEv, JKQTMathTextEnvironment defaultEv) const {
    bool ok=true;
    if (childDegree) {
        JKQTMathTextEnvironment evSmall=currentEv;
        evSmall.fontSize=currentEv.fontSize*parentMathText->getSqrtSmallFontFactor();
        evSmall.italic=false;
        html=html+"<sup>";
        ok=ok&&childDegree->toHtml(html, evSmall, defaultEv);
        html=html+"</sup>";
    }
    html=html+"&radic;<span style=\"text-decoration:overline\">";
    ok=ok&&getChild()->toHtml(html, currentEv, defaultEv);
    html=html+"&nbsp;</span>";
    return ok;
}

QString JKQTMathTextSqrtNode::getTypeName() const
{
    return "MTsqrtNode";
}

JKQTMathTextNode *JKQTMathTextSqrtNode::getChild()
{
    return child;
}

const JKQTMathTextNode *JKQTMathTextSqrtNode::getChild() const
{
    return child;
}

JKQTMathTextNode *JKQTMathTextSqrtNode::getChildDegree()
{
    return childDegree;
}

const JKQTMathTextNode *JKQTMathTextSqrtNode::getChildDegree() const
{
    return childDegree;
}

JKQTMathTextNode *JKQTMathTextSqrtNode::getChild(int i)
{
    if (i==0) return child;
    if (i==1) return childDegree;
    return nullptr;
}

const JKQTMathTextNode *JKQTMathTextSqrtNode::getChild(int i) const
{
    if (i==0) return child;
    if (i==1) return childDegree;
    return nullptr;
}

JKQTMathTextNode *JKQTMathTextSqrtNode::replaceChild(int i, JKQTMathTextNode *newChild)
{
    if (i==0) {
        JKQTMathTextNode* c=child;
        child=newChild;
        if (child) child->setParentNode(this);
        return c;
    }
    if (i==1) {
        JKQTMathTextNode* c=childDegree;
        childDegree=newChild;
        if (childDegree) childDegree->setParentNode(this);
        return c;
    }
    return nullptr;
}

int JKQTMathTextSqrtNode::childCount() const
{
    if (childDegree) return 2;
    return 1;
}

void JKQTMathTextSqrtNode::clearChildren(bool deleteChildren)
{
    if (child) {
        if (deleteChildren) delete child;
        child=nullptr;
    }
    if (childDegree) {
        if (deleteChildren) delete childDegree;
        childDegree=nullptr;
    }
}

void JKQTMathTextSqrtNode::deleteChild(int i)
{
    if (child && i==0) {
        delete child;
        child=nullptr;
    }
    if (childDegree && i==1) {
        delete childDegree;
        childDegree=nullptr;
    }
}