官方bilibiliWindows破解入门Android逆向入门
【网络诊断修复工具】切换到窄版

吾爱破解 - 52pojie.cn

 找回密码
 注册[Register]

QQ登录

只需一步，快速开始

吾爱破解 - 52pojie.cn»网站 › 【 软件安全 】 › 『编程语言区』 › 『编程语言讨论求助区』 › 这有一个批处理程序，麻烦给我简单的解释下代码含义：
返回列表 发新帖
查看: 1507|回复: 5
收起左侧

[求助] 这有一个批处理程序，麻烦给我简单的解释下代码含义：

[复制链接]
冥界3大法王
冥界3大法王 发表于 2022-9-30 19:45
本帖最后由 冥界3大法王 于 2022-9-30 19:56 编辑

[Asm] 纯文本查看 复制代码
AutoPatch.cmd:

@echo off
@color 1F

setlocal enabledelayedexpansion

TITLE AutoPatch for EurekaLog v7.10.2.0 (D7/Tokyo/Rio/Sydney/Alexandria)

net session >nul 2>&1
if NOT %errorLevel% == 0 (
    echo INFO: Administrative permissions required.
    echo.
    echo       Run AutoPatch.cmd as ADMIN:
    echo.
    echo.      * Right-click file "AutoPatch.cmd" in explorer and
    echo.      * Choose "Run as administrator"
    echo.
    pause
    exit /b
)

%~d0
cd %~p0

dir "%~dp0EurekaLogCore*.bpl" /s /b 1>NUL 2>NUL
if errorlevel 1 (  
     echo INFO: Current directory is not installdir
     echo.
     echo       Run AutoPatch.cmd in installdir ...
     echo.
     pause
     exit /b      
)

set "DelphiIDE="

dir "%~dp0EurekaLogCore280.bpl" /s /b 1>NUL 2>NUL
if not errorlevel 1 (
   set "DelphiIDE=Delphi 11 Alexandria"
)

dir "%~dp0EurekaLogCore270.bpl" /s /b 1>NUL 2>NUL
if not errorlevel 1 (
   set "DelphiIDE=!DelphiIDE!   Delphi 10.4 Sydney"
)

dir "%~dp0EurekaLogCore260.bpl" /s /b 1>NUL 2>NUL
if not errorlevel 1 (
   set "DelphiIDE=!DelphiIDE!   DX10.3 Rio"
)

dir "%~dp0EurekaLogCore250.bpl" /s /b 1>NUL 2>NUL
if not errorlevel 1 (
   set "DelphiIDE=!DelphiIDE!   DX10.2 Tokyo"
)

dir "%~dp0EurekaLogCore70.bpl" /s /b 1>NUL 2>NUL
if not errorlevel 1 (
   set "DelphiIDE=!DelphiIDE!   Delphi 7"
)

if "%DelphiIDE%"=="" (  
     echo INFO: No supported version of EurekaLog found.
     echo.
     echo       AutoPatch.cmd will be terminated now ...
     echo.
     pause
     exit /b      
)

echo ******************************************************************
echo AutoPatch for EurekaLog v7.10.2.0 (D7/Tokyo/Rio/Sydney/Alexandria)
echo ******************************************************************
echo.

set starttime=%time%

set "INSTDIR=%~dp0"
set INSTDIR=%INSTDIR:~0,-1%

set "SYSDIR=C:\Windows\System32"

set "WOW64="
if exist "!PROGRAMFILES(X86)!" (
   set "SYSDIR=C:\Windows\SysWOW64"
   set "WOW64=WOW6432Node\"
)

echo Please wait a few seconds ...
echo.
echo Step 1/2: Patching EurekaLog for %DelphiIDE%
echo.

sfk189.exe rep -bin /75033B04245A5874/75033B04245A58EB/  -quiet -dir . -yes -file EurekaLogExpert*.bpl
sfk189.exe rep -bin /558BECB9080000006A006A004975F9515333C055/C38BECB9080000006A006A004975F9515333C055/  -quiet -dir . -yes -file EModules.dcu
sfk189.exe rep -bin /558BECB9090000006A006A004975F9535633C055/C38BECB9090000006A006A004975F9535633C055/  -quiet -dir . -yes -file EModules.dcu
sfk189.exe rep -bin /55534881ECC8000000488BEC48C7452800000000/C3534881ECC8000000488BEC48C7452800000000/  -quiet -dir . -yes -file EModules.dcu
sfk189.exe rep -bin /55534881EC28010000488BEC48C7453800000000/C3534881EC28010000488BEC48C7453800000000/  -quiet -dir . -yes -file EModules.dcu 
sfk189.exe rep -bin /0300008B4068BAFF000000/0300008B4068BA0099FF00/ -quiet -dir . -yes -file EurekaLogExpert70.bpl
sfk189.exe rep -bin /0400008B4074BAFF000000/0400008B4074BA0099FF00/ -quiet -dir . -yes -file EurekaLogExpert250.bpl EurekaLogExpert260.bpl EurekaLogExpert270.bpl EurekaLogExpert280.bpl                       
sfk189.exe rep -bin /00E88474FFFFB2018B86680300/00E88474FFFFB2008B86680300/  -quiet -dir . -yes -file EurekaLogExpert70.bpl
sfk189.exe rep -bin /8B8040040000B201E8FA53FFFF/8B8040040000B200E8FA53FFFF/  -quiet -dir . -yes -file EurekaLogExpert250.bpl
sfk189.exe rep -bin /8B8040040000B201E88653FFFF/8B8040040000B200E88653FFFF/  -quiet -dir . -yes -file EurekaLogExpert260.bpl
sfk189.exe rep -bin /8B8650040000B201E8DE4FFFFF/8B8650040000B200E8DE4FFFFF/  -quiet -dir . -yes -file EurekaLogExpert270.bpl
sfk189.exe rep -bin /8B8658040000B201E8D64FFFFF/8B8658040000B200E8D64FFFFF/  -quiet -dir . -yes -file EurekaLogExpert280.bpl  
sfk189.exe rep -bin /8B8094080000B201/8B8094080000B200/  -quiet -dir . -yes -file EurekaLogExpert70.bpl
sfk189.exe rep -bin /8B806C090000B201/8B806C090000B200/  -quiet -dir . -yes -file EurekaLogExpert250.bpl EurekaLogExpert260.bpl
sfk189.exe rep -bin /8B807C090000B201/8B807C090000B200/  -quiet -dir . -yes -file EurekaLogExpert270.bpl
sfk189.exe rep -bin /8B8084090000B201/8B8084090000B200/  -quiet -dir . -yes -file EurekaLogExpert280.bpl               
sfk189.exe rep -bin /E89BF1FFFF598B45085068AC/B89BF1FFFF598B45085068AC/  -quiet -dir . -yes -file EurekaLogExpert70.bpl
sfk189.exe rep -bin /E8AFECFFFF5933C05568BA3D/B8AFECFFFF5933C05568BA3D/  -quiet -dir . -yes -file EurekaLogExpert250.bpl
sfk189.exe rep -bin /E867ECFFFF5933C05568CA41/B867ECFFFF5933C05568CA41/  -quiet -dir . -yes -file EurekaLogExpert260.bpl
sfk189.exe rep -bin /E8DEECFFFF598D5584A108F7/B8DEECFFFF598D5584A108F7/  -quiet -dir . -yes -file EurekaLogExpert270.bpl
sfk189.exe rep -bin /E8AEE3FFFF598D5584A110F7/B8AEE3FFFF598D5584A110F7/  -quiet -dir . -yes -file EurekaLogExpert280.bpl
sfk189.exe rep -bin /54007200690061006C000000B0040200FFFFFFFF0E0000004C00610074006500730074002000760065007200730069006F006E/460075006C006C0020000000B0040200FFFFFFFF0E0000004C00610074006500730074002000760065007200730069006F006E/  -quiet -dir . -yes -file EOption.dcu EurekaLogExpert*.bpl
sfk189.exe rep -bin /54007200690061006C0000/460075006C006C00200000/  -quiet -dir . -yes -file EOption.dcu EurekaLogExpert*.bpl
sfk189.exe rep -bin /55004E004C004900430045004E00530045004400/4C004900430045004E0053004500440020002000/  -quiet -dir . -yes -file EOption.dcu EurekaLogExpert*.bpl
sfk189.exe rep -bin /55004E005200450047004900530054004500520045004400/520045004700490053005400450052004500440020002000/  -quiet -dir "!INSTDIR!" "C:\Windows\System32" "!SYSDIR!" -yes -file EOption.dcu EurekaLogCore*.bpl EurekaLogExpert*.bpl
sfk189.exe rep -bin /547269616C000000FFFFFFFF0E0000004C61746573742076657273696F6E/46756C6C20000000FFFFFFFF0E0000004C61746573742076657273696F6E/  -quiet -dir . -yes -file EOption.dcu EurekaLogExpert*.bpl                            
sfk189.exe rep -bin /547269616C/46756C6C20/  -quiet -dir . -yes -file EOption.dcu EurekaLogExpert*.bpl
sfk189.exe rep -bin /554E4C4943454E534544/4C4943454E5345442020/  -quiet -dir . -yes -file EOption.dcu EurekaLogExpert*.bpl
sfk189.exe rep -bin /554E52454749535445524544/524547495354455245442020/  -quiet -dir . -yes -file EOption.dcu EurekaLogExpert*.bpl          
sfk189.exe rep -bin /4E004F005400200052004500470049005300540045005200450044002000560045005200530049004F004E/2000200052004500470049005300540045005200450044002000560045005200530049004F004E00200020/  -quiet -dir . -yes -file  *.dcu EurekaLogExpert*.bpl
sfk189.exe rep -bin /4E4F5420524547495354455245442056455253494F4E/2020524547495354455245442056455253494F4E2020/  -quiet -dir . -yes -file  *.dcu EurekaLogExpert*.bpl
sfk189.exe rep -bin /450076006500720079002000700072006F006A00650063007400200063006F006D00700069006C006500640020007700690074006800200045007500720065006B0061004C006F006700200054007200690061006C000D000A006500780070006900720065007300200061006600740065007200200033003000200064006100790073002E/20002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020/  -quiet -dir . -yes -file *.dcu EurekaLogExpert*.bpl
sfk189.exe rep -bin /54007200690061006C000000558BEC53/460055004C004C0020000000558BEC53/  -quiet -dir "!INSTDIR!" "C:\Windows\System32" "!SYSDIR!" -yes -file EurekaLogCore*.bpl
sfk189.exe rep -bin /547269616C000000558BEC53/46554C4C20000000558BEC53/  -quiet -dir "!INSTDIR!" "C:\Windows\System32" "!SYSDIR!" -yes -file EurekaLogCore*.bpl
sfk189.exe rep -bin /54007200690061006C000000B0040200FFFFFFFF03000000540052004C/200020002000200020000000B0040200FFFFFFFF03000000540052004C/  -quiet -dir "!INSTDIR!" "C:\Windows\System32" "!SYSDIR!" -yes -file EurekaLogCore*.bpl
sfk189.exe rep -bin /547269616C000000FFFFFFFF0300000054524C/2020202020000000FFFFFFFF0300000054524C/  -quiet -dir "!INSTDIR!" "C:\Windows\System32" "!SYSDIR!" -yes -file EurekaLogCore*.bpl
sfk189.exe rep -bin /4500760065007200790020006100700070006C00690063006100740069006F006E00200063006F006D00700069006C006500640020007700690074006800200045007500720065006B0061004C006F006700200054007200690061006C000D000A006500780070006900720065007300200061006600740065007200200033003000200064006100790073002E/200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200052006500670069007300740065007200650064002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020/  -quiet -dir . -yes -file EurekaLogExpert*.bpl

echo Step 2/2: Writing license data to registry
echo.
REG ADD HKLM\SOFTWARE\!WOW64!EurekaLab\EurekaLog\7.0 /v AppName /d "EurekaLog 7.10.2.0 Professional" /F 1>NUL 2>NUL
REG ADD HKLM\SOFTWARE\!WOW64!EurekaLab\EurekaLog\7.0 /v AppDir  /d "!INSTDIR!" /F 1>NUL 2>NUL
REG ADD HKLM\SOFTWARE\!WOW64!EurekaLab\EurekaLog\7.0 /v AppType /d "Professional" /F 1>NUL 2>NUL
REG ADD HKLM\SOFTWARE\!WOW64!EurekaLab\EurekaLog\7.0 /v AppDate /d "none" /F 1>NUL 2>NUL
REG ADD HKCU\SOFTWARE\EurekaLab\EurekaLog\7.0 /v AppName /d "EurekaLog 7.10.2.0 Professional" /F 1>NUL 2>NUL
REG ADD HKCU\SOFTWARE\EurekaLab\EurekaLog\7.0 /v AppType /d "Professional" /F 1>NUL 2>NUL
REG ADD HKCU\SOFTWARE\EurekaLab\EurekaLog\7.0\License /v Edition /d "Professional" /F 1>NUL 2>NUL
REG ADD HKCU\SOFTWARE\EurekaLab\EurekaLog\7.0\License /v UserName /d "EurekaLog" /F 1>NUL 2>NUL
REG ADD HKCU\SOFTWARE\EurekaLab\EurekaLog\7.0\License /v UID /d "{20e8e8c4-6789-4a49-8e78-c02d739e6d5e}" /F 1>NUL 2>NUL
REG ADD HKCU\SOFTWARE\EurekaLab\EurekaLog\7.0\License /v ID  /d "{20e8e8c4-6789-4a49-8e78-c02d739e6d5f}" /F 1>NUL 2>NUL

set endtime=%time%
echo Started  at: %starttime%
echo Finished at: %endtime%

echo.
echo Patching finished ...
echo.

pause

exit


How To:
1. Install EurekaLog v7.10.2.0 (2685)
2. Run AutoPatch.cmd in installdir as ADMIN

*** NO Reg-file required ! ***

Note:
AutoPatch requires command line tool "sfk189.exe" in installdir or C:\Windows
Download (1.8 MB):

[url]https://sourceforge.net/projects/swissfileknife/files/1-swissfileknife/1.8.9.2/sfk189.exe/download[/url]

免费评分

参与人数 1吾爱币 +1 收起 理由
xouou + 1 法王好,法王妙,法王呱呱叫.

查看全部评分

发帖前要善用【论坛搜索】功能，那里可能会有你要找的答案或者已经有人发布过相同内容了，请勿重复发帖。
回复

举报

smileat2000
smileat2000 发表于 2022-9-30 19:51
不知道啊
【吾爱破解论坛总版规】 - [让你充分了解吾爱破解论坛行为规则]
回复 支持

举报

unmask
unmask 发表于 2022-9-30 20:45
吾爱破解论坛没有任何官方QQ群，禁止留联系方式，禁止任何商业交易。
利用sfk189.exe对特殊版本(D7/Tokyo/Rio/Sydney/Alexandria)的EurekaLog v7.10.2.0做一个patch，具体做啥patch，我也不清楚。
如何升级？如何获得积分？积分对应解释说明！
回复 支持

举报

wkdxz
wkdxz 发表于 2022-9-30 20:51
《站点帮助文档》有什么问题来这里看看吧，这里有你想知道的内容！
大概看了下，可能是使用管理员身份在EurekaLog安装目录运行脚本，用来破解Delphi IDE的专业版。

第一步，是使用sfk189.exe来破解，关键指定后缀的文件，以及其他操作。

第二步，是往注册表内写入专业版注册信息。

大概就这么回事
呼吁大家发布原创作品添加吾爱破解论坛标识！
回复 支持

举报

冥界3大法王
 楼主| 冥界3大法王 发表于 2022-9-30 21:56
wkdxz 发表于 2022-9-30 20:51
大概看了下，可能是使用管理员身份在EurekaLog安装目录运行脚本，用来破解Delphi IDE的专业版。

第一步 ...

是Delphi 的一款控件。
如何快速判断一个文件是否为病毒！
回复 支持

举报

semiuel
semiuel 发表于 2022-10-1 09:31
判断文件是否存在这一段感觉怪怪的
为什么不用if exist "%~dp0EurekaLogCore280.bpl" set "DelphiIDE=Delphi 11 Alexandria"
回复 支持

举报

返回列表 发新帖
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 注册[Register]

本版积分规则


免责声明：
吾爱破解所发布的一切破解补丁、注册机和注册信息及软件的解密分析文章仅限用于学习和研究目的；不得将上述内容用于商业或者非法用途，否则，一切后果请用户自负。本站信息来自网络，版权争议与本站无关。您必须在下载后的24个小时之内，从您的电脑中彻底删除上述内容。如果您喜欢该程序，请支持正版软件，购买注册，得到更好的正版服务。如有侵权请邮件与我们联系处理。

Mail To:Service@52pojie.cn

返回列表

RSS订阅|小黑屋|处罚记录|联系我们|吾爱破解 - LCG - LSG ( 京ICP备16042023号 | 京公网安备 11010502030087号 )

GMT+8, 2024-11-25 06:08

Powered by Discuz!

Copyright © 2001-2020, Tencent Cloud.

快速回复 返回顶部 返回列表