windows – 在gui中包装rsync进度的最佳方法?
发布时间:2020-08-03 18:11:03 所属栏目:Windows 来源:互联网
导读:我使用 rsync以与服务器无关的方式将文件同步到Windows客户端.有什么方法可以将rsync的进度发送到父进程以在gui进度条中显示? 我想有两三种选择. (1)监视STDOUT(2)监视rsync.exe日志文件,类似于unix tail(3)在内存中监视rsync控制台输出. 哪一个最好/首选?
|
我使用 rsync以与服务器无关的方式将文件同步到Windows客户端.有什么方法可以将rsync的进度发送到父进程以在gui进度条中显示? 我想有两三种选择. (1)监视STDOUT(2)监视rsync.exe日志文件,类似于unix tail(3)在内存中监视rsync控制台输出. 哪一个最好/首选? 对于这种类型的任务,我使用自己的 AutoIt脚本(免费软件,仅限Windows).该脚本将标准输出重定向到图形窗口,显示它具有向后滚动的能力等(在XCOPY / PKZIP等长流程中非常有用,以检查是否发生了任何错误).我使用AutoIt是因为它是免费的,非常易于使用,并且可以快速编译成.EXE.我认为它是完成此类任务的完整编程语言的绝佳替代方案.缺点是它仅适用于Windows. $sCmd = "DIR E:*.AU3 /S" ; Test command
$nAutoTimeout = 10 ; Time in seconds to close window after finish
$nDeskPct = 60 ; % of desktop size (if percent)
; $nHeight = 480 ; height/width of the main window (if fixed)
; $nWidth = 480
$sTitRun = "Executing process. Wait...." ;
$sTitDone = "Process done" ;
$sSound = @WindowsDir & "MediaDing.wav" ; End Sound
$sButRun = "Cancel" ; Caption of "Exec" button
$sButDone = "Close" ; Caption of "Close" button
#include <GUIConstants.au3>
#include <Constants.au3>
#Include <GuiList.au3>
Opt("GUIOnEventMode",1)
if $nDeskPct > 0 Then
$nHeight = @DesktopHeight * ($nDeskPct / 100)
$nWidth = @DesktopWidth * ($nDeskPct / 100)
EndIf
If $CmdLine[0] > 0 Then
$sCmd = ""
For $nCmd = 1 To $CmdLine[0]
$sCmd = $sCmd & " " & $CmdLine[$nCmd]
Next
; MsgBox (1,"",$sCmd)
EndIf
; AutoItSetOption("GUIDataSeparatorChar",Chr(13)+Chr(10))
$nForm = GUICreate($sTitRun,$nWidth,$nHeight)
GUISetOnEvent($GUI_EVENT_CLOSE,"CloseForm")
$nList = GUICtrlCreateList ("",10,$nWidth - 20,$nHeight - 50,$WS_BORDER + $WS_VSCROLL)
GUICtrlSetFont (-1,9,"Courier New")
$nClose = GUICtrlCreateButton ($sButRun,$nWidth - 100,$nHeight - 40,80,30)
GUICtrlSetOnEvent (-1,"CloseForm")
GUISetState(@SW_SHOW) ;,$nForm)
$nPID = Run(@ComSpec & " /C " & $sCmd,".",@SW_HIDE,$STDOUT_CHILD)
; $nPID = Run(@ComSpec & " /C _RunErrl.bat " & $sCmd,$STDOUT_CHILD) ; # Con ésto devuelve el errorlevel en _ERRL.TMP
While 1
$sLine = StdoutRead($nPID)
If @error Then ExitLoop
If StringLen ($sLine) > 0 then
$sLine = StringReplace ($sLine,Chr(13),"|")
$sLine = StringReplace ($sLine,Chr(10),"")
if StringLeft($sLine,1)="|" Then
$sLine = " " & $sLine
endif
GUICtrlSetData ($nList,$sLine)
_GUICtrlListSelectIndex ($nList,_GUICtrlListCount ($nList) - 1)
EndIf
Wend
$sLine = " ||"
GUICtrlSetData ($nList,$sLine)
_GUICtrlListSelectIndex ($nList,_GUICtrlListCount ($nList) - 1)
GUICtrlSetData ($nClose,$sButDone)
WinSetTitle ($sTitRun,$sTitDone)
If $sSound <> "" Then
SoundPlay ($sSound)
EndIf
$rInfo = DllStructCreate("uint;dword") ; # LASTINPUTINFO
DllStructSetData($rInfo,1,DllStructGetSize($rInfo));
DllCall("user32.dll","int","GetLastInputInfo","ptr",DllStructGetPtr($rInfo))
$nLastInput = DllStructGetData($rInfo,2)
$nTime = TimerInit()
While 1
If $nAutoTimeout > 0 Then
DllCall("user32.dll",DllStructGetPtr($rInfo))
If DllStructGetData($rInfo,2) <> $nLastInput Then
; Tocó una tecla
$nAutoTimeout = 0
EndIf
EndIf
If $nAutoTimeout > 0 And TimerDiff ($nTime) > $nAutoTimeOut * 1000 Then
ExitLoop
EndIf
Sleep (100)
Wend
Func CloseForm()
Exit
EndFunc (编辑:鄂州站长网) 【声明】本站内容均来自网络,其相关言论仅代表作者个人观点,不代表本站立场。若无意侵犯到您的权利,请及时与联系站长删除相关内容! |
推荐文章
站长推荐
- 用windows下编译过的eAccelerator for PHP 5.1.6
- 替代Windows的Fsync c
- cmake配置引入外部动态dylib or so or dll文件
- QML 发布时 libeay32.dll错误
- 在Windows上使用TortoiseSVN更改文件名大小写
- .net – System.Windows.Input.Key枚举中的Equal
- 为什么有条件地包含direct.h或sys / stat.h基于_
- windows – Eclipse颜色主题和OS LF
- NonSerialized 字段如果在dll 中读到数据写入Mon
- Microsoft Dynamics(Navision)vs C#.NET
热点阅读
