416 lines
15 KiB
C++
416 lines
15 KiB
C++
/* Copyright (C) 1996-1997 Id Software, Inc.
|
|
|
|
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., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
|
|
|
|
See file, 'COPYING', for details.
|
|
*/
|
|
|
|
#include <common/cmdlib.hh>
|
|
#include <common/log.hh>
|
|
#include <common/threads.hh>
|
|
|
|
#include <sys/types.h>
|
|
#include <sys/stat.h>
|
|
|
|
#ifdef _WIN32
|
|
#include <direct.h>
|
|
#include <windows.h>
|
|
#endif
|
|
|
|
#ifdef LINUX
|
|
#include <sys/time.h>
|
|
#include <unistd.h>
|
|
#include <cstring>
|
|
#endif
|
|
|
|
#include <cstdint>
|
|
|
|
#include <algorithm>
|
|
#include <string>
|
|
|
|
/* set these before calling CheckParm */
|
|
int myargc;
|
|
char **myargv;
|
|
|
|
char com_token[1024];
|
|
bool com_eof;
|
|
|
|
/*
|
|
* =================
|
|
* Error
|
|
* For abnormal program terminations
|
|
* =================
|
|
*/
|
|
[[noreturn]] void Error(const char *error)
|
|
{
|
|
logging::print("************ ERROR ************\n{}\n", error);
|
|
logging::close();
|
|
#ifdef _DEBUG
|
|
__debugbreak();
|
|
#endif
|
|
exit(1);
|
|
}
|
|
|
|
void // mxd
|
|
string_replaceall(std::string &str, const std::string &from, const std::string &to)
|
|
{
|
|
if (from.empty()) {
|
|
return;
|
|
}
|
|
|
|
size_t start_pos = 0;
|
|
while ((start_pos = str.find(from, start_pos)) != std::string::npos) {
|
|
str.replace(start_pos, from.length(), to);
|
|
start_pos += to.length(); // In case 'to' contains 'from', like replacing 'x' with 'yx'
|
|
}
|
|
}
|
|
|
|
bool // mxd
|
|
string_iequals(const std::string_view &a, const std::string_view &b)
|
|
{
|
|
size_t sz = a.size();
|
|
if (b.size() != sz)
|
|
return false;
|
|
for (size_t i = 0; i < sz; ++i)
|
|
if (tolower(a[i]) != tolower(b[i]))
|
|
return false;
|
|
return true;
|
|
}
|
|
|
|
/* ========================================================================= */
|
|
|
|
/*
|
|
* FIXME: byte swap?
|
|
*
|
|
* this is a 16 bit, non-reflected CRC using the polynomial 0x1021
|
|
* and the initial and final xor values shown below... in other words, the
|
|
* CCITT standard CRC used by XMODEM
|
|
*/
|
|
|
|
constexpr uint16_t CRC_INIT_VALUE = 0xffff;
|
|
|
|
static uint16_t crctable[256] = {0x0000, 0x1021, 0x2042, 0x3063, 0x4084, 0x50a5, 0x60c6, 0x70e7, 0x8108, 0x9129, 0xa14a,
|
|
0xb16b, 0xc18c, 0xd1ad, 0xe1ce, 0xf1ef, 0x1231, 0x0210, 0x3273, 0x2252, 0x52b5, 0x4294, 0x72f7, 0x62d6, 0x9339,
|
|
0x8318, 0xb37b, 0xa35a, 0xd3bd, 0xc39c, 0xf3ff, 0xe3de, 0x2462, 0x3443, 0x0420, 0x1401, 0x64e6, 0x74c7, 0x44a4,
|
|
0x5485, 0xa56a, 0xb54b, 0x8528, 0x9509, 0xe5ee, 0xf5cf, 0xc5ac, 0xd58d, 0x3653, 0x2672, 0x1611, 0x0630, 0x76d7,
|
|
0x66f6, 0x5695, 0x46b4, 0xb75b, 0xa77a, 0x9719, 0x8738, 0xf7df, 0xe7fe, 0xd79d, 0xc7bc, 0x48c4, 0x58e5, 0x6886,
|
|
0x78a7, 0x0840, 0x1861, 0x2802, 0x3823, 0xc9cc, 0xd9ed, 0xe98e, 0xf9af, 0x8948, 0x9969, 0xa90a, 0xb92b, 0x5af5,
|
|
0x4ad4, 0x7ab7, 0x6a96, 0x1a71, 0x0a50, 0x3a33, 0x2a12, 0xdbfd, 0xcbdc, 0xfbbf, 0xeb9e, 0x9b79, 0x8b58, 0xbb3b,
|
|
0xab1a, 0x6ca6, 0x7c87, 0x4ce4, 0x5cc5, 0x2c22, 0x3c03, 0x0c60, 0x1c41, 0xedae, 0xfd8f, 0xcdec, 0xddcd, 0xad2a,
|
|
0xbd0b, 0x8d68, 0x9d49, 0x7e97, 0x6eb6, 0x5ed5, 0x4ef4, 0x3e13, 0x2e32, 0x1e51, 0x0e70, 0xff9f, 0xefbe, 0xdfdd,
|
|
0xcffc, 0xbf1b, 0xaf3a, 0x9f59, 0x8f78, 0x9188, 0x81a9, 0xb1ca, 0xa1eb, 0xd10c, 0xc12d, 0xf14e, 0xe16f, 0x1080,
|
|
0x00a1, 0x30c2, 0x20e3, 0x5004, 0x4025, 0x7046, 0x6067, 0x83b9, 0x9398, 0xa3fb, 0xb3da, 0xc33d, 0xd31c, 0xe37f,
|
|
0xf35e, 0x02b1, 0x1290, 0x22f3, 0x32d2, 0x4235, 0x5214, 0x6277, 0x7256, 0xb5ea, 0xa5cb, 0x95a8, 0x8589, 0xf56e,
|
|
0xe54f, 0xd52c, 0xc50d, 0x34e2, 0x24c3, 0x14a0, 0x0481, 0x7466, 0x6447, 0x5424, 0x4405, 0xa7db, 0xb7fa, 0x8799,
|
|
0x97b8, 0xe75f, 0xf77e, 0xc71d, 0xd73c, 0x26d3, 0x36f2, 0x0691, 0x16b0, 0x6657, 0x7676, 0x4615, 0x5634, 0xd94c,
|
|
0xc96d, 0xf90e, 0xe92f, 0x99c8, 0x89e9, 0xb98a, 0xa9ab, 0x5844, 0x4865, 0x7806, 0x6827, 0x18c0, 0x08e1, 0x3882,
|
|
0x28a3, 0xcb7d, 0xdb5c, 0xeb3f, 0xfb1e, 0x8bf9, 0x9bd8, 0xabbb, 0xbb9a, 0x4a75, 0x5a54, 0x6a37, 0x7a16, 0x0af1,
|
|
0x1ad0, 0x2ab3, 0x3a92, 0xfd2e, 0xed0f, 0xdd6c, 0xcd4d, 0xbdaa, 0xad8b, 0x9de8, 0x8dc9, 0x7c26, 0x6c07, 0x5c64,
|
|
0x4c45, 0x3ca2, 0x2c83, 0x1ce0, 0x0cc1, 0xef1f, 0xff3e, 0xcf5d, 0xdf7c, 0xaf9b, 0xbfba, 0x8fd9, 0x9ff8, 0x6e17,
|
|
0x7e36, 0x4e55, 0x5e74, 0x2e93, 0x3eb2, 0x0ed1, 0x1ef0};
|
|
|
|
void CRC_Init(uint16_t &crcvalue)
|
|
{
|
|
crcvalue = CRC_INIT_VALUE;
|
|
}
|
|
|
|
void CRC_ProcessByte(uint16_t &crcvalue, uint8_t data)
|
|
{
|
|
crcvalue = (crcvalue << 8) ^ crctable[(crcvalue >> 8) ^ data];
|
|
}
|
|
|
|
uint16_t CRC_Block(const uint8_t *start, int count)
|
|
{
|
|
uint16_t crc;
|
|
CRC_Init(crc);
|
|
while (count--)
|
|
CRC_ProcessByte(crc, *start++);
|
|
return crc;
|
|
}
|
|
|
|
/**
|
|
//========================================================================
|
|
// Copyright (c) 1998-2010,2011 Free Software Foundation, Inc.
|
|
//
|
|
// Permission is hereby granted, free of charge, to any person obtaining a
|
|
// copy of this software and associated documentation files (the
|
|
// "Software"), to deal in the Software without restriction, including
|
|
// without limitation the rights to use, copy, modify, merge, publish,
|
|
// distribute, distribute with modifications, sublicense, and/or sell
|
|
// copies of the Software, and to permit persons to whom the Software is
|
|
// furnished to do so, subject to the following conditions:
|
|
//
|
|
// The above copyright notice and this permission notice shall be included
|
|
// in all copies or substantial portions of the Software.
|
|
//
|
|
// THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
|
|
// OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
|
|
// MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.
|
|
// IN NO EVENT SHALL THE ABOVE COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM,
|
|
// DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR
|
|
// OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR
|
|
// THE USE OR OTHER DEALINGS IN THE SOFTWARE.
|
|
//
|
|
// Except as contained in this notice, the name(s) of the above copyright
|
|
// holders shall not be used in advertising or otherwise to promote the
|
|
// sale, use or other dealings in this Software without prior written
|
|
// authorization.
|
|
//========================================================================
|
|
|
|
//========================================================================
|
|
// Author: Jan-Marten Spit <jmspit@euronet.nl>
|
|
//========================================================================
|
|
*/
|
|
|
|
inline bool t_digit(char c)
|
|
{
|
|
return c >= 48 && c <= 57;
|
|
}
|
|
|
|
inline bool t_lower(char c)
|
|
{
|
|
return std::tolower(c);
|
|
}
|
|
|
|
int natstrcmp(const char *s1, const char *s2, bool case_sensitive)
|
|
{
|
|
const char *p1 = s1;
|
|
const char *p2 = s2;
|
|
const unsigned short st_scan = 0;
|
|
const unsigned short st_alpha = 1;
|
|
const unsigned short st_numeric = 2;
|
|
unsigned short state = st_scan;
|
|
const char *numstart1 = 0;
|
|
const char *numstart2 = 0;
|
|
const char *numend1 = 0;
|
|
const char *numend2 = 0;
|
|
unsigned long sz1 = 0;
|
|
unsigned long sz2 = 0;
|
|
while (*p1 && *p2) {
|
|
switch (state) {
|
|
case st_scan:
|
|
if (!t_digit(*p1) && !t_digit(*p2)) {
|
|
state = st_alpha;
|
|
if (case_sensitive ? (*p1 == *p2) : (t_lower(*p1) == t_lower(*p2))) {
|
|
p1++;
|
|
p2++;
|
|
} else if (case_sensitive ? (*p1 < *p2) : (t_lower(*p1) < t_lower(*p2)))
|
|
return -1;
|
|
else
|
|
return 1;
|
|
} else if (t_digit(*p1) && !t_digit(*p2))
|
|
return -1;
|
|
else if (!t_digit(*p1) && t_digit(*p2))
|
|
return 1;
|
|
else {
|
|
if (sz1 == 0)
|
|
while (*p1 == '0') {
|
|
p1++;
|
|
sz1++;
|
|
}
|
|
else
|
|
while (*p1 == '0')
|
|
p1++;
|
|
if (sz2 == 0)
|
|
while (*p2 == '0') {
|
|
p2++;
|
|
sz2++;
|
|
}
|
|
else
|
|
while (*p2 == '0')
|
|
p2++;
|
|
if (sz1 == sz2) {
|
|
sz1 = 0;
|
|
sz2 = 0;
|
|
};
|
|
if (!t_digit(*p1))
|
|
p1--;
|
|
if (!t_digit(*p2))
|
|
p2--;
|
|
numstart1 = p1;
|
|
numstart2 = p2;
|
|
numend1 = numstart1;
|
|
numend2 = numstart2;
|
|
p1++;
|
|
p2++;
|
|
}
|
|
break;
|
|
case st_alpha:
|
|
if (!t_digit(*p1) && !t_digit(*p2)) {
|
|
if (case_sensitive ? (*p1 == *p2) : (t_lower(*p1) == t_lower(*p2))) {
|
|
p1++;
|
|
p2++;
|
|
} else if (case_sensitive ? (*p1 < *p2) : (t_lower(*p1) < t_lower(*p2)))
|
|
return -1;
|
|
else
|
|
return 1;
|
|
} else
|
|
state = st_scan;
|
|
break;
|
|
case st_numeric:
|
|
while (t_digit(*p1))
|
|
numend1 = p1++;
|
|
while (t_digit(*p2))
|
|
numend2 = p2++;
|
|
if (numend1 - numstart1 == numend2 - numstart2 && case_sensitive
|
|
? (!strncmp(numstart1, numstart2, numend2 - numstart2 + 1))
|
|
: (!Q_strncasecmp(numstart1, numstart2, numend2 - numstart2 + 1)))
|
|
state = st_scan;
|
|
else {
|
|
if (numend1 - numstart1 < numend2 - numstart2)
|
|
return -1;
|
|
if (numend1 - numstart1 > numend2 - numstart2)
|
|
return 1;
|
|
while (*numstart1 && *numstart2) {
|
|
if (*numstart1 < *numstart2)
|
|
return -1;
|
|
if (*numstart1 > *numstart2)
|
|
return 1;
|
|
numstart1++;
|
|
numstart2++;
|
|
}
|
|
}
|
|
break;
|
|
}
|
|
}
|
|
if (sz1 < sz2)
|
|
return -1;
|
|
if (sz1 > sz2)
|
|
return 1;
|
|
if (*p1 == 0 && *p2 != 0)
|
|
return -1;
|
|
if (*p1 != 0 && *p2 == 0)
|
|
return 1;
|
|
return 0;
|
|
}
|
|
|
|
/**
|
|
* STL natural less-than string compare
|
|
* @return true when natural s1 < s2
|
|
*/
|
|
bool natstrlt(const char *s1, const char *s2, bool case_sensitive)
|
|
{
|
|
// std::cout << "natstrlt s1=" << s1 << " s2=" << s2 << std::endl;
|
|
const char *p1 = s1;
|
|
const char *p2 = s2;
|
|
const unsigned short st_scan = 0;
|
|
const unsigned short st_alpha = 1;
|
|
const unsigned short st_numeric = 2;
|
|
unsigned short state = st_scan;
|
|
const char *numstart1 = 0;
|
|
const char *numstart2 = 0;
|
|
const char *numend1 = 0;
|
|
const char *numend2 = 0;
|
|
unsigned long sz1 = 0;
|
|
unsigned long sz2 = 0;
|
|
while (*p1 && *p2) {
|
|
switch (state) {
|
|
case st_scan:
|
|
if (!t_digit(*p1) && !t_digit(*p2)) {
|
|
state = st_alpha;
|
|
if (case_sensitive ? (*p1 == *p2) : (t_lower(*p1) == t_lower(*p2))) {
|
|
p1++;
|
|
p2++;
|
|
} else
|
|
return case_sensitive ? (*p1 < *p2) : (t_lower(*p1) < t_lower(*p2));
|
|
} else if (t_digit(*p1) && !t_digit(*p2))
|
|
return true;
|
|
else if (!t_digit(*p1) && t_digit(*p2))
|
|
return false;
|
|
else {
|
|
state = st_numeric;
|
|
if (sz1 == 0)
|
|
while (*p1 == '0') {
|
|
p1++;
|
|
sz1++;
|
|
}
|
|
else
|
|
while (*p1 == '0')
|
|
p1++;
|
|
if (sz2 == 0)
|
|
while (*p2 == '0') {
|
|
p2++;
|
|
sz2++;
|
|
}
|
|
else
|
|
while (*p2 == '0')
|
|
p2++;
|
|
if (sz1 == sz2) {
|
|
sz1 = 0;
|
|
sz2 = 0;
|
|
};
|
|
if (!t_digit(*p1))
|
|
p1--;
|
|
if (!t_digit(*p2))
|
|
p2--;
|
|
numstart1 = p1;
|
|
numstart2 = p2;
|
|
numend1 = numstart1;
|
|
numend2 = numstart2;
|
|
}
|
|
break;
|
|
case st_alpha:
|
|
if (!t_digit(*p1) && !t_digit(*p2)) {
|
|
if (case_sensitive ? (*p1 == *p2) : (t_lower(*p1) == t_lower(*p2))) {
|
|
p1++;
|
|
p2++;
|
|
} else
|
|
return case_sensitive ? (*p1 < *p2) : (t_lower(*p1) < t_lower(*p2));
|
|
} else
|
|
state = st_scan;
|
|
break;
|
|
case st_numeric:
|
|
while (t_digit(*p1))
|
|
numend1 = p1++;
|
|
while (t_digit(*p2))
|
|
numend2 = p2++;
|
|
if (numend1 - numstart1 == numend2 - numstart2 &&
|
|
!strncmp(numstart1, numstart2, numend2 - numstart2 + 1))
|
|
state = st_scan;
|
|
else {
|
|
if (numend1 - numstart1 != numend2 - numstart2)
|
|
return numend1 - numstart1 < numend2 - numstart2;
|
|
while (*numstart1 && *numstart2) {
|
|
if (*numstart1 != *numstart2)
|
|
return *numstart1 < *numstart2;
|
|
numstart1++;
|
|
numstart2++;
|
|
}
|
|
}
|
|
break;
|
|
}
|
|
}
|
|
if (sz1 < sz2)
|
|
return true;
|
|
if (sz1 > sz2)
|
|
return false;
|
|
if (*p1 == 0 && *p2 != 0)
|
|
return true;
|
|
if (*p1 != 0 && *p2 == 0)
|
|
return false;
|
|
return false;
|
|
}
|
|
|
|
std::string_view::const_iterator string_ifind(std::string_view haystack, std::string_view needle)
|
|
{
|
|
return std::search(haystack.begin(), haystack.end(), needle.begin(), needle.end(),
|
|
[](char a, char b) { return tolower(a) == tolower(b); });
|
|
}
|
|
|
|
bool string_icontains(std::string_view haystack, std::string_view needle)
|
|
{
|
|
return string_ifind(haystack, needle) != haystack.end();
|
|
}
|