/* * 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 */ /* * Date: 27.10.2002 */ /* * Author : Boris Mikhailenko */ /* $Revision: 1.41 $ $Date: 2010/11/03 10:26:30 $ $Author: faust $ */ /*#include #include #include #include #include #include #include #include #include #include #ifdef WIN32 #include #else #include #include #include #include #include #endif*/ #include #include #include #include #include #include #include #include #include #include #include "common.h" #ifndef INET_ADDRSTRLEN # define INET_ADDRSTRLEN 16 #endif using namespace std; //----------------------------------------------------------------------------- int strtodouble2(const char * s, double &a) { char *res; a = strtod(s, &res); if (*res != 0) return EINVAL; return 0; } //----------------------------------------------------------------------------- #ifdef DEBUG int printfd(const char * __file__, const char * fmt, ...) #else int printfd(const char *, const char *, ...) #endif { #ifdef DEBUG char buff[1024]; time_t t = time(NULL); va_list vl; va_start(vl, fmt); vsnprintf(buff, sizeof(buff), fmt, vl); va_end(vl); printf("%18s > %s > ", __file__, LogDate(t)+11); printf("%s", buff); #endif return 0; } //----------------------------------------------------------------------------- int strprintf(string * str, const char * fmt, ...) { char buff[1024]; va_list vl; va_start(vl, fmt); int n = vsnprintf(buff, sizeof(buff), fmt, vl); va_end(vl); buff[1023] = 0; *str = buff; return n; } //----------------------------------------------------------------------------- const char *IntToKMG(long long a, int stat) { static int64_t M = 1024*1024; static int64_t G = 1024*1024*1024; static char str[30]; switch (stat) { case ST_B: #ifdef __WIN32__ sprintf(str, "%Ld", a); #else sprintf(str, "%lld", a); #endif break; case ST_KB: sprintf(str, "%.2f kb", double(a)/1024.0); break; case ST_MB: sprintf(str, "%.2f Mb", double(a)/(1024.0*1024.0)); break; default: if (a > G) { sprintf(str, "%.2f Gb", double(a)/double(G)); return &str[0]; } if (a < -G) { sprintf(str, "%.2f Gb", double(a)/double(G)); return &str[0]; } if (a > M) { sprintf(str, "%.2f Mb", double(a)/double(M)); return &str[0]; } if (a < -M) { sprintf(str, "%.2f Mb", double(a)/double(M)); return &str[0]; } sprintf(str, "%.2f kb", double(a)/1024.0); break; } return str; } //--------------------------------------------------------------------------- unsigned char koi2win[] = { 0x00, 0x01, 0x02, 0x03, 0x04, 0x05, 0x06, 0x07, 0x08, 0x09, 0x0A, 0x0B, 0x0C, 0x0D, 0x0E, 0x0F, 0x10, 0x11, 0x12, 0x13, 0x14, 0x15, 0x16, 0x17, 0x18, 0x19, 0x1A, 0x1B, 0x1C, 0x1D, 0x1E, 0x1F, 0x20, 0x21, 0x22, 0x23, 0x24, 0x25, 0x26, 0x27, 0x28, 0x29, 0x2A, 0x2B, 0x2C, 0x2D, 0x2E, 0x2F, 0x30, 0x31, 0x32, 0x33, 0x34, 0x35, 0x36, 0x37, 0x38, 0x39, 0x3A, 0x3B, 0x3C, 0x3D, 0x3E, 0x3F, 0x40, 0x41, 0x42, 0x43, 0x44, 0x45, 0x46, 0x47, 0x48, 0x49, 0x4A, 0x4B, 0x4C, 0x4D, 0x4E, 0x4F, 0x50, 0x51, 0x52, 0x53, 0x54, 0x55, 0x56, 0x57, 0x58, 0x59, 0x5A, 0x5B, 0x5C, 0x5D, 0x5E, 0x5F, 0x60, 0x61, 0x62, 0x63, 0x64, 0x65, 0x66, 0x67, 0x68, 0x69, 0x6A, 0x6B, 0x6C, 0x6D, 0x6E, 0x6F, 0x70, 0x71, 0x72, 0x73, 0x74, 0x75, 0x76, 0x77, 0x78, 0x79, 0x7A, 0x7B, 0x7C, 0x7D, 0x7E, 0x7F, 0x80, 0x81, 0x82, 0x83, 0x84, 0x85, 0x86, 0x87, 0x88, 0x89, 0x8A, 0x8B, 0x8C, 0x8D, 0x8E, 0x8F, 0x90, 0x91, 0x92, 0x93, 0x94, 0x95, 0x96, 0x97, 0x98, 0x99, 0x9A, 0x9B, 0x9C, 0x9D, 0x9E, 0x9F, 0xA0, 0xA1, 0xA2, 0xB8, 0xBA, 0xA5, 0xB3, 0xBF, 0xA8, 0xA9, 0xAA, 0xAB, 0xAC, 0xB4, 0xAE, 0xAF, 0xB0, 0xB1, 0xB2, 0xA8, 0xAA, 0xB5, 0xB2, 0xAF, 0xB8, 0xB9, 0xBA, 0xBB, 0xBC, 0xA5, 0xBE, 0xBF, 0xFE, 0xE0, 0xE1, 0xF6, 0xE4, 0xE5, 0xF4, 0xE3, 0xF5, 0xE8, 0xE9, 0xEA, 0xEB, 0xEC, 0xED, 0xEE, 0xEF, 0xFF, 0xF0, 0xF1, 0xF2, 0xF3, 0xE6, 0xE2, 0xFC, 0xFB, 0xE7, 0xF8, 0xFD, 0xF9, 0xF7, 0xFA, 0xDE, 0xC0, 0xC1, 0xD6, 0xC4, 0xC5, 0xD4, 0xC3, 0xD5, 0xC8, 0xC9, 0xCA, 0xCB, 0xCC, 0xCD, 0xCE, 0xCF, 0xDF, 0xD0, 0xD1, 0xD2, 0xD3, 0xC6, 0xC2, 0xDC, 0xDB, 0xC7, 0xD8, 0xDD, 0xD9, 0xD7, 0xDA}; unsigned char win2koi[] = { 0x00, 0x01, 0x02, 0x03, 0x04, 0x05, 0x06, 0x07, 0x08, 0x09, 0x0A, 0x0B, 0x0C, 0x0D, 0x0E, 0x0F, 0x10, 0x11, 0x12, 0x13, 0x14, 0x15, 0x16, 0x17, 0x18, 0x19, 0x1A, 0x1B, 0x1C, 0x1D, 0x1E, 0x1F, 0x20, 0x21, 0x22, 0x23, 0x24, 0x25, 0x26, 0x27, 0x28, 0x29, 0x2A, 0x2B, 0x2C, 0x2D, 0x2E, 0x2F, 0x30, 0x31, 0x32, 0x33, 0x34, 0x35, 0x36, 0x37, 0x38, 0x39, 0x3A, 0x3B, 0x3C, 0x3D, 0x3E, 0x3F, 0x40, 0x41, 0x42, 0x43, 0x44, 0x45, 0x46, 0x47, 0x48, 0x49, 0x4A, 0x4B, 0x4C, 0x4D, 0x4E, 0x4F, 0x50, 0x51, 0x52, 0x53, 0x54, 0x55, 0x56, 0x57, 0x58, 0x59, 0x5A, 0x5B, 0x5C, 0x5D, 0x5E, 0x5F, 0x60, 0x61, 0x62, 0x63, 0x64, 0x65, 0x66, 0x67, 0x68, 0x69, 0x6A, 0x6B, 0x6C, 0x6D, 0x6E, 0x6F, 0x70, 0x71, 0x72, 0x73, 0x74, 0x75, 0x76, 0x77, 0x78, 0x79, 0x7A, 0x7B, 0x7C, 0x7D, 0x7E, 0x7F, 0x80, 0x81, 0x82, 0x83, 0x84, 0x85, 0x86, 0x87, 0x88, 0x89, 0x8A, 0x8B, 0x8C, 0x8D, 0x8E, 0x8F, 0x90, 0x91, 0x92, 0x93, 0x94, 0x95, 0x96, 0x97, 0x98, 0x99, 0x9A, 0x9B, 0x9C, 0x9D, 0x9E, 0x9F, 0xA0, 0xA1, 0xA2, 0xA3, 0xA4, 0xBD, 0xA6, 0xA7, 0xB3, 0xA9, 0xB4, 0xAB, 0xAC, 0xAD, 0xAE, 0xB7, 0xB0, 0xB1, 0xB6, 0xA6, 0xAD, 0xB5, 0xB6, 0xB7, 0xA3, 0xB9, 0xA4, 0xBB, 0xBC, 0xBD, 0xBE, 0xA7, 0xE1, 0xE2, 0xF7, 0xE7, 0xE4, 0xE5, 0xF6, 0xFA, 0xE9, 0xEA, 0xEB, 0xEC, 0xED, 0xEE, 0xEF, 0xF0, 0xF2, 0xF3, 0xF4, 0xF5, 0xE6, 0xE8, 0xE3, 0xFE, 0xFB, 0xFD, 0xFF, 0xF9, 0xF8, 0xFC, 0xE0, 0xF1, 0xC1, 0xC2, 0xD7, 0xC7, 0xC4, 0xC5, 0xD6, 0xDA, 0xC9, 0xCA, 0xCB, 0xCC, 0xCD, 0xCE, 0xCF, 0xD0, 0xD2, 0xD3, 0xD4, 0xD5, 0xC6, 0xC8, 0xC3, 0xDE, 0xDB, 0xDD, 0xDF, 0xD9, 0xD8, 0xDC, 0xC0, 0xD1}; //--------------------------------------------------------------------------- void KOIToWin(const char * s1, char * s2, int l) { unsigned char t; for (int j = 0; j < l; j++) { t = s1[j]; s2[j] = koi2win[t]; if (s1[j] == 0) break; } } //--------------------------------------------------------------------------- void WinToKOI(const char * s1, char * s2, int l) { unsigned char t; for (int j = 0; j < l; j++) { t = s1[j]; s2[j] = win2koi[t]; if (s1[j] == 0) break; } } //--------------------------------------------------------------------------- void KOIToWin(const string & s1, string * s2) { s2->erase(s2->begin(), s2->end()); unsigned char t; s2->reserve(s1.length()); for (int j = 0; j < (int)s1.length(); j++) { t = s1[j]; s2->push_back(koi2win[t]); } } //--------------------------------------------------------------------------- void WinToKOI(const string & s1, string * s2) { s2->erase(s2->begin(), s2->end()); unsigned char t; s2->reserve(s1.length()); for (int j = 0; j < (int)s1.length(); j++) { t = s1[j]; s2->push_back(win2koi[t]); } } //--------------------------------------------------------------------------- void Encode12str(string & dst, const string & src) { dst.erase(dst.begin(), dst.end()); for (size_t i = 0; i < src.length(); i++) { dst.push_back('a' + (src[i] & 0x0f)); dst.push_back('a' + ((src[i] & 0xf0) >> 4)); } } //--------------------------------------------------------------------------- void Decode21str(std::string & dst, const std::string & src) { dst.erase(dst.begin(), dst.end()); for (size_t i = 0; i < src.length() / 2; i++) { char c1 = src[i * 2]; char c2 = src[i * 2 + 1]; c1 -= 'a'; c2 -= 'a'; dst.push_back(c1 + (c2 << 4)); } } //--------------------------------------------------------------------------- void Encode12(char * dst, const char * src, size_t srcLen) { for (size_t i = 0; i <= srcLen; i++) { if (src[i] == 0) { dst[i * 2] = 'a'; dst[i * 2 + 1] = 'a'; break; } char c1 = src[i] & 0x0f; char c2 = (src[i] & 0xf0) >> 4; c1 += 'a'; c2 += 'a'; dst[i * 2] = c1; dst[i * 2 + 1] = c2; } dst[srcLen * 2] = 0; } //--------------------------------------------------------------------------- void Decode21(char * dst, const char * src) { for (size_t i = 0; ; i++) { if (src[i * 2] == 0) break; char c1 = src[i * 2]; char c2 = src[i * 2 + 1]; c1 -= 'a'; c2 -= 'a'; dst[i] = c1 + (c2 << 4); } dst[strlen(src) / 2] = 0; } //--------------------------------------------------------------------------- int ParseIPString(const char * str, uint32_t * ips, int maxIP) { /* *Function Name:ParseIPString * *Parameters: строка для разбора и массив куда заносить полученные адреса * *Description: На входе должна быть строка вида "ip1,ip2,ip3" или "*" В первом случае в массив заносятся разобранные адреса. Если их меньше MAX_IP?, то последний адрес будет 255.255.255.255 Если строка * , то перваый адрес будет 0.0.0.0, т.е. любой * *Returns: 0 если все ОК * */ char p[255]; char * p1, *pp; int n = 0; strncpy(p, str, 254); pp = p; memset(ips, 0xFF, sizeof(unsigned long) * maxIP); if (str[0] == '*' && strlen(str) == 1) { ips[0] = 0; return 0; } for (int i = 0; i < maxIP; i++) { p1 = strtok(pp, ",\n "); pp = NULL; if (p1 == NULL && n == 0)// указатель нуль и прочитано адресов тоже ноль { return EINVAL; } if (p1 == NULL && n) { return 0; } struct in_addr in; if (!inet_aton(p1, &in)) { //printf("INADDR_NONE\n"); return EINVAL; } ips[n] = in.s_addr; /*if (ips[n] == INADDR_NONE) return EINVAL;*/ n++; if (n >= maxIP) return 0; } return 0; } //----------------------------------------------------------------------------- int DaysInCurrentMonth() { time_t t = time(NULL); struct tm * lt = localtime(&t); return DaysInMonth(lt->tm_year, lt->tm_mon); } //----------------------------------------------------------------------------- int DaysInMonth(unsigned year, unsigned mon) { assert(mon < 12 && "Month number should be 0 - 11"); switch (mon) { case 0: return 31; //jan case 1: if (year % 4 == 0 && (year % 100 != 0 || year % 400 == 0)) return 29; return 28; //feb case 2: return 31; //mar case 3: return 30; //apr case 4: return 31; //may case 5: return 30; //june case 6: return 31; //jule case 7: return 31; //aug case 8: return 30; //sep case 9: return 31; //oct case 10: return 30; //nov case 11: return 31; //dec } return -1; // We will never reach here } //----------------------------------------------------------------------------- int Min8(int a) { /* Функция возвращает наименьшее число кратное 8-ми большее или равное заданному * */ if (a % 8 == 0) return a; return a + (8 - a % 8); } //----------------------------------------------------------------------------- /*char * inet_ntostr(unsigned long ip) { struct in_addr addr = {ip}; return inet_ntoa(addr); }*/ //----------------------------------------------------------------------------- std::string inet_ntostring(uint32_t ip) { char buf[INET_ADDRSTRLEN + 1]; return inet_ntop(AF_INET, &ip, buf, INET_ADDRSTRLEN); } //----------------------------------------------------------------------------- uint32_t inet_strington(const std::string & value) { uint32_t result; if (inet_pton(AF_INET, value.c_str(), &result) <= 0) return 0; return result; } //----------------------------------------------------------------------------- int ParseTariffTimeStr(const char * str, int &h1, int &m1, int &h2, int &m2) { char hs1[10], ms1[10], hs2[10], ms2[10]; char s1[25], s2[25]; char ss[49]; char *p1, *p2; strncpy(ss, str, 48); p1 = strtok(ss, "-"); if (!p1) return -1; strncpy(s1, p1, 24); p2 = strtok(NULL, "-"); if (!p2) return -1; strncpy(s2, p2, 24); p1 = strtok(s1, ":"); if (!p1) return -1; strncpy(hs1, p1, 9); p2 = strtok(NULL, ":"); if (!p2) return -1; strncpy(ms1, p2, 9); p1 = strtok(s2, ":"); if (!p1) return -1; strncpy(hs2, p1, 9); p2 = strtok(NULL, ":"); if (!p2) return -1; strncpy(ms2, p2, 9); if (str2x(hs1, h1) != 0) return -1; if (str2x(ms1, m1) != 0) return -1; if (str2x(hs2, h2) != 0) return -1; if (str2x(ms2, m2) != 0) return -1; return 0; } /*//--------------------------------------------------------------------------- bool IsDigit(char c) { if (c >= '0' && c <= '9') return true; return false; } //----------------------------------------------------------------------------- bool IsAlpha(char c) { if ((c >= 'A' && c <= 'Z') || (c >= 'a' && c <= 'z')) return true; return false; }*/ //----------------------------------------------------------------------------- const char * LogDate(time_t t) { static char s[32]; struct tm * tt = localtime(&t); snprintf(s, 20, "%d-%s%d-%s%d %s%d:%s%d:%s%d", tt->tm_year + 1900, tt->tm_mon + 1 < 10 ? "0" : "", tt->tm_mon + 1, tt->tm_mday < 10 ? "0" : "", tt->tm_mday, tt->tm_hour < 10 ? "0" : "", tt->tm_hour, tt->tm_min < 10 ? "0" : "", tt->tm_min, tt->tm_sec < 10 ? "0" : "", tt->tm_sec); return s; } //----------------------------------------------------------------------------- uint32_t CalcMask(uint32_t msk) { if (msk >= 32) return 0xFFffFFff; if (msk == 0) return 0; return htonl(0xFFffFFff << (32 - msk)); } //--------------------------------------------------------------------------- void TouchFile(const string & fileName) { FILE * f = fopen(fileName.c_str(), "w"); if (f) fclose(f); } //--------------------------------------------------------------------------- #ifdef WIN32 void EncodeStr(char * str, unsigned long serial, int useHDD) { int len = strlen(str); char stren[100]; int i, j = 0; char c1, c2; char serial_c[sizeof(serial)]; memcpy(serial_c, &serial, sizeof(serial)); for (i = 0; i < len; i++) { if (!useHDD) str[i] = str[i]^49; else { str[i] = str[i]^serial_c[j%sizeof(serial)]; j++; } } for (i = 0; i < 2*len; i++) { if (i%2) { c1 = (str[i/2] >> 4); c1 = c1 + 50; stren[i] = c1; } else { c2 = (str[i/2] & 0x0f); c2 += 50; stren[i] = c2; } } stren[i] = 0; strcpy(str, stren); } //--------------------------------------------------------------------------- void DecodeStr(char * str, unsigned long serial, int useHDD) { int len = strlen(str); char strdc[100]; int i, j = 0; char c1, c2; char serial_c[sizeof(serial)]; memcpy(serial_c, &serial, sizeof(serial)); for (i = 0; i < len; i += 2) { c1 = (str[i] - 50); c2 = (str[i+1] - 50)<<4; strdc[i/2] = c1+c2; } for (i = 0; i < len/2; i++) { if (!useHDD) strdc[i] = strdc[i]^49; else { strdc[i] = strdc[i]^serial_c[j%sizeof(serial)]; j++; } } strdc[i] = 0; strcpy(str, strdc); } //--------------------------------------------------------------------------- #endif //WIN32 void SwapBytes(uint16_t & value) { value = (value >> 8) | (value << 8); } //--------------------------------------------------------------------------- void SwapBytes(uint32_t & value) { value = (value >> 24) | ((value << 8) & 0x00FF0000L)| ((value >> 8) & 0x0000FF00L)| (value << 24); } //--------------------------------------------------------------------------- void SwapBytes(uint64_t & value) { value = (value >> 56) | ((value << 40) & 0x00FF000000000000LL) | ((value << 24) & 0x0000FF0000000000LL) | ((value << 8) & 0x000000FF00000000LL) | ((value >> 8) & 0x00000000FF000000LL) | ((value >> 24) & 0x0000000000FF0000LL) | ((value >> 40) & 0x000000000000FF00LL) | (value << 56); } //--------------------------------------------------------------------------- void SwapBytes(int16_t & value) { uint16_t temp = value; SwapBytes(temp); value = temp; } //--------------------------------------------------------------------------- void SwapBytes(int32_t & value) { uint32_t temp = value; SwapBytes(temp); value = temp; } //--------------------------------------------------------------------------- void SwapBytes(int64_t & value) { uint64_t temp = value; SwapBytes(temp); value = temp; } //--------------------------------------------------------------------------- int str2x(const std::string & str, int & x) { x = strtol(str.c_str(), NULL, 10); if (errno == ERANGE) return -1; return 0; } //--------------------------------------------------------------------------- int str2x(const std::string & str, unsigned & x) { x = strtoul(str.c_str(), NULL, 10); if (errno == ERANGE) return -1; return 0; } //--------------------------------------------------------------------------- int str2x(const std::string & str, long long & x) { x = strtoll(str.c_str(), NULL, 10); if (errno == ERANGE) return -1; return 0; } //--------------------------------------------------------------------------- int str2x(const std::string & str, unsigned long long & x) { x = strtoull(str.c_str(), NULL, 10); if (errno == ERANGE) return -1; return 0; } //--------------------------------------------------------------------------- const std::string & x2str(unsigned x, std::string & s) { return unsigned2str(x, s); } //--------------------------------------------------------------------------- const std::string & x2str(unsigned long long x, std::string & s) { return unsigned2str(x, s); } //--------------------------------------------------------------------------- std::string & TrimL(std::string & val) { size_t pos = val.find_first_not_of(" \t"); if (pos == std::string::npos) { val.erase(val.begin(), val.end()); } else { val.erase(0, pos); } return val; } //--------------------------------------------------------------------------- std::string & TrimR(std::string & val) { size_t pos = val.find_last_not_of(" \t"); if (pos != std::string::npos) { val.erase(pos + 1); } return val; } //--------------------------------------------------------------------------- std::string & Trim(std::string & val) { return TrimR(TrimL(val)); } //--------------------------------------------------------------------------- time_t stg_timegm(struct tm * brokenTime) { #ifdef HAVE_TIMEGM return timegm(brokenTime); #else time_t ret; char *tz; tz = getenv("TZ"); setenv("TZ", "", 1); tzset(); ret = mktime(brokenTime); if (tz) setenv("TZ", tz, 1); else unsetenv("TZ"); tzset(); return ret; #endif } //--------------------------------------------------------------------------- std::string IconvString(const std::string & source, const std::string & from, const std::string & to) { if (source.empty()) return std::string(); size_t inBytesLeft = source.length() + 1; size_t outBytesLeft = source.length() * 2 + 1; char * inBuf = new char[inBytesLeft]; char * outBuf = new char[outBytesLeft]; strncpy(inBuf, source.c_str(), source.length()); inBuf[source.length()] = 0; #if defined(FREE_BSD) || defined(FREE_BSD5) const char * srcPos = inBuf; #else char * srcPos = inBuf; #endif char * dstPos = outBuf; iconv_t handle = iconv_open(to.c_str(), from.c_str()); if (handle == iconv_t(-1)) { if (errno == EINVAL) { printfd(__FILE__, "IconvString(): iconv from %s to %s failed\n", from.c_str(), to.c_str()); delete[] outBuf; delete[] inBuf; return source; } else printfd(__FILE__, "IconvString(): iconv_open error\n"); delete[] outBuf; delete[] inBuf; return source; } size_t res = iconv(handle, &srcPos, &inBytesLeft, &dstPos, &outBytesLeft); if (res == size_t(-1)) { printfd(__FILE__, "IconvString(): '%s'\n", strerror(errno)); iconv_close(handle); delete[] outBuf; delete[] inBuf; return source; } dstPos = 0; std::string dst(outBuf); iconv_close(handle); delete[] outBuf; delete[] inBuf; return dst; } //---------------------------------------------------------------------------