//--------------------------------------------------------------------------- #pragma hdrstop #include "TrialLock.h" //--------------------------------------------------------------------------- #include #include #include "define.h" //--------------------------------------------------------------------------- #pragma package(smart_init) //--------------------------------------------------------------------------- __fastcall TTrialLock::TTrialLock(TApplication *App, WORD wAProg) { // 생성자 Char *pFileName = NULL; wPT = wAProg; strDFD = ""; strDFN = ""; strKFD = ""; strKFN = ""; pFileName = new Char[MAX_PATH]; memset(pFileName, 0, MAX_PATH); nState = 0; GetSystemDirectory(pFileName, MAX_PATH); strDFD = ExtractFileDir(Application->ExeName); strDFN = "Trial.dat"; strKFD = String(pFileName); // TexPro외에 나머지는 예약 switch (wPT) { case (TRL_TEXTILE | TRL_WEAVE | TRL_KNIT): strKFN = "YWTP.Key"; // TexPro break; case TRL_TEXTILE: strKFN = "YWTE.Key"; break; case TRL_WEAVE: strKFN = "YWWV.Key"; break; case TRL_KNIT: strKFN = "YWKT.Key"; break; case (TRL_TEX3D | TRL_TEX3EDITOR): strKFN = "YW3F.Key"; // Tex3D Full Set break; case TRL_TEX3D: strKFN = "YW3D.Key"; break; case TRL_TEX3DVIEWER: strKFN = "YW3V.Key"; break; case TRL_TEX3EDITOR: strKFN = "YW3E.Key"; break; case TRL_TEXKNIT: strKFN = "YWTK.Key"; break; case TRL_TEXPRINT: strKFN = "YWTPR.Key"; // TexPrint break; case TRL_TEXSTYLIST: strKFN = "YWTS.Key"; break; case TRL_TEXTRICOT: strKFN = "YWTT.Key"; break; case TRL_TEXWEAVE: strKFN = "YWTWV.Key"; break; case TRL_TEXWORK: strKFN = "YWTW.Key"; break; } if (pFileName) { delete []pFileName; pFileName = NULL; } } //--------------------------------------------------------------------------- __fastcall TTrialLock::~TTrialLock() { // 소멸자 strDFD = ""; strDFN = ""; strKFD = ""; strKFN = ""; nState = 0; } //--------------------------------------------------------------------------- bool __fastcall TTrialLock::GF(String strF, bool bD) { // 파일 시간을 얻음 bool bReturn = true; HANDLE hFile = NULL; WIN32_FIND_DATA wfdFD; // File Data if (FileExists(strF)) { hFile = FindFirstFile(strF.c_str(), &wfdFD); if (hFile) { if (bD) { ftDC = wfdFD.ftCreationTime; ftDW = wfdFD.ftLastWriteTime; } else { ftKC = wfdFD.ftCreationTime; ftKW = wfdFD.ftLastWriteTime; } FindClose(hFile); hFile = NULL; } else { bReturn = false; } } else { bReturn = false; } return bReturn; } //--------------------------------------------------------------------------- bool __fastcall TTrialLock::SF(String strF, bool bD) { // 파일 시간을 설정 bool bReturn = true; HANDLE hFile = NULL; if (FileExists(strF)) { hFile = CreateFile(strF.c_str(), GENERIC_READ|GENERIC_WRITE, 0, NULL, OPEN_EXISTING , FILE_ATTRIBUTE_HIDDEN, NULL); if (hFile) { if (bD) { SetFileTime(hFile, &ftDC, NULL, &ftDW); } else { SetFileTime(hFile, &ftKC, NULL, &ftKW); } CloseHandle(hFile); hFile = NULL; } else { bReturn; } } else { bReturn = false; } return bReturn; } //--------------------------------------------------------------------------- bool __fastcall TTrialLock::MKF() { bool bReturn = true; HANDLE hFile = NULL; String strTF = strKFD+"\\"+strKFN; // Key File을 생성 hFile = CreateFile(strTF.c_str(), GENERIC_READ|GENERIC_WRITE, 0, NULL, OPEN_ALWAYS , FILE_ATTRIBUTE_HIDDEN, NULL); if (hFile) { CloseHandle(hFile); hFile = NULL; } else { bReturn = false; } return bReturn; } //--------------------------------------------------------------------------- bool __fastcall TTrialLock::LFKF() { // Key File을 읽는다 HANDLE hFile = NULL; DWORD dwRead = 0; float dV = 0.0, dV_C = -1.0; // Version String strTF = strKFD+"\\"+strKFN; TryStrToFloat(TexStylistVersion, dV_C); if (!FileExists(strTF)) goto fail; if ((hFile = CreateFile(strTF.c_str(), GENERIC_READ, 0, NULL, OPEN_EXISTING , FILE_ATTRIBUTE_HIDDEN, NULL)) == INVALID_HANDLE_VALUE) goto fail; if (!ReadFile(hFile, &dV, sizeof(float), &dwRead, NULL)) goto fail; if (dV != dV_C) goto fail; if (!ReadFile(hFile, &wPT_C, sizeof(WORD), &dwRead, NULL)) goto fail; if (wPT != wPT_C) goto fail; if (!ReadFile(hFile, &ftDC_C, sizeof(FILETIME), &dwRead, NULL)) goto fail; if (!ReadFile(hFile, &ftDW_C, sizeof(FILETIME), &dwRead, NULL)) goto fail; if (!ReadFile(hFile, &ftKC_C, sizeof(FILETIME), &dwRead, NULL)) goto fail; if (!ReadFile(hFile, &ftKW_C, sizeof(FILETIME), &dwRead, NULL)) goto fail; if (!ReadFile(hFile, &stPX, sizeof(SYSTEMTIME), &dwRead, NULL)) goto fail; if (hFile) CloseHandle(hFile); hFile = NULL; return true; fail: if (hFile) CloseHandle(hFile); hFile = NULL; return false; } //--------------------------------------------------------------------------- bool __fastcall TTrialLock::STKF() { // Key File을 저장한다 HANDLE hFile = NULL; DWORD dwWrite = 0; float dV = 0.0; // Version String strTF = strKFD+"\\"+strKFN; TryStrToFloat(TexStylistVersion, dV); if (!FileExists(strTF)) goto fail; if ((hFile = CreateFile(strTF.c_str(), GENERIC_WRITE, 0, NULL, OPEN_EXISTING , FILE_ATTRIBUTE_HIDDEN, NULL)) == INVALID_HANDLE_VALUE) goto fail; if (!WriteFile(hFile, &dV, sizeof(float), &dwWrite, NULL)) goto fail; if (!WriteFile(hFile, &wPT, sizeof(WORD), &dwWrite, NULL)) goto fail; if (!WriteFile(hFile, &ftDC_C, sizeof(FILETIME), &dwWrite, NULL)) goto fail; if (!WriteFile(hFile, &ftDW_C, sizeof(FILETIME), &dwWrite, NULL)) goto fail; if (!WriteFile(hFile, &ftKC_C, sizeof(FILETIME), &dwWrite, NULL)) goto fail; if (!WriteFile(hFile, &ftKW_C, sizeof(FILETIME), &dwWrite, NULL)) goto fail; if (!WriteFile(hFile, &stPX, sizeof(SYSTEMTIME), &dwWrite, NULL)) goto fail; if (hFile) CloseHandle(hFile); hFile = NULL; return true; fail: if (hFile) CloseHandle(hFile); hFile = NULL; return false; } //--------------------------------------------------------------------------- bool __fastcall TTrialLock::RFR() { // Registry 정보를 읽는다 TRegIniFile *rgR = NULL; String strR; char *pBin = NULL; String strV; // Version int nPP = 0; // Pointer Position rgR = new TRegIniFile(""); if (rgR) { rgR->RootKey = HKEY_LOCAL_MACHINE; if (!rgR->OpenKey(RegFilename, false)) goto fail; pBin = new char[(sizeof(FILETIME)*4)+(sizeof(SYSTEMTIME)*1)]; strV = rgR->ReadString("Trial", "V", ""); if (strV != TexStylistVersion) goto fail; wPT_C = rgR->ReadInteger("Trial", "PT", 0); if (wPT != wPT_C) goto fail; rgR->ReadBinaryData("D", pBin, sizeof(char)*((sizeof(FILETIME)*4)+(sizeof(SYSTEMTIME)*1))); memcpy(&ftDC_C, pBin, sizeof(FILETIME)); nPP += sizeof(FILETIME); memcpy(&ftDW_C, pBin+nPP, sizeof(FILETIME)); nPP += sizeof(FILETIME); memcpy(&ftKC_C, pBin+nPP, sizeof(FILETIME)); nPP += sizeof(FILETIME); memcpy(&ftKW_C, pBin+nPP, sizeof(FILETIME)); nPP += sizeof(FILETIME); memcpy(&stPX, pBin+nPP, sizeof(SYSTEMTIME)); delete rgR; } else { goto fail; } rgR = NULL; return true; fail: if (rgR) delete rgR; rgR = NULL; return false; } //--------------------------------------------------------------------------- bool __fastcall TTrialLock::WTR() { // Registry 정보를 저장한다 TRegIniFile *rgR = NULL; String strR; char *pBin = NULL; int nPP = 0; // Pointer Position rgR = new TRegIniFile(""); if (rgR) { rgR->RootKey = HKEY_LOCAL_MACHINE; if (!rgR->OpenKey(RegFilename, true)) goto fail; pBin = new char[(sizeof(FILETIME)*4)+(sizeof(SYSTEMTIME)*1)]; memcpy(pBin, &ftDC_C, sizeof(FILETIME)); nPP += sizeof(FILETIME); memcpy(pBin+nPP, &ftDW_C, sizeof(FILETIME)); nPP += sizeof(FILETIME); memcpy(pBin+nPP, &ftKC_C, sizeof(FILETIME)); nPP += sizeof(FILETIME); memcpy(pBin+nPP, &ftKW_C, sizeof(FILETIME)); nPP += sizeof(FILETIME); memcpy(pBin+nPP, &stPX, sizeof(SYSTEMTIME)); rgR->WriteString("Trial", "V", TexStylistVersion); rgR->WriteInteger("Trial", "PT", wPT); rgR->WriteBinaryData("D", pBin, sizeof(char)*((sizeof(FILETIME)*4)+(sizeof(SYSTEMTIME)*1))); delete rgR; } else { goto fail; } rgR = NULL; return true; fail: if (rgR) delete rgR; rgR = NULL; return false; } //--------------------------------------------------------------------------- SYSTEMTIME __fastcall TTrialLock::GED(SYSTEMTIME stC) { SYSTEMTIME stL; // LocalTime SystemTimeToTzSpecificLocalTime(NULL, &stC, &stL); // 6개월 뒤 if (stC.wMonth <= TRL_MONTH_TERM) stC.wMonth += TRL_MONTH_TERM; else { stC.wYear += 1; stC.wMonth -= TRL_MONTH_TERM; } stC.wHour = 23 - (stL.wHour - stC.wHour); // 만료일을 UTC로 저장 stC.wMinute = 59; stC.wSecond = 59; return stC; } //--------------------------------------------------------------------------- bool __fastcall TTrialLock::CompareSystemTime(SYSTEMTIME st1, SYSTEMTIME st2) { // System Time 비교 if (st1.wYear != st2.wYear || st1.wMonth != st2.wMonth || st1.wDay != st2.wDay || st1.wMinute != st2.wMinute || st1.wSecond != st2.wSecond || st1.wMilliseconds != st2.wMilliseconds) return true; else return false; // 아래 코드가 문제가 있어서 위의 코드로 대체 /* FILETIME ft1, ft2; SystemTimeToFileTime(&st1, &ft1); SystemTimeToFileTime(&st2, &ft2); return CompareFileTime(&ft1, &ft2); */ } //--------------------------------------------------------------------------- bool __fastcall TTrialLock::CHK() { // 모든 정보 체크 프로세스 // 가정 : InstallShield 설치 시 "Trial.dat"의 생성 시간과 수정 시간은 절대 같을 수 없다. // 실제 배포되는 파일의 경우도 시간이 다르고, // 만약 시간이 같다면 만듦과 동시에 기록된 것이기 떄문이다. 이는 불가능하며 크랙으로 간주한다. // // A. "Trial.dat" 파일의 생성, 수정된 시간을 체크하여 수정된 시간이 생성된 시간보다 // 먼저라면 처음 실행하는 코드로 이동 // 1. C:\Windows\System32 에 "YWTP.key" 파일을 숨김 파일로 생성한다. (TexPro 기준) // 2. 현재 시간을 구한다. // 3. 만료기간을 구한다. // 4. 최신 생성, 수정 파일에 기간 검색되지 않도록 "YWTP.key" 파일의 // 생성, 수정 시간을 1년 전으로 돌린다. // 5. "Trial.data" 파일의 수정 시간을 현재 시간으로 변경한다. // 6. 레지스트리를 저장한다. // 7. "YWTP.key" 파일을 저장한다. // 8. "Trial.data" 파일의 생성, 수정 시간을 기록한다. // 9. "YWTP.key" 파일의 생성, 수정 시간을 기록한다. // B. "Trial.dat" 파일의 생성, 수정된 시간을 체크하여 수정된 시간이 생성된 시간보다 // 나중이라면 체크하는 코드로 이동 // 1. "YWTP.key" 파일의 생성, 수정 시간을 변수에 저장한다. // 2. "YWTP.key" 파일의 내용과 "Trial.dat" 파일의 생성, 수정 시간과 동일한지 체크한다. // 3. 현재 시간과 파일 내용 중 '만료일' 체크한다. // 4. 레지스트리의 내용과 "Trial.dat" 파일의 생성, 수정 시간과 동일한지 체크한다. // 5. 현재 시간과 레지스트리 내용 중 '만료일' 체크한다. // 6. 시간 조작이 있었는지 체크한다. (컴퓨터 시간이 현재 시간보다 이전인지) // 7. 현재 시간을 "Trial.dat" 파일의 생성, 수정 시간으로 변경한다. // 8. "YWTP.key" 파일의 "Trial.dat" 파일의 생성, 수정 시간 내용을 기록한다. // 9. 레지스트리에 "Trial.dat" 파일의 생성, 수정 시간 내용을 기록한다. // 10. "YTWP.key" 파일의 생성, 수정 시간을 이전 생성, 수정 시간으로 변경한다. (되돌림) // stC: Current datetime SYSTEMTIME stC; FILETIME ftC, ftPS_T, ftPE_T, ftPX_T; nState = 0; String strDF = strDFD+"\\"+strDFN; String strKF = strKFD+"\\"+strKFN; if (!GF(strDF, true)) goto fail; // Data 파일 시간 읽음 if (CompareFileTime(&ftDC, &ftDW) > 0) nState = 0; // 생성시간이 수정 시간보다 늦는 경우 (처음설치, 또는 재설치) else nState = 2; // 기간 유효 if (nState == 0) { if (FileExists(strKF) == false && RFR() == false) MKF(); // 처음설치, Key File 생성 else if (RFR() == false) nState = 1; // Registry만 없다면 재설치된 것임. } if (nState == 0) { // 처음 실행 // Data File GetSystemTime(&stC); // 현재 시간을 구한 후 SystemTimeToFileTime(&stC, &ftDW); // Data 파일의 수정 시간을 현재 시간으로 돌림 // Expire date stPX = GED(stC); // 만료기간 설정 // Key File stC.wYear -= 1; // 1년 전으로 변경 후 SystemTimeToFileTime(&stC, &ftKC); // Key File의 생성 시간을 돌린다 (최신 생성 파일에 검색되지 않도록) SystemTimeToFileTime(&stC, &ftKW); // Key File의 수정 시간을 돌린다 (최신 수정 파일에 검색되지 않도록) // 저장할 시간 복사 ftDC_C = ftDC; ftDW_C = ftDW; ftKC_C = ftKC; ftKW_C = ftKW; WTR(); // 레지스트리 기록 STKF(); // Key 파일 저장 SF(strDF, true); // Data File의 시간을 변경 SF(strKF, false); // Key File의 시간을 변경 } else { // 시간 체크 if (!GF(strKF, false)) goto fail; // Key File 시간 읽음 // 시간 조작이 있었는지 체크 GetSystemTime(&stC); // 현재 시간을 구한 후 SystemTimeToFileTime(&stC, &ftC); // 파일 시간으로 변환 // Key File if (!LFKF()) goto fail; // Key File 내용 읽음 if (nState != 1) { // 재설치일 경우 Key File과 생성 날짜를 비교하지 않음. 만료일만 체크. if (CompareFileTime(&ftDC, &ftDC_C) != 0 || CompareFileTime(&ftDW, &ftDW_C) != 0 || CompareFileTime(&ftKC, &ftKC_C) != 0 || CompareFileTime(&ftKW, &ftKW_C) != 0) goto fail; // 날짜가 하나라도 같지 않으면 실패 } // 만료일 체크 SystemTimeToFileTime(&stPX, &ftPX_T); if (CompareFileTime(&ftC, &ftPX_T) > 0) goto exp; if (nState != 1) { // 재설치일 경우 레지스트리와 생성 날짜를 비교하지 않음. // Registry if (!RFR()) goto fail; // Registry 내용 읽음 if (CompareFileTime(&ftDC, &ftDC_C) != 0 || CompareFileTime(&ftDW, &ftDW_C) != 0 || CompareFileTime(&ftKC, &ftKC_C) != 0 || CompareFileTime(&ftKW, &ftKW_C) != 0) goto fail; // 날짜가 하나라도 같지 않으면 실패 // 만료일 체크 SystemTimeToFileTime(&stPX, &ftPX_T); if (CompareFileTime(&ftC, &ftPX_T) > 0) goto exp; } // 시간 조작이 있었는지 체크 if (CompareFileTime(&ftC, &ftDC) < 0 || CompareFileTime(&ftC, &ftDW) < 0 || CompareFileTime(&ftC, &ftKC) < 0 || CompareFileTime(&ftC, &ftKW) < 0) goto fail; // 날짜가 하나라도 작으면 실패 // 프로그램 시작 시간을 Data 파일의 생성, 수정 시간에 기록 후 저장 ftDC = ftC; ftDW = ftC; ftDC_C = ftC; ftDW_C = ftC; SF(strDF, true); // 파일 WTR(); // 레지스트리 기록 STKF(); // Key 파일 저장 SF(strKF, false); // Key File의 시간을 변경 } return true; exp: MessageDlg("The date expired.", mtError , TMsgDlgButtons() << mbOK, 0); return false; fail: MessageDlg("Abnomal termination. (a cause: clock setting, virus, crack..)" , mtError , TMsgDlgButtons() << mbOK, 0); return false; } //--------------------------------------------------------------------------- bool __fastcall TTrialLock::SV() { // 종료 직전 종료 시간 기록 // 1. 현재 시간을 구한다. // 2. "YWTP.key" 파일의 생성, 수정 시간을 변수에 저장한다. // 3. "YWTP.key" 파일의 내용을 읽은 후, 파일의 수정 시간 내용을 현재 시간으로 기록한 후 저장한다. // 4. 레지스트리 내용을 읽은 후, 파일의 수정 시간 내용을 현재 시간으로 기록한 후 저장한다. // 5. "Trial.dat" 파일의 생성, 수정 시간을 변수에 저장한다. // 6. "Trial.dat" 파일의 수정 시간을 현재 시간으로 변경 후 저장한다. // 7. "YTWP.key" 파일의 생성, 수정 시간을 이전 생성, 수정 시간으로 변경 (되돌림) SYSTEMTIME stC; FILETIME ftC; String strDF = strDFD+"\\"+strDFN; String strKF = strKFD+"\\"+strKFN; GetSystemTime(&stC); // 현재 시간을 구한 후 SystemTimeToFileTime(&stC, &ftC); // 파일 시간으로 변환 // Key File if (!GF(strKF, false)) goto fail; // 파일 시간을 얻음 // Key File if (!LFKF()) goto fail; // Key File을 읽는다 ftDW_C = ftC; // 파일 수정 시간을 현재 시간으로 if (!STKF()) goto fail; // Key File을 저장한다 // Registry if (!RFR()) goto fail; // Registry 정보를 읽는다 ftDW_C = ftC; // 파일 수정 시간을 현재 시간으로 if (!WTR()) goto fail; // Registry 정보를 저장한다 // 저장할 시간 복사 ftDW = ftC; // Data File if (!GF(strDF, true)) goto fail; // 파일 시간을 얻음 ftDW = ftC; // 파일 수정 시간을 현재 시간으로 if (!SF(strDF, true)) goto fail; // Key File의 시간을 변경 // Key File if (!SF(strKF, false)) goto fail; // Key File의 시간을 원래 시간으로 변경 return true; fail: return false; } //---------------------------------------------------------------------------