Excel VBA→Cygwin起動→gitの標準エラー出力をファイルにリダイレクト

Question

Excel VBAからCygwinを起動し、Cygwin上でgitを実行して、その標準エラー出力をファイルにリダイレクトしたいです。

Public Sub subClone(projectName As String)
Dim cd                      As String
Dim command                 As String
    cd = ThisWorkbook.Path & "\" & projectName
    command = "git clone https://github.com/aaa/aaa.git 2> gitcln.txt"
    Call subCyg(cd, command)
End Sub

Public Sub subCyg(実行パス As String, command As String)
Dim WSH                     As WshShell
Dim wExec                   As Object
    Set WSH = New WshShell
    Call WSH.Run("%ComSpec% /c " & "set LESSCHARSET=utf-8 && cd /d " & 実行パス & " && C:\cygwin64\bin\mintty.exe -i /Cygwin-Terminal.ico " & command, 2, True)
    Set WSH = Nothing
End Sub

上記コードで以下commandを試しましたがいずれもファイル出力がありません。
どうすれば出力されますでしょうか？
手動でCygwin上で、
git clone https://github.com/aaa/aaa.git 2> gitcln.txt
を実行すれば出力されます。

"git clone https://github.com/aaa/aaa.git > gitcln.txt"
Cygwinのウィンドウにクローンの進捗表示、クローンされる。ファイル出力なし。
"git clone https://github.com/aaa/aaa.git >> gitcln.txt"
Cygwinのウィンドウにクローンの進捗表示、クローンされる。ファイル出力なし。
"git clone https://github.com/aaa/aaa.git 2> gitcln.txt"
Cygwinのウィンドウにクローンの進捗表示、クローンされる。ファイル出力なし。
"git clone https://github.com/aaa/aaa.git > gitcln.txt 2>&1"
Cygwinのウィンドウにクローンの進捗表示、クローンされる。ファイル出力なし。
"git clone https://github.com/aaa/aaa.git >> gitcln.txt 2>&1"
Cygwinのウィンドウにクローンの進捗表示、クローンされる。ファイル出力なし。
"git clone https://github.com/aaa/aaa.git &> gitcln.txt"
Cygwinのウィンドウ出ず。クローンされない。ファイル出力なし。
"git clone https://github.com/aaa/aaa.git &>> gitcln.txt"
Cygwinのウィンドウ出ず。クローンされない。ファイル出力なし。
"git clone https://github.com/aaa/aaa.git >& gitcln.txt"
Cygwinのウィンドウ出ず。クローンされない。ファイル出力なし。
"git clone https://github.com/aaa/aaa.git >>& gitcln.txt"
Cygwinのウィンドウ出ず。クローンされない。ファイル出力なし。
"git clone https://github.com/aaa/aaa.git 2>&1 gitcln.txt"
Cygwinのウィンドウ一瞬出る。クローンされない。ファイル出力なし。

考えてみればgit clone、git checkoutが正常に完了しているかどうかを見たいだけなので、
上記のようなファイルへのリダイレクトという手段でなくても結構です。
よろしくお願い致します。

Answer 1

実行されるコマンドの後半は、

C:\cygwin64\bin\mintty.exe -i /Cygwin-Terminal.ico git clone https://github.com/aaa/aaa.git 2> gitcln.txt

なので、gitcln.txtに書かれるのは、minttyコマンドの標準エラー出力です。
gitコマンドの標準エラー出力をリダイレクトするには、

    command = "cmd.exe /c ""git clone https://github.com/aaa/aaa.git 2> gitcln.txt"""
または、bashにパスが通っていれば、
    command = "bash -c ""git clone https://github.com/aaa/aaa.git 2> gitcln.txt"""
でも。

でしょうか。

指摘のあるように、minttyを経由する意味は無いです。

Comments

[nayameru]

ありがとうございました。

Answer 2

Call WSH.Run("%ComSpec% /c " & "set LESSCHARSET=utf-8 && cd /d " & 実行パス & " && C:\cygwin64\bin\mintty.exe -i /Cygwin-Terminal.ico " & command, 2, True)

なぜminttyの起動が必要なのですか？

Call WSH.Run("%ComSpec% /c " & "set LESSCHARSET=utf-8 && cd /d " & 実行パス & " && " & command, 2, True)

これで十分では？

command = "git clone https://github.com/aaa/aaa.git 2> gitcln.txt"

標準エラー出力をファイルに出力したいのならこれでいいのですが、もし標準出力と標準エラー出力の両方をファイルに出力したいという意図なら

command = "git clone https://github.com/aaa/aaa.git > gitcln.txt 2>&1"

です。

Comments

[nayameru]

ありがとうございます。
しかし、それは分かっていました。
事情があって、タイトルの通り、Cygwin経由でないといけないのです。。。

[itagagaki]

失礼ながら「Cygwin経由」とおっしゃっているのが、根本的に何か理解が足りないように思います。
「Cygwin経由」とはどういう意味ですか？
私が言ったのはminttyの起動がなぜ必要なのかという話なのですが。

[itagagaki]

以前にも言いましたが、Cygwinで動くコマンド、Cygwinで生成されたコマンドは、Windowsコマンドです。Cygwin1.dllランタイムライブラリがPOSIXシステムコールの代替となっているだけです。Cygwinという何かWindowsとは別の特別なシステムがあるわけではありません。そしてminttyについてはターミナルの話であってCygwinの話ではありません。

[nayameru]

すみません。
C:\cygwin64\bin\git.exe
と
C:\Program Files\Git\cmd\git.exe
とは違うと思うのですが。
仮にLinux上でしか動作しない実行ファイルだといかがでしょうか？

[itagagaki]

C:\cygwin64\bin\git.exe
C:\Program Files\Git\cmd\git.exe
どちらもWindowsの実行ファイルです。
CygwinはLinuxではありません。

[nayameru]

何度もご説明いただき、ありがとうございました。