/**
 * Created by G-Canvas Open Source Team.
 * Copyright (c) 2017, Alibaba, Inc. All rights reserved.
 *
 * This source code is licensed under the Apache Licence 2.0.
 * For the full copyright and license information, please view
 * the LICENSE file in the root directory of this source tree.
 */
#include "GFont.h"
#include "GCanvas.hpp"
#include "GFontCache.h"
#include "support/CharacterSet.h"
#include "GFontManagerAndroid.h"
#include "GCanvas2DContextAndroid.h"
#include "gcanvas/GFontManager.h"
#include "gcanvas/GCanvas2dContext.h"
#include "support/Log.h"
#include "support/CharacterSet.h"
#include "gcanvas/GTextDefine.h"

#include <assert.h>
GFontManagerAndroid::GFontManagerAndroid(GCanvasContext *context) : GFontManager(context) {

}


GFontManagerAndroid::~GFontManagerAndroid() {
    mTreemap.Clear();
    mGlyphCache.ClearGlyphsTexture();
}


void GFontManagerAndroid::DrawText(const unsigned int *ucs,
                                   unsigned int ucsLength, float x, float y,
                                   bool isStroke, gcanvas::GFontStyle *fontStyle) {
    if (ucs == nullptr || ucsLength == 0) {
        return;
    }
    std::vector<GFont *> fonts;

    for (unsigned int i = 0; i < ucsLength; ++i) {
        if (isCharcodeEmoji(ucs, ucsLength, i)) {
            fonts.push_back(GetEmojiFont(ucs[i], fontStyle));

            // need this at the first glance to make sure the mFace of the first
            // emoji after a text is not nullptr when the first emoji run GetSizeRatio()
            fonts[i]->GetGlyph(ucs[i], isStroke);
        } else {
            fonts.push_back(GetFontByCharCode(ucs[i], fontStyle));
        }
    }

    AdjustTextPenPoint(fonts, ucs, ucsLength, isStroke, x, y);

    for (unsigned int i = 0; i < ucsLength; ++i) {
        if (ucs[i] == UCS4_EMOJI_SELECTOR ||
            ucs[i] == UCS4_TEXT_SELECTOR ||
            ucs[i] == UCS4_ZERO_WIDTH_JOINER
        ) {
            continue;
        }

        if (i < ucsLength - 2 && ucs[i + 2] == UCS4_COMBINING_ENCLOSING_KEYCAP) {
            // ref to (U+0031 U+FE0F U+20E3) in https://projects.iamcal.com/emoji-data/table.htm
            FillTextInternal(fonts[i + 2], isStroke, ucs[i + 2], x, y);
            FillTextInternal(fonts[i], isStroke, ucs[i], x, y);
            i += 2;
        } else {
            FillTextInternal(fonts[i], isStroke, ucs[i], x, y);
        }
    }
}


float *GFontManagerAndroid::MeasureTextWidthHeight(const char *text, unsigned int textLength,
                                                   gcanvas::GFontStyle *fontStyle) {
    if (text == nullptr || textLength == 0) {
        float *ret = new float[4];
        ret[0] = ret[1] = ret[2] = ret[3] = 0.0;
        return ret;
    }

    Utf8ToUCS4 *lbData = new Utf8ToUCS4(text, textLength);
    unsigned int *ucs = lbData->ucs4;
    unsigned int ucsLength = lbData->ucs4len;

    std::vector<GFont *> fonts;

    for (unsigned int i = 0; i < ucsLength; ++i) {
        if (isCharcodeEmoji(ucs, ucsLength, i)) {
            fonts.push_back(GetEmojiFont(ucs[i], fontStyle));
        } else {
            fonts.push_back(GetFontByCharCode(ucs[i], fontStyle));
        }
    }

    float deltaX = 0;
    float maxHeight = 0;
    for (unsigned int i = 0; i < ucsLength; ++i) {
        if (ucs[i] == UCS4_EMOJI_SELECTOR ||
            ucs[i] == UCS4_TEXT_SELECTOR ||
            ucs[i] == UCS4_ZERO_WIDTH_JOINER ||
            ucs[i] == UCS4_COMBINING_ENCLOSING_KEYCAP
        ) {
            continue;
        }

        auto glyph = fonts[i]->GetGlyph(ucs[i], false);

        if (glyph != nullptr) {
            deltaX += fonts[i]->GetSizeRatio() * glyph->advanceX / mContext->mCurrentState->mscaleFontX;
        }
    }

    if (fonts.size() > 0) {
        //文本高度本来应该去除上下空白的，但是laya1，还是有点问题，所以这个高度，还是用老的高度ascender+descender绝对值
        maxHeight = fabs(fonts[0]->GetSizeRatio() * fonts[0]->GetMetrics()->ascender / mContext->mCurrentState->mscaleFontY) +
                    fabs(fonts[0]->GetSizeRatio() * fonts[0]->GetMetrics()->descender / mContext->mCurrentState->mscaleFontY);
    }

    //如果满足条件则，返回不带空白的文字高度
    float m_ascender = mContext->mCurrentState->mFont->GetAscender();
    float m_descender = mContext->mCurrentState->mFont->GetDescender();
    if (m_ascender > 0 && m_descender > 0) {
        maxHeight = m_ascender + m_descender;
    }

    delete lbData;

    float *ret = new float[4];
    ret[0] = deltaX;
    ret[1] = maxHeight;
    ret[2] = m_ascender;
    ret[3] = m_descender;
    return ret;
}

float GFontManagerAndroid::MeasureText(const char *text,
                                       unsigned int textLength, gcanvas::GFontStyle *fontStyle) {
    float *tmpMeasure = MeasureTextWidthHeight(text, textLength, fontStyle);
    float width = tmpMeasure[0];
    delete tmpMeasure;
    return width;
}


float *GFontManagerAndroid::MeasureTextExt(const char *text, unsigned int textLength,
                                           gcanvas::GFontStyle *fontStyle) {
    float *tmpMeasure = MeasureTextWidthHeight(text, textLength, fontStyle);
    return tmpMeasure;
}

float *GFontManagerAndroid::PreMeasureTextHeight(const char *text,
                                                 unsigned int textLength,
                                                 gcanvas::GFontStyle *fontStyle) {
    if (text == nullptr || textLength == 0) {
        float *ret = new float[4];
        ret[0] = ret[1] = ret[2] = ret[3] = 0.0;
        return ret;
    }

    Utf8ToUCS4 *lbData = new Utf8ToUCS4(text, textLength);

    unsigned int *ucs = lbData->ucs4;
    unsigned int ucsLength = lbData->ucs4len;

    std::vector<GFont *> fonts;

    for (unsigned int i = 0; i < ucsLength; ++i) {
        if (isCharcodeEmoji(ucs, ucsLength, i)) {
            fonts.push_back(GetEmojiFont(ucs[i], fontStyle));
        } else {
            fonts.push_back(GetFontByCharCode(ucs[i], fontStyle));
        }
    }

    float top = 0;
    float height = 0;
    float ascender = 0;
    float descender = 0;
    for (unsigned int i = 0; i < ucsLength; ++i) {
        if (ucs[i] == UCS4_EMOJI_SELECTOR ||
            ucs[i] == UCS4_TEXT_SELECTOR ||
            ucs[i] == UCS4_ZERO_WIDTH_JOINER ||
            ucs[i] == UCS4_COMBINING_ENCLOSING_KEYCAP
        ) {
            continue;
        }

        auto glyph = fonts[i]->GetGlyph(ucs[i], false);

        if (glyph != nullptr) {
            top = glyph->offsetY / mContext->mCurrentState->mscaleFontY;
            height = glyph->height / mContext->mCurrentState->mscaleFontY;
            ascender = fonts[i]->GetSizeRatio() * fonts[i]->GetMetrics()->ascender / mContext->mCurrentState->mscaleFontY;
            descender = fonts[0]->GetSizeRatio() * fonts[0]->GetMetrics()->descender / mContext->mCurrentState->mscaleFontY;
        }
    }

    delete lbData;

    float *ret = new float[4];
    ret[0] = top;
    ret[1] = height;
    ret[2] = ascender;
    ret[3] = descender;
    return ret;
}

void GFontManagerAndroid::AdjustTextPenPoint(std::vector<GFont *> fonts,
                                             const unsigned int *ucs,
                                             unsigned int ucsLength,
                                             bool isStroke,
        /*out*/ float &x,
        /*out*/ float &y) {
    if (mContext->mCurrentState->mTextAlign != GTextAlign::TEXT_ALIGN_START &&
        mContext->mCurrentState->mTextAlign != GTextAlign::TEXT_ALIGN_LEFT) {
        auto left_x = x;
        auto delta_x = 0.0f;
        for (unsigned int i = 0; i < ucsLength; ++i) {
            if (ucs[i] == UCS4_EMOJI_SELECTOR ||
                ucs[i] == UCS4_TEXT_SELECTOR ||
                ucs[i] == UCS4_ZERO_WIDTH_JOINER ||
                ucs[i] == UCS4_COMBINING_ENCLOSING_KEYCAP
            ) {
                continue;
            }

            auto glyph = fonts[i]->GetGlyph(ucs[i], isStroke);

            if (glyph != nullptr) {
                delta_x += fonts[i]->GetSizeRatio() * glyph->advanceX / mContext->mCurrentState->mscaleFontX;
            }
        }

        if (mContext->mCurrentState->mTextAlign == GTextAlign::TEXT_ALIGN_CENTER) {
            x = left_x - delta_x / 2.0f;
        } else // textAlign is "Right" or "End"
        {
            x = left_x - delta_x;
        }
    }

    GFont *font0 = fonts[0];
    font0->GetGlyph(ucs[0], isStroke);
    auto font_metrics = font0->GetMetrics();
    auto size_ratio = font0->GetSizeRatio();
    auto ascender = size_ratio * font_metrics->ascender / mContext->mCurrentState->mscaleFontY;
    auto descender = size_ratio * font_metrics->descender / mContext->mCurrentState->mscaleFontY;

    //m_ascender，m_descender不能除scale，因为在PreMeasureTextHeight获取这两个值时，已经除过了
    float m_ascender = mContext->mCurrentState->mFont->GetAscender();
    float m_descender = mContext->mCurrentState->mFont->GetDescender();

    switch (mContext->mCurrentState->mTextBaseline) {
        case TEXT_BASELINE_TOP:
        case TEXT_BASELINE_HANGING:
            if (m_ascender > 0 && m_descender > 0) {
                y += fabs(m_ascender);
            } else {
                y += fabs(ascender);
            }
            break;
        case TEXT_BASELINE_BOTTOM:
        case TEXT_BASELINE_IDEOGRAPHIC:
            if (m_ascender > 0 && m_descender > 0) {
                y -= fabs(m_descender);
            } else {
                y -= fabs(descender);
            }
            break;
        case TEXT_BASELINE_MIDDLE:
            if (m_ascender > 0 && m_descender > 0) {
                y += (fabs(m_ascender) - fabs(m_descender)) / 2.0f;
            } else {
                y += (fabs(ascender) - fabs(descender)) / 2.0f;
            }
            break;
        case TEXT_BASELINE_ALPHABETIC:
        default:
            break;
    }

}


GFont *GFontManagerAndroid::GetFontByCharCode(wchar_t charCode, gcanvas::GFontStyle *fontStyle) {
    float devicePixelRatio = 1;
    if (mContext->GetHiQuality()) {
        devicePixelRatio = mContext->mDevicePixelRatio;
    }
    float size = fontStyle->GetSize() * devicePixelRatio;

    GFont *font = mFontCache->GetOrCreateFont(mContext,
                                              mContext->mContextId,
                                              fontStyle, charCode, size);
    return font;
}

GFont *GFontManagerAndroid::GetEmojiFont(wchar_t charCode, gcanvas::GFontStyle *fontStyle) {
    float devicePixelRatio = 1;
    if (mContext->GetHiQuality()) {
        devicePixelRatio = mContext->mDevicePixelRatio;
    }
    float size = fontStyle->GetSize() * devicePixelRatio;

    GFont *font = mFontCache->GetOrCreateEmojiFont(mContext,
                                                   mContext->mContextId,
                                                   fontStyle, charCode, size);
    return font;
}

void GFontManagerAndroid::FillTextInternal(GFont *font, bool isStroke, wchar_t charcode,
                                           float &x, float y) {
    float sizeRatio = font->GetSizeRatio();

    if (isStroke) {
        font->DrawText(charcode, mContext, x, y, mContext->StrokeStyle(), isStroke, sizeRatio);

    } else {
        font->DrawText(charcode, mContext, x, y, mContext->FillStyle(), isStroke, sizeRatio);

    }
}

void GFontManagerAndroid::SetFontCache(GFontCache *fontCache) {
    this->mFontCache = fontCache;
}