[강좌] 인스톨쉴드를 디컴파일한 Gantt/OCX 1.10 패치 (1)

[타이거팀]

키메이커 스튜디오라는 중국해커들의 사이트 (지금의 8bn.com/hambo/

처럼) 에서 Gantt/OCX 인스톨쉴드 셋업 크랙파일을 쉽게 구할수 있습니다.

그러나, 패치에 들어있는 파일은 단지 한개뿐입니다. setup.ins 라는 한개의 파일을 받아서 사용할때 먼저 트라이얼 버전을 다운받은다음 위의 파일을 덮어씌우고 설치를 시작하면 시리얼키를 묻지않고 바로 설치를
하게됩니다.

setup.ins는 인스톨 쉴드로 만든 프로그램이 설치해야할 순서를 담고있습니다.

중간에 시리얼 키를 입력받을수도 있고, 여러가지 처리를 할수도 있는데, 해커들이

노린것은 바로 이 설치순서를 엉망으로 만들거나 건너뛰게해서 정품처럼 동작하게

만들자는 취지였죠.

처음에는 Gantt/OCX Upgrade Version 1.10의 seup.ins 파일을 디컴파일하여

SETUP.RUL 파일을 만듭니다. 그리고, 설치순서를 분석해서 시리얼넘버를 체크하는

부분을 살짝고치고, 다시 인스톨쉴드에서 컴파일하여 seup.ins 을 만들어서

재배포하고 있습니다.

즉, Gantt/OCX Upgrade 를 실행시키면 압축이 풀리고, C:\WINDOWS\TEMP에

설치파일들을 풀게 되는데, 셋업은 종료시키지말고, 이 파일들은 복사해둔뒤,

셋업을 종료합니다.

미리 만들어진 seup.ins 패치파일로 덮어씌워서 교체한뒤, 다시 셋업을

실행시키면 시리얼넘버 체크부분을 를 그냥 통과합니다.

인스톨쉴드를 패치하는것이기 때문에 아주아주 무서운 악마의 기술중 하나입니다.

다른 인스톨쉴드를 사용하는 제품들도 안전할수가 없습니다.

1.10 Upgrade버전이지만 1.0버전이 안 깔려있어도 동작됩니다.

인스톨쉴드 디컴파일러라는 이름으로 인터넷에 두가지 버전이 돌아다닙니다.

현재 자료실에 관련된 setup.ins 파일을 올립니다.

델파이 5 셋업도 이 기술을 써서 시리얼키 입력을 무력화시킨 버전이 돌아다니고

있습니다.

만들어지는 스크립트 소스자체는 C코드형식을 위하고 있는데, SetupSDK 해킹편을

읽어보셨다면 거의 비슷한 방식이라서 많은 도움이 될겁니다.

아래는 인스톨쉴드 디컴파일러로 만들어진 Gantt/OCX Upgrade 1.0의

SETUP.RUL 파일입니다.

/*----------------------------------------------------------------------*
*
* Copyright (c) 1998 Free Field Inc.
*
* File Name: SETUP.RUL
*
* Description: Gantt/OCX Upgrade Version 1.10 (Dec. 15, 1997)
* Installation script.
*
* Author: Lover Boy Date: 1-17-98
*
*----------------------------------------------------------------------*/
declare

// Constant declarations.
#define SPACE_REQUIRED 100000 // Disk space in bytes.
#define APP_NAME "Gantt/OCX"
#define PROGRAM_FOLDER_NAME "GanttOCX"
#define APPBASE_PATH "Program Files\\Free Field\\GanttOCX\\"

#define COMPANY_NAME "Free Field Inc."
#define PRODUCT_NAME "GanttOCX"
#define PRODUCT_VERSION "1.1"
#define DEINSTALL_KEY "SampleDeinstKey"
#define PRODUCT_KEY "myapp.exe"

// Global variable declarations.
STRING svFolder, svDir, szMsg, szFileSet, szTitle, svUninstLogFile;
STRING svTarget[ 255 ], szProgram, szTemp[ 255 ];
BOOL bSpaceOk;
NUMBER nResult;

// Function declarations.
prototype SetupScreen();
prototype CheckRequirements();

program

StartHere:
Disable( BACKGROUND );

// Set installation info., which is required for registry entries.
InstallationInfo( COMPANY_NAME, PRODUCT_NAME, PRODUCT_VERSION, PRODUCT_KEY );

// Set up the installation screen.
SetupScreen();
Enable( DIALOGCACHE );


// Create a Welcome dialog.
WelcomeDlg:
Disable( BACKBUTTON );
Welcome( "", 0 );
Enable( BACKBUTTON );

// Test target system for proper configuration.
CheckRequirements();


// Ask user for a destination location for the installation.
GetTargetDirectory:
svTarget = TARGETDISK ^ APPBASE_PATH;

if ( AskDestPath( "", "", svTarget, 0 ) = 12 ) then
goto WelcomeDlg;
endif;

// Perform space check of target drive.
bSpaceOk = TRUE;
if (GetDiskSpace( svTarget ) < SPACE_REQUIRED) then
szMsg = "There is not enough space available on the disk\n" +
"'" + svTarget + "' \n" +
"Please free up some space or change the target location\n" +
"to a different disk";
MessageBox( szMsg, WARNING );
bSpaceOk = FALSE;
endif;

// If not enough space, ask user to try again.
if (bSpaceOk = FALSE) goto GetTargetDirectory;


SetupFilesToTransfer:
Disable( DIALOGCACHE );
szFileSet = "General";
TARGETDIR = svTarget;

// Define the file set.
FileSetBeginDefine( szFileSet );

SetStatusWindow( -1, "Copying program files..." );
CompressGet( "DATA.Z", "*.*", INCLUDE_SUBDIR );

FileSetEndDefine( szFileSet );


TransferFiles:
// Prepare InstallSHIELD to record deinstallation information.
DeinstallStart( svTarget, svUninstLogFile, DEINSTALL_KEY, 0 );
RegDBSetItem( REGDB_UNINSTALL_NAME, PRODUCT_NAME );

// Set up progress indicator and information gauge.
Disable( DIALOGCACHE );
Enable( STATUSDLG );

StatusUpdate( ON, 90 );

// Perform the file set.
SetStatusWindow( 0, "Copying program files..." );
nResult = FileSetPerformEz( szFileSet, 0 );

switch (nResult)

case FS_DONE: // Successful completion.

case FS_CREATEDIR: // Create directory error.
MessageBox( "Unable to create a directory under " + TARGETDIR + "."+
"Please check write access to this directory.", SEVERE );
exit;

default: // Group all other errors under default label.
NumToStr( szTemp, nResult );
MessageBox( "General file transfer error."+
"Please check your target location and try again."+
"\n\n Error Number:"+szTemp +
"\n Related File: "+ERRORFILENAME,
SEVERE );

exit;
endswitch;

Disable( STATUSDLG );

// Create program folders and icons.
InstallProgramItems:
SetStatusWindow( 95, "Creating Program Group and Icons...." );

AppCommand( PROGMAN, CMD_RESTORE );
svFolder = PROGRAM_FOLDER_NAME;

CreateProgramFolder( svFolder );
Delay(1);

szProgram = svTarget ^ "README\\README.WRI";

ShowProgramFolder( svFolder, SW_SHOW );

AddFolderIcon( svFolder, APP_NAME,
szProgram,
svTarget ^ "Readme",
"", 0, "", REPLACE );

AddFolderIcon( svFolder, "Sample1",
svTarget ^ "SAMPLES\\SAMPLE1\\SAMPLE1.VBP",
svTarget ^ "SAMPLES\\SAMPLE1",
"", 0, "", REPLACE );

AddFolderIcon( svFolder, "Sample2",
svTarget ^ "SAMPLES\\SAMPLE2\\SAMPLE2.VBP",
svTarget ^ "SAMPLES\\SAMPLE2",
"", 0, "", REPLACE );

AddFolderIcon( svFolder, "Sample3",
svTarget ^ "SAMPLES\\SAMPLE3\\SAMPLE3.VBP",
svTarget ^ "SAMPLES\\SAMPLE3",
"", 0, "", REPLACE );

AddFolderIcon( svFolder, "Sample4",
svTarget ^ "SAMPLES\\SAMPLE4\\SAMPLE4.VBP",
svTarget ^ "SAMPLES\\SAMPLE4",
"", 0, "", REPLACE );

AddFolderIcon( svFolder, "Sample5",
svTarget ^ "SAMPLES\\SAMPLE5\\SAMPLE5.VBP",
svTarget ^ "SAMPLES\\SAMPLE5",
"", 0, "", REPLACE );
Delay( 1 );

LaunchApp( "REGSVR32.EXE", "/s " + svTarget ^ "Ocx\\ganttocx.ocx" );

// UNINST global variable stores the file name (with full path) of
// the uninstaller file.
szProgram = UNINST;
szProgram = szProgram + " -f" + svUninstLogFile;
AddFolderIcon( svFolder, "unInstallSHIELD", szProgram,
WINDIR,
"", 0, "", REPLACE );
Delay( 1 );

// Announce setup complete and offer to read README file.
FinalInstallProcess:
SetStatusWindow( 100, "Installation complete." );

szMsg = "Setup is complete. You may run the installed program "+
"by double-clicking on the program icon installed.";
MessageBox( szMsg, INFORMATION );

exit;