/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */

/*

 * This file is part of the LibreOffice project.

 *

 * This Source Code Form is subject to the terms of the Mozilla Public

 * License, v. 2.0. If a copy of the MPL was not distributed with this

 * file, You can obtain one at http://mozilla.org/MPL/2.0/.

 *

 * This file incorporates work covered by the following license notice:

 *

 *   Licensed to the Apache Software Foundation (ASF) under one or more

 *   contributor license agreements. See the NOTICE file distributed

 *   with this work for additional information regarding copyright

 *   ownership. The ASF licenses this file to you under the Apache

 *   License, Version 2.0 (the "License"); you may not use this file

 *   except in compliance with the License. You may obtain a copy of

 *   the License at http://www.apache.org/licenses/LICENSE-2.0 .

 */

#include <o3tl/safeint.hxx>

#include <o3tl/string_view.hxx>

#include <unotools/fontdefs.hxx>

#include <unotools/fontcfg.hxx>

#include <rtl/ustrbuf.hxx>

#include <string_view>

#include <unordered_map>

OUString StripScriptFromName(const OUString& _aName)

{

    // I worry that someone will have a font which *does* have

    // e.g. "Greek" legitimately at the end of its name :-(

    const char*const suffixes[] = { " baltic",

                              " ce",

                              " cyr",

                              " greek",

                              " tur",

                              " (arabic)",

                              " (hebrew)",

                              " (thai)",

                              " (vietnamese)"

                            };

    OUString aName = _aName;

    // These can be crazily piled up, e.g. Times New Roman CYR Greek

    bool bFinished = false;

    while (!bFinished)

    {

        bFinished = true;

        for (const char* suffix : suffixes)

        {

            size_t nLen = strlen(suffix);

            if (aName.endsWithIgnoreAsciiCaseAsciiL(suffix, nLen))

            {

                bFinished = false;

                aName = aName.copy(0, aName.getLength() - nLen);

            }

        }

    }

    return aName;

}

//return true if the character is stripped from the string

static bool toOnlyLowerAsciiOrStrip(sal_Unicode c, OUStringBuffer &rName, sal_Int32 nIndex, sal_Int32& rLen)

{

    // not lowercase Ascii

    if (c < 'a' || c > 'z')

    {

        // To Lowercase-Ascii

        if ( (c >= 'A') && (c <= 'Z') )

        {

            c += 'a' - 'A';

            rName[nIndex] = c;

        }

        else if( ((c < '0') || (c > '9')) && (c != ';') && (c != '(') && (c != ')') ) // not 0-9, semicolon, or brackets

        {

            // Remove white spaces and special characters

            rName.remove(nIndex, 1);

            rLen--;

            return true;

        }

    }

    return false;

}

OUString GetEnglishSearchFontName(std::u16string_view rInName)

{

    OUStringBuffer rName(rInName);

    bool        bNeedTranslation = false;

    sal_Int32  nLen = rName.getLength();

    // Remove trailing whitespaces

    sal_Int32 i = nLen;

    while ( i && (rName[ i-1 ] < 32) )

        i--;

    if ( i != nLen )

         rName.truncate(i);

    nLen = rName.getLength();

    // remove all whitespaces and converts to lower case ASCII

    // TODO: better transliteration to ASCII e.g. all digits

    i = 0;

    while ( i < nLen )

    {

        sal_Unicode c = rName[ i ];

        if ( c > 127 )

        {

            // Translate to Lowercase-ASCII

            // FullWidth-ASCII to half ASCII

            if ( (c >= 0xFF00) && (c <= 0xFF5E) )

            {

                c -= 0xFF00-0x0020;

                rName[ i ] = c;

                if (toOnlyLowerAsciiOrStrip(c, rName, i, nLen))

                   continue;

            }

            else

            {

                // Only Fontnames with None-Ascii-Characters must be translated

                bNeedTranslation = true;

            }

        }

        else if (toOnlyLowerAsciiOrStrip(c, rName, i, nLen))

            continue;

        i++;

    }

    OUString rNameStr = rName.makeStringAndClear();

    // translate normalized localized name to its normalized English ASCII name

    if( bNeedTranslation )

    {

        typedef std::unordered_map<OUString, OUString> FontNameDictionary;

        static FontNameDictionary const aDictionary = {

            {u"\uBC14\uD0D5"_ustr, "batang"},

            {u"\uBC14\uD0D5\uCCB4"_ustr, "batangche"},

            {u"\uAD81\uC11C"_ustr, "gungshu"},

            {u"\uAD81\uC11C\uCCB4"_ustr, "gungshuche"},

            {u"\uAD74\uB9BC"_ustr, "gulim"},

            {u"\uAD74\uB9BC\uCCB4"_ustr, "gulimche"},

            {u"\uB3CB\uC6C0"_ustr, "dotum"},

            {u"\uB3CB\uC6C0\uCCB4"_ustr, "dotumche"},

            {u"\u5B8B\u4F53"_ustr, "simsun"},

            {u"\u65B0\u5B8B\u4F53"_ustr, "nsimsun"},

            {u"\u9ED1\u4F53"_ustr, "simhei"},

            {u"\u6977\u4F53"_ustr, "simkai"},

            {u"\u4E2D\u6613\u5B8B\u4F53"_ustr, "zycjksun"},

            {u"\u4E2D\u6613\u9ED1\u4F53"_ustr, "zycjkhei"},

            {u"\u4E2D\u6613\u6977\u4F53"_ustr, "zycjkkai"},

            {u"\u65B9\u6B63\u9ED1\u4F53"_ustr, "fzhei"},

            {u"\u65B9\u6B63\u6977\u4F53"_ustr, "fzkai"},

            {u"\u65B9\u6B63\u5B8B\u4E00"_ustr, "fzsong"},

            {u"\u65B9\u6B63\u4E66\u5B8B"_ustr, "fzshusong"},

            {u"\u65B9\u6B63\u4EFF\u5B8B"_ustr, "fzfangsong"},

            // Attention: this fonts includes the wrong encoding vector - so we double the names with correct and wrong encoding

            // First one is the GB-Encoding (we think the correct one), second is the big5 encoded name

            {u"m\u7B80\u9ED1"_ustr, "mhei"},

            {u"m\u6F60\u7AAA"_ustr, "mhei"},

            {u"m\u7B80\u6977\u566C"_ustr, "mkai"},

            {u"m\u6F60\u7FF1\u628E"_ustr, "mkai"},

            {u"m\u7B80\u5B8B"_ustr, "msong"},

            {u"m\u6F60\u51BC"_ustr, "msong"},

            {u"m\u7B80\u592B\u5B8B"_ustr, "cfangsong"},

            {u"m\u6F60\u6E98\u51BC"_ustr, "cfangsong"},

            {u"\u7D30\u660E\u9AD4"_ustr, "mingliu"},

            {u"\u65B0\u7D30\u660E\u9AD4"_ustr, "pmingliu"},

            {u"\u6865"_ustr, "hei"},

            {u"\u6B61"_ustr, "kai"},

            {u"\u6D69\u6E67"_ustr, "ming"},

            {u"ms\u30B4\u30B7\u30C3\u30AF"_ustr, "msgothic"},

            {u"msp\u30B4\u30B7\u30C3\u30AF"_ustr, "mspgothic"},

            {u"ms\u660E\u671D"_ustr, "msmincho"},

            {u"msp\u660E\u671D"_ustr, "mspmincho"},

            {u"\u5FAE\u8EDF\u6B63\u9ED1\u9AD4"_ustr, "microsoftjhenghei"},

            {u"\u5FAE\u8F6F\u96C5\u9ED1"_ustr, "microsoftyahei"},

            {u"\u30e1\u30a4\u30ea\u30aa"_ustr, "meiryo"},

            {u"hg\u660E\u671Dl"_ustr, "hgminchol"},

            {u"hg\u30B4\u30B7\u30C3\u30AFb"_ustr, "hggothicb"},

            {u"hgp\u660E\u671Dl"_ustr, "hgpminchol"},

            {u"hgp\u30B4\u30B7\u30C3\u30AFb"_ustr, "hgpgothicb"},

            {u"hg\u660E\u671Dlsun"_ustr, "hgmincholsun"},

            {u"hg\u30B4\u30B7\u30C3\u30AFbsun"_ustr, "hggothicbsun"},

            {u"hgp\u660E\u671Dlsun"_ustr, "hgpmincholsun"},

            {u"hgp\u30B4\u30B7\u30C3\u30AFbsun"_ustr, "hgpgothicbsun"},

            {u"hg\u5E73\u6210\u660E\u671D\u4F53"_ustr, "hgheiseimin"},

            {u"hg\u5E73\u6210\u660E\u671D\u4F53w3x12"_ustr, "hgheiseimin"},

            {u"ipa\u660E\u671D"_ustr, "ipamincho"},

            {u"ipap\u660E\u671D"_ustr, "ipapmincho"},

            {u"ipa\u30B4\u30B7\u30C3\u30AF"_ustr, "ipagothic"},

            {u"ipap\u30B4\u30B7\u30C3\u30AF"_ustr, "ipapgothic"},

            {u"ipaui\u30B4\u30B7\u30C3\u30AF"_ustr, "ipauigothic"},

            {u"takao\u660E\u671D"_ustr, "takaomincho"},

            {u"takaop\u660E\u671D"_ustr, "takaopmincho"},

            {u"takao\u30B4\u30B7\u30C3\u30AF"_ustr, "takaogothic"},

            {u"takaop\u30B4\u30B7\u30C3\u30AF"_ustr, "takaopgothic"},

            {u"\u3055\u3056\u306A\u307F\u660E\u671D"_ustr, "sazanamimincho"},

            {u"\u3055\u3056\u306A\u307F\u30B4\u30B7\u30C3\u30AF"_ustr, "sazanamigothic"},

            {u"\u6771\u98A8\u660E\u671D"_ustr, "kochimincho"},

            {u"\u6771\u98A8\u30B4\u30B7\u30C3\u30AF"_ustr, "kochigothic"},

            {u"\uC36C\uB3CB\uC6C0"_ustr, "sundotum"},

            {u"\uC36C\uAD74\uB9BC"_ustr, "sungulim"},

            {u"\uC36C\uBC14\uD0D5"_ustr, "sunbatang"},

            {u"\uBC31\uBB35\uB3CB\uC6C0"_ustr, "baekmukdotum"},

            {u"\uBC31\uBB35\uAD74\uB9BC"_ustr, "baekmukgulim"},

            {u"\uBC31\uBB35\uBC14\uD0D5"_ustr, "baekmukbatang"},

            {u"\u65B9\u6B63\u9ED1\u4F53"_ustr, "fzheiti"},

            {u"\u65B9\u6B63\u9ED1\u9AD4"_ustr, "fzheiti"},

            {u"\u65B9\u6B63\u6977\u4F53"_ustr, "fzkaiti"},

            {u"\u65B9\u6B63\u6977\u9AD4"_ustr, "fzkaitib"},

            {u"\u65B9\u6B63\u660E\u9AD4"_ustr, "fzmingtib"},

            {u"\u65B9\u6B63\u5B8B\u4F53"_ustr, "fzsongti"},

            {u"hy\uACAC\uBA85\uC870"_ustr, "hymyeongjoextra"},

            {u"hy\uC2E0\uBA85\uC870"_ustr, "hysinmyeongjomedium"},

            {u"hy\uC911\uACE0\uB515"_ustr, "hygothicmedium"},

            {u"hy\uADF8\uB798\uD53Dm"_ustr, "hygraphicmedium"},

            {u"hy\uADF8\uB798\uD53D"_ustr, "hygraphic"},

            {u"\uC0C8\uAD74\uB9BC"_ustr, "newgulim"},

            {u"\uC36C\uAD81\uC11C"_ustr, "sungungseo"},

            {u"hy\uAD81\uC11Cb"_ustr, "hygungsobold"},

            {u"hy\uAD81\uC11C"_ustr, "hygungso"},

            {u"\uC36C\uD5E4\uB4DC\uB77C\uC778"_ustr, "sunheadline"},

            {u"hy\uD5E4\uB4DC\uB77C\uC778m"_ustr, "hyheadlinemedium"},

            {u"hy\uD5E4\uB4DC\uB77C\uC778"_ustr, "hyheadline"},

            {u"\uD734\uBA3C\uC61B\uCCB4"_ustr, "yetr"},

            {u"hy\uACAC\uACE0\uB515"_ustr, "hygothicextra"},

            {u"\uC36C\uBAA9\uD310"_ustr, "sunmokpan"},

            {u"\uC36C\uC5FD\uC11C"_ustr, "sunyeopseo"},

            {u"\uC36C\uBC31\uC1A1"_ustr, "sunbaeksong"},

            {u"hy\uC5FD\uC11Cl"_ustr, "hypostlight"},

            {u"hy\uC5FD\uC11C"_ustr, "hypost"},

            {u"\uD734\uBA3C\uB9E4\uC9C1\uCCB4"_ustr, "magicr"},

            {u"\uC36C\uD06C\uB9AC\uC2A4\uD0C8"_ustr, "suncrystal"},

            {u"\uC36C\uC0D8\uBB3C"_ustr, "sunsaemmul"},

            {u"hy\uC595\uC740\uC0D8\uBB3Cm"_ustr, "hyshortsamulmedium"},

            {u"hy\uC595\uC740\uC0D8\uBB3C"_ustr, "hyshortsamul"},

            {u"\uD55C\uCEF4\uBC14\uD0D5"_ustr, "haansoftbatang"},

            {u"\uD55C\uCEF4\uB3CB\uC6C0"_ustr, "haansoftdotum"},

            {u"\uD55C\uC591\uD574\uC11C"_ustr, "hyhaeseo"},

            {u"md\uC194\uCCB4"_ustr, "mdsol"},

            {u"md\uAC1C\uC131\uCCB4"_ustr, "mdgaesung"},

            {u"md\uC544\uD2B8\uCCB4"_ustr, "mdart"},

            {u"md\uC544\uB871\uCCB4"_ustr, "mdalong"},

            {u"md\uC774\uC19D\uCCB4"_ustr, "mdeasop"},

            {u"hg\uFF7A\uFF9E\uFF7C\uFF6F\uFF78e"_ustr, "hggothice"},

            {u"hgp\uFF7A\uFF9E\uFF7C\uFF6F\uFF78e"_ustr, "hgpgothice"},

            {u"hgs\uFF7A\uFF9E\uFF7C\uFF6F\uFF78e"_ustr, "hgsgothice"},

            {u"hg\uFF7A\uFF9E\uFF7C\uFF6F\uFF78m"_ustr, "hggothicm"},

            {u"hgp\uFF7A\uFF9E\uFF7C\uFF6F\uFF78m"_ustr, "hgpgothicm"},

            {u"hgs\uFF7A\uFF9E\uFF7C\uFF6F\uFF78m"_ustr, "hgsgothicm"},

            {u"hg\u884C\u66F8\u4F53"_ustr, "hggyoshotai"},

            {u"hgp\u884C\u66F8\u4F53"_ustr, "hgpgyoshotai"},

            {u"hgs\u884C\u66F8\u4F53"_ustr, "hgsgyoshotai"},

            {u"hg\u6559\u79D1\u66F8\u4F53"_ustr, "hgkyokashotai"},

            {u"hgp\u6559\u79D1\u66F8\u4F53"_ustr, "hgpkyokashotai"},

            {u"hgs\u6559\u79D1\u66F8\u4F53"_ustr, "hgskyokashotai"},

            {u"hg\u660E\u671Db"_ustr, "hgminchob"},

            {u"hgp\u660E\u671Db"_ustr, "hgpminchob"},

            {u"hgs\u660E\u671Db"_ustr, "hgsminchob"},

            {u"hg\u660E\u671De"_ustr, "hgminchoe"},

            {u"hgp\u660E\u671De"_ustr, "hgpminchoe"},

            {u"hgs\u660E\u671De"_ustr, "hgsminchoe"},

            {u"hg\u5275\u82F1\u89D2\uFF8E\uFF9F\uFF6F\uFF8C\uFF9F\u4F53"_ustr, "hgsoeikakupoptai"},

            {u"hgp\u5275\u82F1\u89D2\uFF8E\uFF9F\uFF6F\uFF8C\uFF9F\u4F53"_ustr, "hgpsoeikakupopta"},

            {u"hgs\u5275\u82F1\u89D2\uFF8E\uFF9F\uFF6F\uFF8C\uFF9F\u4F53"_ustr, "hgssoeikakupopta"},

            {u"hg\u5275\u82F1\uFF8C\uFF9F\uFF9A\uFF7E\uFF9E\uFF9D\uFF7Deb"_ustr,

             "hgsoeipresenceeb"},

            {u"hgp\u5275\u82F1\uFF8C\uFF9F\uFF9A\uFF7E\uFF9E\uFF9D\uFF7Deb"_ustr,

             "hgpsoeipresenceeb"},

            {u"hgs\u5275\u82F1\uFF8C\uFF9F\uFF9A\uFF7E\uFF9E\uFF9D\uFF7Deb"_ustr,

             "hgssoeipresenceeb"},

            {u"hg\u5275\u82F1\u89D2\uFF7A\uFF9E\uFF7C\uFF6F\uFF78ub"_ustr, "hgsoeikakugothicub"},

            {u"hgp\u5275\u82F1\u89D2\uFF7A\uFF9E\uFF7C\uFF6F\uFF78ub"_ustr, "hgpsoeikakugothicub"},

            {u"hgs\u5275\u82F1\u89D2\uFF7A\uFF9E\uFF7C\uFF6F\uFF78ub"_ustr, "hgssoeikakugothicub"},

            {u"hg\u6B63\u6977\u66F8\u4F53-pro"_ustr, "hgseikaishotaipro"},

            {u"hg\u4E38\uFF7A\uFF9E\uFF7C\uFF6F\uFF78-pro"_ustr, "hgmarugothicmpro"},

            {u"\u30D2\u30E9\u30AE\u30CE\u660E\u671Dpro"_ustr, "hiraginominchopro"},

            {u"\u30D2\u30E9\u30AE\u30CE\u660E\u671Dpron"_ustr, "hiraginominchopron"},

            {u"\u30D2\u30E9\u30AE\u30CE\u89D2\u30B4\u30B7\u30C3\u30AF"_ustr, "hiraginosans"},

            {u"\u30D2\u30E9\u30AE\u30CE\u89D2\u30B4pro"_ustr, "hiraginokakugothicpro"},

            {u"\u30D2\u30E9\u30AE\u30CE\u89D2\u30B4pron"_ustr, "hiraginokakugothicpron"},

            {u"\u30D2\u30E9\u30AE\u30CE\u4E38\u30B4pro"_ustr, "hiraginomarugothicpro"},

            {u"\u30D2\u30E9\u30AE\u30CE\u4E38\u30B4pron"_ustr, "hiraginomarugothicpron"},

            {u"\u6E38\u30B4\u30B7\u30C3\u30AF"_ustr, "yugothic"},

            {u"\u6E38\u30B4\u30B7\u30C3\u30AF\u4F53"_ustr, "yugothictai"},

            {u"\u6E38\u660E\u671D"_ustr, "yumincho"},

            {u"\u6E38\u660E\u671D\u4F53"_ustr, "yuminchotai"},

            {u"\u6E90\u30CE\u89D2\u30B4\u30B7\u30C3\u30AF"_ustr, "sourcehansans"},

            {u"\u6E90\u30CE\u89D2\u30B4\u30B7\u30C3\u30AFjp"_ustr, "sourcehansansjp"},

            {u"\u6E90\u30CE\u89D2\u30B4\u30B7\u30C3\u30AFhw"_ustr, "sourcehansanshw"},

            {u"\u6E90\u30CE\u660E\u671D"_ustr, "sourcehanserif"},

            {u"\u6E90\u30CE\u660E\u671Djp"_ustr, "sourcehanserifjp"},

            {u"ipamj\u660E\u671D"_ustr, "ipamjmincho"},

            {u"ipaex\u30B4\u30B7\u30C3\u30AF"_ustr, "ipaexgothic"},

            {u"ipaex\u660E\u671D"_ustr, "ipaexmimcho"}};

        FontNameDictionary::const_iterator it = aDictionary.find( rNameStr );

        if( it != aDictionary.end() )

            rNameStr = it->second;

    }

    return rNameStr;

}

std::u16string_view GetNextFontToken( std::u16string_view rTokenStr, sal_Int32& rIndex )

{

    // check for valid start index

    size_t nStringLen = rTokenStr.size();

    if( o3tl::make_unsigned(rIndex) >= nStringLen )

    {

        rIndex = -1;

        return {};

    }

    // find the next token delimiter and return the token substring

    const sal_Unicode* pStr = rTokenStr.data() + rIndex;

    const sal_Unicode* pEnd = rTokenStr.data() + nStringLen;

    for(; pStr < pEnd; ++pStr )

        if( (*pStr == ';') || (*pStr == ',') )

            break;

    sal_Int32 nTokenStart = rIndex;

    sal_Int32 nTokenLen;

    if( pStr < pEnd )

    {

        rIndex = sal::static_int_cast<sal_Int32>(pStr - rTokenStr.data());

        nTokenLen = rIndex - nTokenStart;

        ++rIndex; // skip over token separator

    }

    else

    {

        // no token delimiter found => handle last token

        rIndex = -1;

        // optimize if the token string consists of just one token

        if( !nTokenStart )

        {

            return rTokenStr;

        }

        else

        {

            nTokenLen = nStringLen - nTokenStart;

        }

    }

    return rTokenStr.substr( nTokenStart, nTokenLen );

}

static bool ImplIsFontToken( std::u16string_view rName, std::u16string_view rToken )

{

    sal_Int32  nIndex = 0;

    do

    {

        std::u16string_view aTempName = GetNextFontToken( rName, nIndex );

        if ( rToken == aTempName )

            return true;

    }

    while ( nIndex != -1 );

    return false;

}

static void ImplAppendFontToken( OUString& rName, std::u16string_view rNewToken )

{

    if ( !rName.isEmpty() )

    {

        rName += ";";

    }

    rName += rNewToken;

}

void AddTokenFontName( OUString& rName, std::u16string_view rNewToken )

{

    if ( !ImplIsFontToken( rName, rNewToken ) )

        ImplAppendFontToken( rName, rNewToken );

}

OUString GetSubsFontName( std::u16string_view rName, SubsFontFlags nFlags )

{

    OUString aName;

    sal_Int32 nIndex = 0;

    OUString aOrgName = GetEnglishSearchFontName(

                                GetNextFontToken( rName, nIndex ) );

    // #93662# do not try to replace StarSymbol with MS only font

    if( nFlags == (SubsFontFlags::MS|SubsFontFlags::ONLYONE)

    &&  ( aOrgName == "starsymbol"

      ||  aOrgName == "opensymbol" ) )

        return aName;

    if (nFlags & SubsFontFlags::MS)

    {

        const utl::FontNameAttr* pAttr = utl::FontSubstConfiguration::get().getSubstInfo( aOrgName );

        if (pAttr)

            for( const auto& rSubstitution : pAttr->MSSubstitutions )

                if( ! ImplIsFontToken( rName, rSubstitution ) )

                {

                    ImplAppendFontToken( aName, rSubstitution );

                    if( nFlags & SubsFontFlags::ONLYONE )

                    {

                        break;

                    }

                }

    }

    return aName;

}

bool IsOpenSymbol(std::u16string_view rFontName)

{

    sal_Int32 nIndex = 0;

    std::u16string_view sFamilyNm(GetNextFontToken(rFontName, nIndex));

    return (o3tl::equalsIgnoreAsciiCase(sFamilyNm, "starsymbol") ||

        o3tl::equalsIgnoreAsciiCase(sFamilyNm, "opensymbol"));

}

/* vim:set shiftwidth=4 softtabstop=4 expandtab: */