You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

767 lines
14 KiB

/**
* @file UncText.cpp
* A simple class that handles the chunk text.
*
* @author Ben Gardner
* @license GPL v2+
*/
#include "unc_text.h"
#include "unc_ctype.h"
#include "unicode.h" // encode_utf8()
#include <algorithm>
#include <cstdint>
#include <stdexcept>
using namespace std;
static constexpr const int_fast8_t UTF8_BLOCKS = 6; // 6 -> max utf8 blocks per char
static size_t fix_len_idx(size_t size, size_t idx, size_t len);
//! converts \n and \r chars are into NL and CR UTF8 symbols before encode_utf8 is called
static void toLogTextUtf8(int c, UncText::log_type &container);
/**
* calculates the size a 'log_type' container needs to have in order to take
* in values of a 'UncText::value_type' up to idx
* (without \0, with symbols for the converted \n and \r chars)
*
* throws if char is greater than 0x7fffffff
*/
static int getLogTextUtf8Len(UncText::value_type &c0, size_t end);
static int getLogTextUtf8Len(UncText::value_type &c0, size_t start, size_t end);
static int getLogTextUtf8Len(UncText::value_type &c0, size_t start, size_t end)
{
size_t c1_idx = 0;
for (size_t i = start; i < end; ++i)
{
auto ch = c0[i];
if (ch == '\n')
{
ch = 0x2424; // NL symbol
}
else if (ch == '\r')
{
ch = 0x240d; // CR symbol
}
if (ch < 0x80) // 1-byte sequence
{
c1_idx += 1;
}
else if (ch < 0x0800) // 2-byte sequence
{
c1_idx += 2;
}
else if (ch < 0x10000) // 3-byte sequence
{
c1_idx += 3;
}
else if (ch < 0x200000) // 4-byte sequence
{
c1_idx += 4;
}
else if (ch < 0x4000000) // 5-byte sequence
{
c1_idx += 5;
}
else if (ch <= 0x7fffffff) // 6-byte sequence
{
c1_idx += 6;
}
else
{
throw out_of_range(string(__func__) + ":" + to_string(__LINE__)
+ " - ch value too big, can't convert to utf8");
}
}
return(c1_idx);
} // getLogTextUTF8Len
static int getLogTextUtf8Len(UncText::value_type &c0, size_t end)
{
return(getLogTextUtf8Len(c0, 0, end));
}
static void toLogTextUtf8(int c, UncText::log_type &container)
{
if (c == '\n')
{
c = 0x2424; // NL symbol
}
else if (c == '\r')
{
c = 0x240d; // CR symbol
}
encode_utf8(c, container);
}
static size_t fix_len_idx(size_t size, size_t idx, size_t len)
{
if (idx >= size)
{
return(0);
}
const size_t left = size - idx;
return((len > left) ? left : len);
}
UncText::UncText()
{
m_logtext = log_type{ '\0' };
}
UncText::UncText(const UncText &ref)
{
set(ref);
}
UncText::UncText(const UncText &ref, size_t idx, size_t len)
{
set(ref, idx, len);
}
UncText::UncText(const char *ascii_text)
{
set(ascii_text);
}
UncText::UncText(const std::string &ascii_text)
{
set(ascii_text);
}
UncText::UncText(const value_type &data, size_t idx, size_t len)
{
set(data, idx, len);
}
size_t UncText::size() const
{
return(m_chars.size());
}
UncText &UncText::operator=(int ch)
{
set(ch);
return(*this);
}
UncText &UncText::operator=(const UncText &ref)
{
set(ref);
return(*this);
}
UncText &UncText::operator=(const std::string &ascii_text)
{
set(ascii_text);
return(*this);
}
UncText &UncText::operator=(const char *ascii_text)
{
set(ascii_text);
return(*this);
}
UncText &UncText::operator+=(int ch)
{
append(ch);
return(*this);
}
UncText &UncText::operator+=(const UncText &ref)
{
append(ref);
return(*this);
}
UncText &UncText::operator+=(const std::string &ascii_text)
{
append(ascii_text);
return(*this);
}
UncText &UncText::operator+=(const char *ascii_text)
{
append(ascii_text);
return(*this);
}
const UncText::value_type &UncText::get() const
{
return(m_chars);
}
int UncText::operator[](size_t idx) const
{
return((idx < m_chars.size()) ? m_chars[idx] : 0);
}
const int &UncText::at(size_t idx) const
{
return(m_chars.at(idx));
}
int &UncText::at(size_t idx)
{
return(m_chars.at(idx));
}
const int &UncText::back() const
{
return(m_chars.back());
}
void UncText::push_back(int ch)
{
append(ch);
}
void UncText::pop_back()
{
if (size() == 0)
{
return;
}
m_chars.pop_back();
update_logtext();
}
void UncText::pop_front()
{
if (size() == 0)
{
return;
}
m_chars.pop_front();
update_logtext();
}
void UncText::update_logtext()
{
// make a pessimistic guess at the size
m_logtext.clear();
m_logtext.reserve(m_chars.size() * 3);
for (int m_char : m_chars)
{
toLogTextUtf8(m_char, m_logtext);
}
m_logtext.push_back(0);
}
int UncText::compare(const UncText &ref1, const UncText &ref2, size_t len, bool tcare)
{
const size_t len1 = ref1.size();
const size_t len2 = ref2.size();
const auto max_idx = std::min({ len, len1, len2 });
size_t idx = 0;
for ( ; idx < max_idx; idx++)
{
// exactly the same character ?
if (ref1.m_chars[idx] == ref2.m_chars[idx])
{
continue;
}
int diff; // Issue #2091
if (tcare)
{
diff = ref1.m_chars[idx] - ref2.m_chars[idx];
}
else
{
diff = unc_tolower(ref1.m_chars[idx]) - unc_tolower(ref2.m_chars[idx]);
}
if (diff == 0)
{
/*
* if we're comparing the same character but in different case
* we want to favor lower case before upper case (e.g. a before A)
* so the order is the reverse of ASCII order (we negate).
*/
return(-(ref1.m_chars[idx] - ref2.m_chars[idx]));
}
// return the case-insensitive diff to sort alphabetically
return(diff);
}
if (idx == len)
{
return(0);
}
// underflow save: return(len1 - len2);
return((len1 > len2) ? (len1 - len2) : -static_cast<int>(len2 - len1));
} // UncText::compare
bool UncText::equals(const UncText &ref) const
{
const size_t len = size();
if (ref.size() != len)
{
return(false);
}
for (size_t idx = 0; idx < len; idx++)
{
if (m_chars[idx] != ref.m_chars[idx])
{
return(false);
}
}
return(true);
}
const char *UncText::c_str() const
{
return(reinterpret_cast<const char *>(&m_logtext[0]));
}
void UncText::set(int ch)
{
m_logtext.clear();
toLogTextUtf8(ch, m_logtext);
m_logtext.push_back('\0');
m_chars.clear();
m_chars.push_back(ch);
}
void UncText::set(const UncText &ref)
{
m_chars = ref.m_chars;
m_logtext = ref.m_logtext;
}
void UncText::set(const UncText &ref, size_t idx, size_t len)
{
const auto ref_size = ref.size();
if (len == ref_size)
{
m_chars = ref.m_chars;
update_logtext();
return;
}
m_chars.resize(len);
len = fix_len_idx(ref_size, idx, len);
for (size_t di = 0;
len > 0;
di++, idx++, len--)
{
m_chars[di] = ref.m_chars[idx];
}
update_logtext();
}
void UncText::set(const string &ascii_text)
{
const size_t len = ascii_text.size();
m_chars.resize(len);
for (size_t idx = 0; idx < len; idx++)
{
m_chars[idx] = ascii_text[idx];
}
update_logtext();
}
void UncText::set(const char *ascii_text)
{
const size_t len = strlen(ascii_text);
m_chars.resize(len);
for (size_t idx = 0; idx < len; idx++)
{
m_chars[idx] = *ascii_text++;
}
update_logtext();
}
void UncText::set(const value_type &data, size_t idx, size_t len)
{
m_chars.resize(len);
len = fix_len_idx(data.size(), idx, len);
for (size_t di = 0;
len > 0;
di++, idx++, len--)
{
m_chars[di] = data[idx];
}
update_logtext();
}
void UncText::resize(size_t new_size)
{
if (size() == new_size)
{
return;
}
const auto log_new_size = getLogTextUtf8Len(m_chars, new_size);
m_logtext.resize(log_new_size + 1); // one extra for \0
m_logtext[log_new_size] = '\0';
m_chars.resize(new_size);
}
void UncText::clear()
{
m_logtext.clear();
m_logtext.push_back('\0');
m_chars.clear();
}
void UncText::insert(size_t idx, int ch)
{
if (idx >= m_chars.size())
{
throw out_of_range(string(__func__) + ":" + to_string(__LINE__)
+ " - idx >= m_chars.size()");
}
log_type utf8converted;
utf8converted.reserve(UTF8_BLOCKS);
toLogTextUtf8(ch, utf8converted);
const auto utf8_idx = getLogTextUtf8Len(m_chars, idx);
m_logtext.pop_back(); // remove '\0'
m_logtext.insert(std::next(std::begin(m_logtext), utf8_idx),
std::begin(utf8converted), std::end(utf8converted));
m_logtext.push_back('\0');
m_chars.insert(std::next(std::begin(m_chars), idx), ch);
}
void UncText::insert(size_t idx, const UncText &ref)
{
if (ref.size() == 0)
{
return;
}
if (idx >= m_chars.size())
{
throw out_of_range(string(__func__) + ":" + to_string(__LINE__)
+ " - idx >= m_chars.size()");
}
const auto utf8_idx = getLogTextUtf8Len(m_chars, idx);
// (A+B) remove \0 from both containers, add back a single at the end
m_logtext.pop_back(); // A
m_logtext.insert(std::next(std::begin(m_logtext), utf8_idx),
std::begin(ref.m_logtext),
std::prev(std::end(ref.m_logtext))); // B
m_logtext.push_back('\0');
m_chars.insert(std::next(std::begin(m_chars), idx),
std::begin(ref.m_chars), std::end(ref.m_chars));
}
void UncText::append(int ch)
{
m_logtext.pop_back();
if ( ch < 0x80
&& ch != '\n'
&& ch != '\r')
{
m_logtext.push_back(ch);
}
else
{
log_type utf8converted;
utf8converted.reserve(UTF8_BLOCKS);
toLogTextUtf8(ch, utf8converted);
m_logtext.insert(std::end(m_logtext),
std::begin(utf8converted), std::end(utf8converted));
}
m_logtext.push_back('\0');
m_chars.push_back(ch);
}
void UncText::append(const UncText &ref)
{
if (ref.size() == 0)
{
return;
}
m_logtext.pop_back();
m_logtext.insert(std::end(m_logtext),
std::begin(ref.m_logtext), std::end(ref.m_logtext));
m_chars.insert(m_chars.end(), ref.m_chars.begin(), ref.m_chars.end());
}
void UncText::append(const string &ascii_text)
{
UncText tmp(ascii_text);
append(tmp);
}
void UncText::append(const char *ascii_text)
{
UncText tmp(ascii_text);
append(tmp);
}
void UncText::append(const value_type &data, size_t idx, size_t len)
{
UncText tmp(data, idx, len);
append(tmp);
}
bool UncText::startswith(const char *text, size_t idx) const
{
const auto orig_idx = idx;
for ( ;
( idx < size()
&& *text);
idx++, text++)
{
if (*text != m_chars[idx])
{
return(false);
}
}
return( idx != orig_idx
&& (*text == 0));
}
bool UncText::startswith(const UncText &text, size_t idx) const
{
size_t si = 0;
const auto orig_idx = idx;
for ( ;
( idx < size()
&& si < text.size());
idx++, si++)
{
if (text.m_chars[si] != m_chars[idx])
{
return(false);
}
}
return( idx != orig_idx
&& (si == text.size()));
}
int UncText::find(const char *search_txt, size_t start_idx) const
{
const size_t t_len = strlen(search_txt); // the length of 'text' we are looking for
const size_t s_len = size(); // the length of the string we are looking in
if ( s_len < t_len // search_txt longer than the string we are looking in
|| start_idx + t_len - 1 >= s_len) // starting position to high to find search_txt
{
return(-1);
}
const size_t end_idx = s_len - t_len;
for (size_t idx = start_idx; idx <= end_idx; idx++)
{
bool match = true;
for (size_t ii = 0; ii < t_len; ii++)
{
if (m_chars[idx + ii] != search_txt[ii])
{
match = false;
break;
}
}
if (match) // 'text' found at position 'idx'
{
return(idx);
}
}
return(-1); // 'text' not found
}
int UncText::rfind(const char *search_txt, size_t start_idx) const
{
const size_t t_len = strlen(search_txt); // the length of 'text' we are looking for
const size_t s_len = size(); // the length of the string we are looking in
if ( s_len < t_len // search_txt longer than the string we are looking in
|| start_idx < t_len - 1) // starting position to low to find search_txt
{
return(-1);
}
const size_t end_idx = s_len - t_len;
if (start_idx > end_idx)
{
start_idx = end_idx;
}
for (auto idx = static_cast<int>(start_idx); idx >= 0; idx--)
{
bool match = true;
for (size_t ii = 0; ii < t_len; ii++)
{
if (m_chars[idx + ii] != search_txt[ii])
{
match = false;
break;
}
}
if (match)
{
return(idx);
}
}
return(-1);
}
void UncText::erase(size_t start_idx, size_t len)
{
if (len == 0)
{
return;
}
const size_t end_idx = start_idx + len - 1;
if (end_idx >= m_chars.size())
{
throw out_of_range(string(__func__) + ":" + to_string(__LINE__)
+ " - idx + len >= m_chars.size()");
}
const auto pos_s = getLogTextUtf8Len(m_chars, start_idx);
const auto pos_e = pos_s + getLogTextUtf8Len(m_chars, start_idx, end_idx);
m_logtext.pop_back();
m_logtext.erase(std::next(std::begin(m_logtext), pos_s),
std::next(std::begin(m_logtext), pos_e + 1));
m_logtext.push_back('\0');
m_chars.erase(std::next(std::begin(m_chars), start_idx),
std::next(std::begin(m_chars), end_idx + 1));
}
int UncText::replace(const char *search_text, const UncText &replace_text)
{
const size_t s_len = strlen(search_text);
const size_t r_len = replace_text.size();
int rcnt = 0;
int fidx = find(search_text);
while (fidx >= 0)
{
rcnt++;
erase(static_cast<size_t>(fidx), s_len);
(static_cast<size_t>(fidx) >= m_chars.size())
? append(replace_text)
: insert(static_cast<size_t>(fidx), replace_text);
fidx = find(search_text, static_cast<size_t>(fidx) + r_len);
}
return(rcnt);
}