You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
 
 
 
 
 
 

44 lines
1.0 KiB

Include "config.vbs"
Sub Include(sInstFile)
Dim oFSO, f, s
Set oFSO = CreateObject("Scripting.FileSystemObject")
Set f = oFSO.OpenTextFile(sInstFile)
s = f.ReadAll
f.Close
ExecuteGlobal s
End Sub
Function BuildIos()
Set WshShell = CreateObject("WScript.Shell")
work_path = RemotePath&"/build"
cmd_codesign = "security unlock-keychain -p "+Passwd+" /Users/"+User+"/Library/Keychains/login.keychain"
cmd_build = "python3 ./proc_build_ios_log.py "+UNITY_PATH+" "+PIPE_NAME+" "+PIPE_TYPE+" framw-unity "
cmd = ssh + " -i "+key_pri+" -l "+User+" "+Ip+ " "
cmd = cmd + "cd "+work_path+";"
cmd = cmd + cmd_codesign + ";"
' cmd = cmd + "cd build-ios-remote;"
' cmd = cmd + "bash build_clean.sh "+RemoteWork+" ;"
' cmd = cmd + "cd -;"
' TODO: 临时性的,需要解决为什么用sh执行会引发65535
' cmd = cmd + "pkill Unity;"
cmd = cmd + "rm -f "+RemoteIPAPath+";"
cmd = cmd + cmd_build
BuildIos = WshShell.Run(cmd, 9, true)
End Function
ret = BuildIos()
WScript.Echo(ret)