/* AbiSource Applications
 * Copyright (C) 2011-2016 Hubert Figuière
 *
 * This program is free software; you can redistribute it and/or
 * modify it under the terms of the GNU General Public License
 * as published by the Free Software Foundation; either version 2
 * 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 General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, write to the Free Software
 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
 * 02110-1301 USA.
 */

#include <stdio.h>

#include "tf_test.h"
#include "ut_string_class.h"
#include "ut_std_string.h"

#define TFSUITE "core.af.util.stdstring"

TFTEST_MAIN("xml_string")
{
  std::string s = "<foobar = & \">";

  std::string s2 = UT_escapeXML(s);
  TFPASS(!s2.empty());
  TFPASS(s2 == "&lt;foobar = &amp; &quot;&gt;");

  UT_UTF8String utf8(s);
  TFPASS(utf8 == s);
  TFPASS(s2 == utf8.escapeXML());

  std::string s3 = UT_decodeXML(s2);
  TFPASS(s3 == s);
  TFPASS(s3 == utf8.decodeXML());
}

TFTEST_MAIN("string utilities")
{
  UT_UCS4Char uni[] = {
    'P', 'e', 'e', 'k', 'a', 'b', 'o', 'o', 0
  };

  TFPASS(UT_std_string_unicode(NULL, 8).empty());
  TFPASS(UT_std_string_unicode(uni, 0).empty());
  std::string unistring = UT_std_string_unicode(uni, 8);
  TFPASS(unistring == "Peekaboo");

  TFPASS(starts_with(unistring, "Pee"));
  TFPASS(!starts_with(unistring, "Foo"));
  TFPASS(ends_with(unistring, "boo"));
  TFPASS(!ends_with(unistring, "Foo"));

  std::string r;
  r = replace_all(unistring, 'e', 'i');
  TFPASS(r == "Piikaboo");
  r = replace_all(unistring, "boo", "chu");
  TFPASS(r == "Peekachu");
}

TFTEST_MAIN("to lower")
{
  std::string s = "NeXT";
  UT_tolower(s);
  TFPASS(s == "next");
  UT_tolower(s);
  TFPASS(s == "next");
}

TFTEST_MAIN("simpleSplit")
{
  {
    std::vector<std::string> split;
    split = UT_simpleSplit("/usr/bin/abiword", '/');
    TFPASS(!split.empty());

    TFPASS(split.size() == 3);
    TFPASS(split[0] == "usr");
    TFPASS(split[1] == "bin");
    TFPASS(split[2] == "abiword");
  }

  {
    std::vector<std::string> split;
    split = UT_simpleSplit("usr bin abiword");
    TFPASS(!split.empty());

    TFPASS(split.size() == 3);
    TFPASS(split[0] == "usr");
    TFPASS(split[1] == "bin");
    TFPASS(split[2] == "abiword");
  }
}

TFTEST_MAIN("UT_ellipsisPath")
{
  std::string newpath = UT_ellipsisPath("abcdefghijklmnopqrstuvwxyzABCDEFGIJKLMNOPQRSTUVWXYZ0123456789", 60, 50);
  TFPASS(newpath == "abcdef ... lmnopqrstuvwxyzABCDEFGIJKLMNOPQRSTUVWXYZ0123456789");

  std::string newpath2 = UT_ellipsisPath("abcdefghjikl", 60, 50);
  TFPASS(newpath2 == "abcdefghjikl");

  newpath2 = UT_ellipsisPath("", 0, 0);
  TFPASS(newpath2.empty());
}

TFTEST_MAIN("PropVal")
{
  const std::string propString = "fred:nerk; table-width:1.0in; table-height:10.in";

  std::string propVal;

  propVal = UT_std_string_getPropVal(propString, "fred");
  TFPASS(propVal == "nerk");

  propVal = UT_std_string_getPropVal(propString, "table-width");
  TFPASS(propVal == "1.0in");

  propVal = UT_std_string_getPropVal(propString, "table-height");
  TFPASS(propVal == "10.in");

  propVal = UT_std_string_getPropVal(propString, "foo");
  TFPASS(propVal.empty());

  // This test code here is an exception to the rule on not using
  // UT_String. The purpose is to ensure the replacements behave the same.
  //
  // Also note that it seems that the feature is misunderstood, so I did
  // comment out test that are broken -- Hub. Must fix.
  std::string mutablePropString = propString;
  UT_String mutableUTString = propString;

  // remove property
  UT_std_string_removeProperty(mutablePropString, "fred");
  UT_String_removeProperty(mutableUTString, "fred");
//  printf("std = %s / UT = %s\n", mutablePropString.c_str(), mutableUTString.c_str());
  TFPASS(mutablePropString == "table-width:1.0in; table-height:10.in");
  TFPASS(mutablePropString == mutableUTString);

  UT_std_string_removeProperty(mutablePropString, "table-height");
  UT_String_removeProperty(mutableUTString, "table-height");
//  printf("std = %s / UT = %s\n", mutablePropString.c_str(), mutableUTString.c_str());
//  TFPASS(mutablePropString == "table-width:1.0in");
  TFPASS(mutablePropString == mutableUTString);

  // set property
  UT_std_string_setProperty(mutablePropString, "fred", "nerk");
  UT_String_setProperty(mutableUTString, "fred", "nerk");
//  printf("std = %s / UT = %s\n", mutablePropString.c_str(), mutableUTString.c_str());
//  TFPASS(mutablePropString == "table-width:1.0in; fred:nerk");
  TFPASS(mutablePropString == mutableUTString);

  UT_std_string_setProperty(mutablePropString, "table-width", "2.0in");
  UT_String_setProperty(mutableUTString, "table-width", "2.0in");
//  printf("std = %s / UT = %s\n", mutablePropString.c_str(), mutableUTString.c_str());
//  TFPASS(mutablePropString == "fred:nerk; table-width:2.0in");
  TFPASS(mutablePropString == mutableUTString);

  // add property string
  mutablePropString = "fred:nerk; table-width:1.0in; table-height:10.in";
  mutableUTString = mutablePropString;
  UT_std_string_addPropertyString(mutablePropString, "fred:foo; table-width:2.0in");
  UT_String_addPropertyString(mutableUTString, "fred:foo; table-width:2.0in");
  printf("std = %s / UT = %s\n", mutablePropString.c_str(), mutableUTString.c_str());
//  TFPASS(mutablePropString == "fred:foo; table-width:2.0in; table-height:10.in");
  TFPASS(mutablePropString == mutableUTString);
}