Files
Yajbir Singh f1b860b25c
check / markdownlint (push) Has been cancelled
check / spellchecker (push) Has been cancelled
updated
2025-12-11 19:03:17 +05:30

519 lines
14 KiB
C++

/*
* (c) Copyright Ascensio System SIA 2010-2023
*
* This program is a free software product. You can redistribute it and/or
* modify it under the terms of the GNU Affero General Public License (AGPL)
* version 3 as published by the Free Software Foundation. In accordance with
* Section 7(a) of the GNU AGPL its Section 15 shall be amended to the effect
* that Ascensio System SIA expressly excludes the warranty of non-infringement
* of any third-party rights.
*
* This program is distributed WITHOUT ANY WARRANTY; without even the implied
* warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. For
* details, see the GNU AGPL at: http://www.gnu.org/licenses/agpl-3.0.html
*
* You can contact Ascensio System SIA at 20A-6 Ernesta Birznieka-Upish
* street, Riga, Latvia, EU, LV-1050.
*
* The interactive user interfaces in modified source and object code versions
* of the Program must display Appropriate Legal Notices, as required under
* Section 5 of the GNU AGPL version 3.
*
* Pursuant to Section 7(b) of the License you must retain the original Product
* logo when distributing the program. Pursuant to Section 7(e) we decline to
* grant you any rights under trademark law for use of our trademarks.
*
* All the Product's GUI elements, including illustrations and icon sets, as
* well as technical writing content are licensed under the terms of the
* Creative Commons Attribution-ShareAlike 4.0 International. See the License
* terms at http://creativecommons.org/licenses/by-sa/4.0/legalcode
*
*/
#include "Utils.h"
#include <vector>
#include <ctime>
#include <cwctype>
namespace PdfWriter
{
BYTE* MemCpy(BYTE* pDst, const BYTE *pSrc, unsigned int unLen)
{
if (unLen > 0)
memcpy(pDst, pSrc, unLen);
return pDst;
}
int StrLen(const char* sString, int nMaxLen)
{
int nLen = 0;
if (!sString)
return 0;
while (*sString != 0 && (nMaxLen < 0 || nLen < nMaxLen))
{
sString++;
nLen++;
}
return nLen;
}
BYTE* StrCpy(char* sDst, const char* sSrc, char* pEnd)
{
if (NULL != sSrc)
{
while (pEnd > sDst && *sSrc != 0)
*sDst++ = *sSrc++;
}
*sDst = 0;
return (BYTE*)sDst;
}
void MemSet(void *pBuf, BYTE nChar, unsigned int unLen)
{
memset(pBuf, nChar, unLen);
}
char* ItoA (char *str, int nVal, char *eptr)
{
char* sTemp;
char sBuf[INT_LEN + 1];
if (nVal < 0)
{
if (nVal < LIMIT_MIN_INT)
nVal = LIMIT_MIN_INT;
*str++ = '-';
nVal = -nVal;
}
else if (nVal > LIMIT_MAX_INT)
{
nVal = LIMIT_MAX_INT;
}
else if (nVal == 0)
{
*str++ = '0';
}
sTemp = sBuf + INT_LEN;
*sTemp-- = 0;
while (nVal > 0)
{
*sTemp = (char)(nVal % 10) + '0';
nVal /= 10;
sTemp--;
}
sTemp++;
while (str < eptr && *sTemp != 0)
*str++ = *sTemp++;
*str = 0;
return str;
}
char* ItoA2 (char *str, unsigned int nVal, unsigned int nLen)
{
char* sT;
char* sU;
if (nVal > LIMIT_MAX_INT)
nVal = LIMIT_MAX_INT;
sU = str + nLen - 1;
*sU = 0;
sT = sU - 1;
while (nVal > 0 && sT >= str)
{
*sT = (char)(nVal % 10) + '0';
nVal /= 10;
sT--;
}
while (str <= sT)
*sT-- = '0';
return str + nLen - 1;
}
int StrCmp(const char* s1, const char* s2)
{
if (!s1 || !s2)
{
if (!s1 && !s2)
return 0;
if (!s1 && s2)
return -1;
else
return 1;
}
while (*s1 == *s2)
{
s1++;
s2++;
if (*s1 == 0 || *s2 == 0)
break;
}
return (BYTE)*s1 - (BYTE)*s2;
}
char* FtoA (char* sDst, double dVal, char* pEnd)
{
int nNPartVal = 0;
int nFPartVal = 0;
char sBuf[REAL_LEN + 1];
char* sptr = sDst;
char* sTemp;
unsigned int nIndex = 0;
if (dVal > LIMIT_MAX_REAL)
dVal = LIMIT_MAX_REAL;
else if (dVal < LIMIT_MIN_REAL)
dVal = LIMIT_MIN_REAL;
sTemp = sBuf + REAL_LEN;
*sTemp-- = 0;
if (dVal < 0)
{
*sDst++ = '-';
dVal = -dVal;
}
// разделяем целую и дробную части
nNPartVal = (int)(dVal + 0.000005);
nFPartVal = (int)((float)(dVal - nNPartVal + 0.000005) * 100000);
// пишем дробную часть
for (nIndex = 0; nIndex < 5; nIndex++)
{
*sTemp = (char)(nFPartVal % 10) + '0';
nFPartVal /= 10;
sTemp--;
}
// пишем целую часть
*sTemp-- = '.';
*sTemp = '0';
if (nNPartVal == 0)
sTemp--;
while (nNPartVal > 0)
{
*sTemp = (char)(nNPartVal % 10) + '0';
nNPartVal /= 10;
sTemp--;
}
sTemp++;
while (sDst <= pEnd && *sTemp != 0)
*sDst++ = *sTemp++;
sDst--;
// TODO: при избавлении от нулей при сдвиге конец строки тоже нужно чистить
// пример число -00.90123 результат "-0.901234"
while (sDst > sptr)
{
if (*sDst == '0')
*sDst = 0;
else {
if (*sDst == '.')
*sDst = 0;
break;
}
sDst--;
}
return (*sDst == 0) ? sDst : ++sDst;
}
void UIntChangeBit(unsigned int& nValue, short nBit)
{
// работаем только с 4-байтовыми числами
if (nBit < 0 || nBit > 31)
return;
unsigned int unBitNum = 1 << nBit;
if (nValue & unBitNum)
nValue ^= unBitNum;
else
nValue |= unBitNum;
}
std::string DateNow()
{
char sTemp[DATE_TIME_STR_LEN + 1];
char* pTemp = NULL;
MemSet(sTemp, 0, DATE_TIME_STR_LEN + 1);
time_t oTime = time(0);
struct tm* oNow = gmtime(&oTime);
pTemp = (char*)MemCpy((BYTE*)sTemp, (BYTE*)"D:", 2);
*pTemp++;
*pTemp++;
pTemp = ItoA2(pTemp, oNow->tm_year + 1900, 5);
pTemp = ItoA2(pTemp, oNow->tm_mon + 1, 3);
pTemp = ItoA2(pTemp, oNow->tm_mday, 3);
pTemp = ItoA2(pTemp, oNow->tm_hour, 3);
pTemp = ItoA2(pTemp, oNow->tm_min, 3);
pTemp = ItoA2(pTemp, oNow->tm_sec, 3);
*pTemp++ = '+';
pTemp = ItoA2(pTemp, 0, 3);
*pTemp++ = '\'';
pTemp = ItoA2(pTemp, 0, 3);
*pTemp++ = '\'';
*pTemp = 0;
std::string sRes(sTemp);
return sRes;
}
std::wstring NormalizeWhitespace(const std::wstring& s)
{
std::wstring sRes;
sRes.reserve(s.size());
for (wchar_t c : s)
{
switch(c)
{
/*
case 0x0009: // Character tabulation
case 0x000A: // Line feed
case 0x000B: // Line tabulation
case 0x000C: // Form feed
case 0x000D: // Carriage return
*/
case 0x00A0: // No-break space
case 0x1680: // Ogham space mark
case 0x2000: // En quad
case 0x2001: // Em quad
case 0x2002: // En space
case 0x2003: // Em space
case 0x2004: // Three-per-em space
case 0x2005: // Four-per-em space
case 0x2006: // Six-per-em space
case 0x2007: // Figure space
case 0x2008: // Punctuation space
case 0x2009: // Thin space
case 0x200A: // Hair space
case 0x2028: // Line separator
case 0x2029: // Paragraph separator
case 0x202F: // Narrow no-break space
case 0x205F: // Medium mathematical space
case 0x2060: // Word joiner
case 0x3000: // Ideographic space
case 0xFEFF: // Zero width no-break space
sRes += L' ';
break;
default:
sRes += c;
}
}
return sRes;
}
void projectPolygon(const std::vector<CPoint>& polygon, const CPoint& axis, double& min, double& max)
{
min = std::numeric_limits<double>::max();
max = std::numeric_limits<double>::lowest();
for (const auto& point : polygon)
{
double projection = (point.x * axis.x + point.y * axis.y) / (axis.x * axis.x + axis.y * axis.y);
projection *= (axis.x * axis.x + axis.y * axis.y);
if (projection < min) min = projection;
if (projection > max) max = projection;
}
}
bool SAT(const std::vector<CPoint>& poly1, const std::vector<CPoint>& poly2)
{
std::vector<CPoint> axes;
for (size_t i = 0; i < poly1.size(); i++)
{
CPoint p1 = poly1[i];
CPoint p2 = poly1[(i + 1) % poly1.size()];
CPoint edge(p2.x - p1.x, p2.y - p1.y);
CPoint normal(-edge.y, edge.x); // Перпендикуляр к ребру
axes.push_back(normal);
}
for (size_t i = 0; i < poly2.size(); i++)
{
CPoint p1 = poly2[i];
CPoint p2 = poly2[(i + 1) % poly2.size()];
CPoint edge(p2.x - p1.x, p2.y - p1.y);
CPoint normal(-edge.y, edge.x); // Перпендикуляр к ребру
axes.push_back(normal);
}
// Проверяем все оси на разделение
for (const auto& axis : axes)
{
double min1, max1, min2, max2;
projectPolygon(poly1, axis, min1, max1);
projectPolygon(poly2, axis, min2, max2);
if (max1 < min2 || max2 < min1)
return false; // Найдена разделяющая ось
}
return true; // Пересекаются
}
double crossProduct(double x1, double y1, double x2, double y2, double x3, double y3)
{
return (x2 - x1) * (y3 - y1) - (y2 - y1) * (x3 - x1);
}
bool isPointInQuad(double px, double py, double x1, double y1, double x2, double y2, double x3, double y3, double x4, double y4)
{
if (x1 == x2 && x2 == x3 && x3 == x4 && y1 == y2 && y2 == y3 && y3 == y4)
return (px == x1 && py == y1);
// Проверяем знаки векторных произведений для всех сторон
double cross1 = crossProduct(x1, y1, x2, y2, px, py);
double cross2 = crossProduct(x2, y2, x3, y3, px, py);
double cross3 = crossProduct(x3, y3, x4, y4, px, py);
double cross4 = crossProduct(x4, y4, x1, y1, px, py);
// Точка внутри, если все векторные произведения имеют одинаковый знак
bool allPositive = (cross1 >= 0 && cross2 >= 0 && cross3 >= 0 && cross4 >= 0);
bool allNegative = (cross1 <= 0 && cross2 <= 0 && cross3 <= 0 && cross4 <= 0);
return (allNegative || allPositive) && !(cross1 == 0 && cross2 == 0 && cross3 == 0 && cross4 == 0);
}
bool RectangleIntersection::segmentsIntersect(const CPoint& a, const CPoint& b, const CPoint& c, const CPoint& d, CPoint& intersection)
{
double x1 = a.x, y1 = a.y;
double x2 = b.x, y2 = b.y;
double x3 = c.x, y3 = c.y;
double x4 = d.x, y4 = d.y;
double denom = (x1 - x2) * (y3 - y4) - (y1 - y2) * (x3 - x4);
if (std::abs(denom) < 1e-10) return false;
double t = ((x1 - x3) * (y3 - y4) - (y1 - y3) * (x3 - x4)) / denom;
double u = -((x1 - x2) * (y1 - y3) - (y1 - y2) * (x1 - x3)) / denom;
if (t >= 0 && t <= 1 && u >= 0 && u <= 1)
{
intersection.x = x1 + t * (x2 - x1);
intersection.y = y1 + t * (y2 - y1);
return true;
}
return false;
}
bool RectangleIntersection::pointInRectangle(const CPoint& p, const std::vector<CPoint>& rect)
{
double totalAngle = 0;
int n = rect.size();
for (int i = 0; i < n; i++)
{
CPoint v1 = { rect[i].x - p.x, rect[i].y - p.y };
CPoint v2 = { rect[(i + 1) % n].x - p.x, rect[(i + 1) % n].y - p.y };
double dot = v1.x * v2.x + v1.y * v2.y;
double cross = v1.x * v2.y - v1.y * v2.x;
double angle = std::atan2(cross, dot);
totalAngle += angle;
}
return std::abs(totalAngle) > 1;
}
double RectangleIntersection::distanceAlongLine(const CPoint& start, const CPoint& end, const CPoint& point)
{
double dx = end.x - start.x;
double dy = end.y - start.y;
double length = std::sqrt(dx * dx + dy * dy);
if (length < 1e-10) return 0;
// Проекция вектора (point - start) на направление отрезка
double proj = ((point.x - start.x) * dx + (point.y - start.y) * dy) / length;
return proj;
}
std::vector<CSegment> RectangleIntersection::findSegmentsOutsideRectangles(const CSegment& line, const std::vector<std::vector<CPoint>>& rectangles)
{
std::vector<CPoint> allIntersections;
// Собираем все точки пересечения со всеми прямоугольниками
for (const auto& rect : rectangles)
{
for (int i = 0; i < rect.size(); i++)
{
CPoint intersection;
if (segmentsIntersect(line.start, line.end, rect[i], rect[(i + 1) % rect.size()], intersection))
allIntersections.push_back(intersection);
}
}
// Добавляем концы отрезка
allIntersections.push_back(line.start);
allIntersections.push_back(line.end);
// Удаляем дубликаты
std::sort(allIntersections.begin(), allIntersections.end(), [&line](const CPoint& a, const CPoint& b)
{
return distanceAlongLine(line.start, line.end, a) < distanceAlongLine(line.start, line.end, b);
});
auto last = std::unique(allIntersections.begin(), allIntersections.end());
allIntersections.erase(last, allIntersections.end());
// Проверяем каждый сегмент между точками пересечения
std::vector<CSegment> result;
for (size_t i = 0; i < allIntersections.size() - 1; i++) {
CPoint start = allIntersections[i];
CPoint end = allIntersections[i + 1];
// Находим среднюю точку сегмента
CPoint mid =
{
(start.x + end.x) / 2,
(start.y + end.y) / 2
};
// Проверяем, находится ли средняя точка внутри какого-либо прямоугольника
bool isInsideAnyRectangle = false;
for (const auto& rect : rectangles)
{
if (pointInRectangle(mid, rect))
{
isInsideAnyRectangle = true;
break;
}
}
// Если средняя точка не внутри ни одного прямоугольника - это внешний сегмент
if (!isInsideAnyRectangle)
result.push_back(CSegment(start, end));
}
return result;
}
std::vector<CSegment> RectangleIntersection::findSegmentsOutsideRectanglesSequential(const CSegment& line, const std::vector<std::vector<CPoint>>& rectangles)
{
// Начинаем с полного отрезка
std::vector<CSegment> currentSegments = {line};
// Последовательно вычитаем каждый прямоугольник
for (const auto& rect : rectangles) {
std::vector<CSegment> newSegments;
for (const auto& segment : currentSegments) {
auto segmentsOutside = findSegmentsOutsideRectangles(segment, {rect});
newSegments.insert(newSegments.end(), segmentsOutside.begin(), segmentsOutside.end());
}
currentSegments = newSegments;
}
return currentSegments;
}
}