GetLibs.vbs update that now supports compiling the libs and selecting core or Mod_exosip libs. Default behavior is still the same, still to do is removing all the libs from the solution file and adding in pre-build events to auto download and build the appropriate libs.
git-svn-id: http://svn.freeswitch.org/svn/freeswitch/trunk@75 d0543943-73ff-0310-b7d9-9358b9ac24b2
This commit is contained in:
Michael Jerris
parent
68db73041b
commit
4222a2c320
|
|
@ -1,61 +1,245 @@
|
|||
On Error Resume Next
|
||||
'On Error Resume Next
|
||||
Set WshShell = CreateObject("WScript.Shell")
|
||||
Set FSO = CreateObject("Scripting.FileSystemObject")
|
||||
Set WshSysEnv = WshShell.Environment("SYSTEM")
|
||||
Set xml = CreateObject("Microsoft.XMLHTTP")
|
||||
Set oStream = createobject("Adodb.Stream")
|
||||
Set objArgs = WScript.Arguments
|
||||
Dim vcver, DevEnv
|
||||
BuildRelease=False
|
||||
BuildDebug=False
|
||||
BuildCore=False
|
||||
BuildModExosip=false
|
||||
|
||||
ScriptDir=Left(WScript.ScriptFullName,Len(WScript.ScriptFullName)-Len(WScript.ScriptName))
|
||||
|
||||
LibDestDir=Showpath(ScriptDir & "..\..\libs")
|
||||
UtilsDir=Showpath(ScriptDir & "Tools")
|
||||
|
||||
GetTarGZObjects UtilsDir
|
||||
If Not FSO.FolderExists(LibDestDir & "osip") Then
|
||||
WgetUnTarGz "http://www.antisip.com/download/libosip2-2.2.1.tar.gz", LibDestDir
|
||||
RenameFolder LibDestDir & "libosip2-2.2.1", "osip"
|
||||
' FSO.CopyFile Utilsdir & "osipparser2.vcproj", LibDestDir & "osip\platform\vsnet\", True
|
||||
Upgrade Utilsdir & "osipparser2.vcproj", LibDestDir & "osip\platform\vsnet\osipparser2.vcproj"
|
||||
Upgrade LibDestDir & "osip\platform\vsnet\osip2.vcproj", LibDestDir & "osip\platform\vsnet\osip2.vcproj"
|
||||
GetDevEnv
|
||||
Wscript.echo "Detected Visual Studio DevEnv: " & DevEnv
|
||||
|
||||
If objArgs.Count >=2 Then
|
||||
Select Case objArgs(1)
|
||||
Case "Release"
|
||||
BuildRelease=True
|
||||
Case "Debug"
|
||||
BuildDebug=True
|
||||
Case "All"
|
||||
BuildRelease=True
|
||||
BuildDebug=True
|
||||
End Select
|
||||
End If
|
||||
|
||||
If Not FSO.FolderExists(LibDestDir & "libeXosip2") Then
|
||||
WgetUnTarGz "http://www.antisip.com/download/libeXosip2-1.9.1-pre17.tar.gz", LibDestDir
|
||||
RenameFolder LibDestDir & "libeXosip2-1.9.1-pre17", "libeXosip2"
|
||||
Upgrade Utilsdir & "eXosip.vcproj", LibDestDir & "libeXosip2\platform\vsnet\eXosip.vcproj"
|
||||
If objArgs.Count >=1 Then
|
||||
Select Case objArgs(0)
|
||||
Case "Core"
|
||||
BuildCore=True
|
||||
Case "Mod_Exosip"
|
||||
BuildModExosip=True
|
||||
Case Else
|
||||
BuildCore=True
|
||||
BuildModExosip=True
|
||||
End Select
|
||||
Else
|
||||
BuildCore=True
|
||||
BuildModExosip=True
|
||||
End If
|
||||
|
||||
If Not FSO.FolderExists(LibDestDir & "jthread-1.1.2") Then
|
||||
WgetUnTarGz "http://research.edm.luc.ac.be/jori/jthread/jthread-1.1.2.tar.gz", LibDestDir
|
||||
|
||||
If BuildCore Then
|
||||
BuildLibs_Core BuildDebug, BuildRelease
|
||||
End If
|
||||
|
||||
If Not FSO.FolderExists(LibDestDir & "jrtplib") Then
|
||||
WgetUnTarGz "http://research.edm.luc.ac.be/jori/jrtplib/jrtplib-3.3.0.tar.gz", LibDestDir
|
||||
RenameFolder LibDestDir & "jrtplib-3.3.0", "jrtplib"
|
||||
If BuildModExosip Then
|
||||
BuildLibs_ModExosip BuildDebug, BuildRelease
|
||||
End If
|
||||
|
||||
If Not FSO.FolderExists(LibDestDir & "apr") Then
|
||||
WgetUnTarGz "ftp://ftp.wayne.edu/apache/apr/apr-1.2.2.tar.gz", LibDestDir
|
||||
RenameFolder LibDestDir & "apr-1.2.2", "apr"
|
||||
Unix2dos LibDestDir & "apr\libapr.dsp"
|
||||
Upgrade LibDestDir & "apr\libapr.dsp", LibDestDir & "apr\libapr.vcproj"
|
||||
End If
|
||||
WScript.Echo "Complete"
|
||||
|
||||
If Not FSO.FolderExists(LibDestDir & "sqlite") Then
|
||||
WgetUnZip "http://www.sqlite.org/sqlite-source-3_2_7.zip", LibDestDir
|
||||
RenameFolder LibDestDir & "sqlite-source-3_2_7", "sqlite"
|
||||
Upgrade Utilsdir & "sqlite.vcproj", LibDestDir & "sqlite\sqlite.vcproj"
|
||||
End If
|
||||
Sub BuildLibs_Core(BuildDebug, BuildRelease)
|
||||
If Not FSO.FolderExists(LibDestDir & "apr") Then
|
||||
WgetUnTarGz "ftp://ftp.wayne.edu/apache/apr/apr-1.2.2.tar.gz", LibDestDir
|
||||
If Not FSO.FolderExists(LibDestDir & "apr-1.2.2") Then
|
||||
Wscript.echo "Unable to get SQLite from default download location, Trying backup location:"
|
||||
WgetUnTarGz "http://www.sofaswitch.org/mikej/apr-1.2.2.tar.gz", LibDestDir
|
||||
End If
|
||||
RenameFolder LibDestDir & "apr-1.2.2", "apr"
|
||||
Unix2dos LibDestDir & "apr\libapr.dsp"
|
||||
Upgrade LibDestDir & "apr\libapr.dsp", LibDestDir & "apr\libapr.vcproj"
|
||||
End If
|
||||
If FSO.FolderExists(LibDestDir & "apr") Then
|
||||
If BuildDebug Then
|
||||
If Not FSO.FileExists(LibDestDir & "apr\Debug\libapr-1.lib") Then
|
||||
BuildViaDevEnv LibDestDir & "apr\libapr.vcproj", "Debug"
|
||||
End If
|
||||
End If
|
||||
If BuildRelease Then
|
||||
If Not FSO.FileExists(LibDestDir & "apr\Release\libapr-1.lib") Then
|
||||
BuildViaDevEnv LibDestDir & "apr\libapr.vcproj", "Release"
|
||||
End If
|
||||
End If
|
||||
Else
|
||||
Wscript.echo "Unable to download APR"
|
||||
End If
|
||||
|
||||
If Not FSO.FolderExists(LibDestDir & "sqlite") Then
|
||||
WgetUnZip "http://www.sqlite.org/sqlite-source-3_2_7.zip", LibDestDir
|
||||
If Not FSO.FolderExists(LibDestDir & "sqlite-source-3_2_7") Then
|
||||
Wscript.echo "Unable to get SQLite from default download location, Trying backup location:"
|
||||
WgetUnTarGz "http://www.sofaswitch.org/mikej/sqlite-source-3_2_7.zip", LibDestDir
|
||||
End If
|
||||
RenameFolder LibDestDir & "sqlite-source-3_2_7", "sqlite"
|
||||
FSO.CopyFile Utilsdir & "sqlite.vcproj", LibDestDir & "sqlite\", True
|
||||
' Upgrade Utilsdir & "sqlite.vcproj", LibDestDir & "sqlite\sqlite.vcproj"
|
||||
End If
|
||||
If FSO.FolderExists(LibDestDir & "sqlite") Then
|
||||
If BuildDebug Then
|
||||
If Not FSO.FileExists(LibDestDir & "sqlite\Debug\sqlite.lib") Then
|
||||
UpgradeViaDevEnv LibDestDir & "sqlite\sqlite.vcproj"
|
||||
BuildViaDevEnv LibDestDir & "sqlite\sqlite.vcproj", "Debug"
|
||||
End If
|
||||
End If
|
||||
If BuildRelease Then
|
||||
If Not FSO.FileExists(LibDestDir & "sqlite\Release\sqlite.lib") Then
|
||||
UpgradeViaDevEnv LibDestDir & "sqlite\sqlite.vcproj"
|
||||
BuildViaDevEnv LibDestDir & "sqlite\sqlite.vcproj", "Release"
|
||||
End If
|
||||
End If
|
||||
Else
|
||||
Wscript.echo "Unable to download SQLite"
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Sub BuildLibs_ModExosip(BuildDebug, BuildRelease)
|
||||
|
||||
If Not FSO.FolderExists(LibDestDir & "osip") Then
|
||||
WgetUnTarGz "http://www.antisip.com/download/libosip2-2.2.1.tar.gz", LibDestDir
|
||||
If Not FSO.FolderExists(LibDestDir & "libosip2-2.2.1") Then
|
||||
Wscript.echo "Unable to get osip from default download location, Trying backup location:"
|
||||
WgetUnTarGz "http://www.sofaswitch.org/mikej/libosip2-2.2.1.tar.gz", LibDestDir
|
||||
End If
|
||||
RenameFolder LibDestDir & "libosip2-2.2.1", "osip"
|
||||
FSO.CopyFile Utilsdir & "osipparser2.vcproj", LibDestDir & "osip\platform\vsnet\", True
|
||||
End If
|
||||
If FSO.FolderExists(LibDestDir & "osip") Then
|
||||
If BuildDebug Then
|
||||
If Not FSO.FileExists(LibDestDir & "osip\platform\vsnet\Debug\osip2.lib") Then
|
||||
UpgradeViaDevEnv LibDestDir & "osip\platform\vsnet\osip.sln"
|
||||
BuildViaDevEnv LibDestDir & "osip\platform\vsnet\osip.sln", "Debug"
|
||||
End If
|
||||
End If
|
||||
If BuildRelease Then
|
||||
If Not FSO.FileExists(LibDestDir & "osip\platform\vsnet\Release\osip2.lib") Then
|
||||
UpgradeViaDevEnv LibDestDir & "osip\platform\vsnet\osip.sln"
|
||||
BuildViaDevEnv LibDestDir & "osip\platform\vsnet\osip.sln", "Release"
|
||||
End If
|
||||
End If
|
||||
Else
|
||||
Wscript.echo "Unable to download Osip"
|
||||
End If
|
||||
|
||||
If Not FSO.FolderExists(LibDestDir & "libeXosip2") Then
|
||||
WgetUnTarGz "http://www.antisip.com/download/libeXosip2-1.9.1-pre17.tar.gz", LibDestDir
|
||||
If Not FSO.FolderExists(LibDestDir & "libeXosip2-1.9.1-pre17") Then
|
||||
Wscript.echo "Unable to get eXosip from default download location, Trying backup location:"
|
||||
WgetUnTarGz "http://www.sofaswitch.org/mikej/libeXosip2-1.9.1-pre17.tar.gz", LibDestDir
|
||||
End If
|
||||
RenameFolder LibDestDir & "libeXosip2-1.9.1-pre17", "libeXosip2"
|
||||
FSO.CopyFile Utilsdir & "eXosip.vcproj", LibDestDir & "libeXosip2\platform\vsnet\", True
|
||||
End If
|
||||
If FSO.FolderExists(LibDestDir & "libeXosip2") Then
|
||||
If BuildDebug Then
|
||||
If Not FSO.FileExists(LibDestDir & "libeXosip2\platform\vsnet\Debug\exosip.lib") Then
|
||||
UpgradeViaDevEnv LibDestDir & "libeXosip2\platform\vsnet\exosip.vcproj"
|
||||
BuildViaDevEnv LibDestDir & "libeXosip2\platform\vsnet\exosip.vcproj", "Debug"
|
||||
End If
|
||||
End If
|
||||
If BuildRelease Then
|
||||
If Not FSO.FileExists(LibDestDir & "libeXosip2\platform\vsnet\Release\exosip.lib") Then
|
||||
UpgradeViaDevEnv LibDestDir & "libeXosip2\platform\vsnet\exosip.vcproj"
|
||||
BuildViaDevEnv LibDestDir & "libeXosip2\platform\vsnet\exosip.vcproj", "Release"
|
||||
End If
|
||||
End If
|
||||
Else
|
||||
Wscript.echo "Unable to download exosip"
|
||||
End If
|
||||
|
||||
If Not FSO.FolderExists(LibDestDir & "jthread-1.1.2") Then
|
||||
WgetUnTarGz "http://research.edm.luc.ac.be/jori/jthread/jthread-1.1.2.tar.gz", LibDestDir
|
||||
If Not FSO.FolderExists(LibDestDir & "jthread-1.1.2") Then
|
||||
Wscript.echo "Unable to get JThread from default download location, Trying backup location:"
|
||||
WgetUnTarGz "http://www.sofaswitch.org/mikej/jthread-1.1.2.tar.gz", LibDestDir
|
||||
End If
|
||||
End If
|
||||
|
||||
If Not FSO.FolderExists(LibDestDir & "jrtplib") Then
|
||||
WgetUnTarGz "http://research.edm.luc.ac.be/jori/jrtplib/jrtplib-3.3.0.tar.gz", LibDestDir
|
||||
If Not FSO.FolderExists(LibDestDir & "jrtplib-3.3.0") Then
|
||||
Wscript.echo "Unable to get JRTPLib from default download location, Trying backup location:"
|
||||
WgetUnTarGz "http://www.sofaswitch.org/mikej/jrtplib-3.3.0.tar.gz", LibDestDir
|
||||
End If
|
||||
RenameFolder LibDestDir & "jrtplib-3.3.0", "jrtplib"
|
||||
End If
|
||||
If FSO.FolderExists(LibDestDir & "jrtplib") And FSO.FolderExists(LibDestDir & "jthread-1.1.2") And FSO.FolderExists(LibDestDir & "jrtp4c")Then
|
||||
If BuildDebug Then
|
||||
If Not FSO.FileExists(LibDestDir & "jrtp4c\w32\Debug\jrtp4c.lib") Then
|
||||
UpgradeViaDevEnv LibDestDir & "jrtp4c\w32\jrtp4c.sln"
|
||||
BuildViaDevEnv LibDestDir & "jrtp4c\w32\jrtp4c.sln", "Debug"
|
||||
End If
|
||||
End If
|
||||
If BuildRelease Then
|
||||
If Not FSO.FileExists(LibDestDir & "jrtp4c\w32\Release\jrtp4c.lib") Then
|
||||
UpgradeViaDevEnv LibDestDir & "jrtp4c\w32\jrtp4c.sln"
|
||||
BuildViaDevEnv LibDestDir & "jrtp4c\w32\jrtp4c.sln", "Release"
|
||||
End If
|
||||
End If
|
||||
Else
|
||||
Wscript.echo "Unable to download JRtplib"
|
||||
End If
|
||||
|
||||
|
||||
End Sub
|
||||
|
||||
Sub UpgradeViaDevEnv(ProjectFile)
|
||||
Set oExec = WshShell.Exec(Chr(34) & DevEnv & Chr(34) & " " & Chr(34) & ProjectFile & Chr(34) & " /Upgrade ")
|
||||
Do While oExec.Status <> 1
|
||||
WScript.Sleep 100
|
||||
Loop
|
||||
End Sub
|
||||
|
||||
Sub BuildViaDevEnv(ProjectFile, BuildType)
|
||||
Wscript.echo "Building : " & ProjectFile & " Config type: " & BuildType
|
||||
Set oExec = WshShell.Exec(Chr(34) & DevEnv & Chr(34) & " " & Chr(34) & ProjectFile & Chr(34) & " /Build " & BuildType)
|
||||
Do While oExec.Status <> 1
|
||||
WScript.Sleep 100
|
||||
Loop
|
||||
End Sub
|
||||
|
||||
Sub GetDevEnv()
|
||||
If WshSysEnv("VS80COMNTOOLS")<> "" Then
|
||||
vcver = "8"
|
||||
DevEnv=Showpath(WshSysEnv("VS80COMNTOOLS")&"..\IDE\") & "devenv"
|
||||
Else If WshSysEnv("VS71COMNTOOLS")<> "" Then
|
||||
vcver = "7"
|
||||
DevEnv=Showpath(WshSysEnv("VS71COMNTOOLS")&"..\IDE\") & "devenv"
|
||||
Else
|
||||
Wscript.Echo("Did not find any Visual Studio .net 2003 or 2005 on your machine")
|
||||
WScript.Quit(1)
|
||||
End If
|
||||
End If
|
||||
End Sub
|
||||
|
||||
WScript.Echo "Download Complete"
|
||||
|
||||
Sub RenameFolder(FolderName, NewFolderName)
|
||||
On Error Resume Next
|
||||
Set Folder=FSO.GetFolder(FolderName)
|
||||
Folder.Name = NewFolderName
|
||||
On Error GoTo 0
|
||||
End Sub
|
||||
|
||||
Sub Upgrade(OldFileName, NewFileName)
|
||||
|
||||
On Error Resume Next
|
||||
If WshSysEnv("VS80COMNTOOLS")<> "" Then
|
||||
Set vcProj = CreateObject("VisualStudio.VCProjectEngine.8.0")
|
||||
Else If WshSysEnv("VS71COMNTOOLS")<> "" Then
|
||||
|
|
@ -70,15 +254,15 @@ Sub Upgrade(OldFileName, NewFileName)
|
|||
' WScript.Echo("Converting: "+ OldFileName)
|
||||
|
||||
Set vcProject = vcProj.LoadProject(OldFileName)
|
||||
' If Not FSO.FileExists(vcProject.ProjectFile) Then
|
||||
If Not FSO.FileExists(vcProject.ProjectFile) Then
|
||||
' // specify name and location of new project file
|
||||
vcProject.ProjectFile = NewFileName
|
||||
' End If
|
||||
' // call the project engine to save this off.
|
||||
' // when no name is shown, it will create one with the .vcproj name
|
||||
vcProject.Save()
|
||||
End If
|
||||
' WScript.Echo("New Project Name: "+vcProject.ProjectFile+"")
|
||||
|
||||
On Error GoTo 0
|
||||
End Sub
|
||||
|
||||
|
||||
|
|
@ -150,7 +334,7 @@ Sub UnTarGZ(TGZfile, DestFolder)
|
|||
|
||||
Set objTAR = WScript.CreateObject("XStandard.TAR")
|
||||
Set objGZip = WScript.CreateObject("XStandard.GZip")
|
||||
' wscript.echo("Extracting: " & TGZfile)
|
||||
wscript.echo("Extracting: " & TGZfile)
|
||||
objGZip.Decompress TGZfile, Destfolder
|
||||
objTAR.UnPack Left(TGZfile, Len(TGZfile)-3), Destfolder
|
||||
|
||||
|
|
@ -163,7 +347,7 @@ Sub UnZip(Zipfile, DestFolder)
|
|||
Dim objZip
|
||||
Set objZip = WScript.CreateObject("XStandard.Zip")
|
||||
objZip.UnPack Zipfile, DestFolder
|
||||
Set objZip = Nothing
|
||||
'Set objZip = Nothing
|
||||
End Sub
|
||||
|
||||
|
||||
|
|
@ -174,7 +358,7 @@ Sub Wget(URL, DestFolder)
|
|||
filename=Right(URL,strlength-StartPos)
|
||||
If Right(DestFolder, 1) <> "\" Then DestFolder = DestFolder & "\" End If
|
||||
|
||||
' Wscript.echo("Downloading: " & URL)
|
||||
Wscript.echo("Downloading: " & URL)
|
||||
xml.Open "GET", URL, False
|
||||
xml.Send
|
||||
|
||||
|
|
|
|||
Loading…
Reference in New Issue