mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-02 17:46:22 +03:00
b40cdc2b55
V3d_View::AutoZFit() is now called only before redraw within methods V3d_View::Redraw() and V3d_View::Update(). Graphic3d_CView now holds Aspect_ExtendedRealitySession object. Aspect_OpenVRSession implements new interface via optional OpenVR library. Graphic3d_CView::ProcessInput() - added new interface method which should be called for processing positional input (head tracking). Graphic3d_Camera now allows setting custom stereoscopic Projection matrices. OpenGl_Context::Camera() - context now holds Camera object in addition to active camera matrices. genproj.tcl has been extended to handle optional CSF_OpenVR dependency.
704 lines
30 KiB
Tcl
704 lines
30 KiB
Tcl
#!/usr/bin/tclsh
|
|
|
|
# =======================================================================
|
|
# Created on: 2012-01-26
|
|
# Created by: Kirill GAVRILOV
|
|
# Copyright (c) 2012 OPEN CASCADE SAS
|
|
#
|
|
# This file is part of Open CASCADE Technology software library.
|
|
#
|
|
# This library is free software; you can redistribute it and/or modify it under
|
|
# the terms of the GNU Lesser General Public License version 2.1 as published
|
|
# by the Free Software Foundation, with special exception defined in the file
|
|
# OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
|
|
# distribution for complete text of the license and disclaimer of any warranty.
|
|
#
|
|
# Alternatively, this file may be used under the terms of Open CASCADE
|
|
# commercial license or contractual agreement.
|
|
|
|
# =======================================================================
|
|
# GUI procedure for search of third-party tools and generation of environment
|
|
# customization script
|
|
# =======================================================================
|
|
|
|
# load tools
|
|
source [file join [file dirname [info script]] genconfdeps.tcl]
|
|
|
|
# proxy variable for implicit file path normalization
|
|
set PRODUCTS_PATH_INPUT "$::PRODUCTS_PATH"
|
|
|
|
package require Tk
|
|
|
|
set aRowIter 0
|
|
set aCheckRowIter 0
|
|
frame .myFrame -padx 5 -pady 5
|
|
pack .myFrame -fill both -expand 1
|
|
frame .myFrame.myPrjFrame
|
|
frame .myFrame.myVsFrame
|
|
frame .myFrame.myHxxChecks
|
|
frame .myFrame.myChecks
|
|
|
|
# project file format
|
|
set SYS_PRJFMT_LIST {}
|
|
set SYS_PRJNAME_LIST {}
|
|
if { "$::tcl_platform(platform)" == "windows" } {
|
|
lappend ::SYS_PRJFMT_LIST "vcxproj"
|
|
lappend ::SYS_PRJNAME_LIST "Visual Studio (.vcxproj)"
|
|
}
|
|
if { "$tcl_platform(os)" == "Darwin" } {
|
|
lappend ::SYS_PRJFMT_LIST "xcd"
|
|
lappend ::SYS_PRJNAME_LIST "XCode (.xcd)"
|
|
}
|
|
lappend ::SYS_PRJFMT_LIST "cbp"
|
|
lappend ::SYS_PRJNAME_LIST "Code Blocks (.cbp)"
|
|
lappend ::SYS_PRJFMT_LIST "pro"
|
|
lappend ::SYS_PRJNAME_LIST "Qt Creator (.pro)"
|
|
|
|
set aPrjIndex [lsearch $::SYS_PRJFMT_LIST $::PRJFMT]
|
|
set ::PRJNAME [lindex $::SYS_PRJNAME_LIST $aPrjIndex]
|
|
|
|
set SYS_VS_LIST {}
|
|
set SYS_VC_LIST {}
|
|
set SYS_VCVARS_LIST {}
|
|
|
|
# detect installed Visual Studio 2017+ instances by running vswhere.exe
|
|
if { ! [catch {exec vswhere.exe -version "\[15.0,15.99\]" -latest -requires Microsoft.VisualStudio.Workload.NativeDesktop -property installationPath} res] } {
|
|
lappend ::SYS_VS_LIST "Visual Studio 2017 (15, toolset v141)"
|
|
lappend ::SYS_VC_LIST "vc141"
|
|
lappend ::SYS_VCVARS_LIST "$res\\VC\\vcvarsall.bat"
|
|
}
|
|
if { ! [catch {exec vswhere.exe -version "\[15.0,15.99\]" -latest -requires Microsoft.VisualStudio.Workload.Universal -property installationPath} res] } {
|
|
lappend ::SYS_VS_LIST "Visual Studio 2017 (15, toolset v141) UWP"
|
|
lappend ::SYS_VC_LIST "vc141-uwp"
|
|
lappend ::SYS_VCVARS_LIST "$res\\VC\\vcvarsall.bat"
|
|
}
|
|
if { ! [catch {exec vswhere.exe -version "\[16.0,16.99\]" -latest -requires Microsoft.VisualStudio.Workload.NativeDesktop -property installationPath} res] } {
|
|
lappend ::SYS_VS_LIST "Visual Studio 2019 (16, toolset v142)"
|
|
lappend ::SYS_VC_LIST "vc142"
|
|
lappend ::SYS_VCVARS_LIST "$res\\VC\\vcvarsall.bat"
|
|
}
|
|
if { ! [catch {exec vswhere.exe -version "\[16.0,16.99\]" -latest -requires Microsoft.VisualStudio.Workload.Universal -property installationPath} res] } {
|
|
lappend ::SYS_VS_LIST "Visual Studio 2019 (16, toolset v142) UWP"
|
|
lappend ::SYS_VC_LIST "vc142-uwp"
|
|
lappend ::SYS_VCVARS_LIST "$res\\VC\\vcvarsall.bat"
|
|
}
|
|
if { ! [catch {exec vswhere.exe -version "\[16.0,16.99\]" -latest -requires Microsoft.VisualStudio.Component.VC.ClangCL -property installationPath} res] } {
|
|
lappend ::SYS_VS_LIST "Visual Studio 2019 (16, toolset ClangCL)"
|
|
lappend ::SYS_VC_LIST "vclang"
|
|
lappend ::SYS_VCVARS_LIST "$res\\VC\\vcvarsall.bat"
|
|
}
|
|
|
|
# detect installed Visual Studio instances from global environment
|
|
if { [info exists ::env(VS140COMNTOOLS)] } {
|
|
lappend ::SYS_VS_LIST "Visual Studio 2015 (14, toolset v140)"
|
|
lappend ::SYS_VC_LIST "vc14"
|
|
lappend ::SYS_VCVARS_LIST "%VS140COMNTOOLS%..\\..\\VC\\vcvarsall.bat"
|
|
|
|
lappend ::SYS_VS_LIST "Visual Studio 2015 (14, toolset v140) UWP"
|
|
lappend ::SYS_VC_LIST "vc14-uwp"
|
|
lappend ::SYS_VCVARS_LIST "%VS140COMNTOOLS%..\\..\\VC\\vcvarsall.bat"
|
|
}
|
|
if { [info exists ::env(VS120COMNTOOLS)] } {
|
|
lappend ::SYS_VS_LIST "Visual Studio 2013 (12, toolset v120)"
|
|
lappend ::SYS_VC_LIST "vc12"
|
|
lappend ::SYS_VCVARS_LIST "%VS120COMNTOOLS%..\\..\\VC\\vcvarsall.bat"
|
|
}
|
|
if { [info exists ::env(VS110COMNTOOLS)] } {
|
|
lappend ::SYS_VS_LIST "Visual Studio 2012 (11, toolset v110)"
|
|
lappend ::SYS_VC_LIST "vc11"
|
|
lappend ::SYS_VCVARS_LIST "%VS110COMNTOOLS%..\\..\\VC\\vcvarsall.bat"
|
|
}
|
|
if { [info exists ::env(VS100COMNTOOLS)] } {
|
|
lappend ::SYS_VS_LIST "Visual Studio 2010 (10, toolset v100)"
|
|
lappend ::SYS_VC_LIST "vc10"
|
|
lappend ::SYS_VCVARS_LIST "%VS100COMNTOOLS%..\\..\\VC\\vcvarsall.bat"
|
|
}
|
|
if { [info exists ::env(VS90COMNTOOLS)] } {
|
|
lappend ::SYS_VS_LIST "Visual Studio 2008 (9, toolset v90)"
|
|
lappend ::SYS_VC_LIST "vc9"
|
|
lappend ::SYS_VCVARS_LIST "%VS90COMNTOOLS%..\\..\\VC\\vcvarsall.bat"
|
|
}
|
|
if { [info exists ::env(VS80COMNTOOLS)] } {
|
|
lappend ::SYS_VS_LIST "Visual Studio 2005 (8, toolset v80)"
|
|
lappend ::SYS_VC_LIST "vc8"
|
|
lappend ::SYS_VCVARS_LIST "%VS80COMNTOOLS%..\\..\\VC\\vcvarsall.bat"
|
|
}
|
|
lappend ::SYS_VS_LIST "Custom"
|
|
lappend ::SYS_VC_LIST "vcX"
|
|
lappend ::SYS_VCVARS_LIST "%VSXXCOMNTOOLS%..\\..\\VC\\vcvarsall.bat"
|
|
|
|
set aVcVerIndex [lsearch $::SYS_VC_LIST $::VCVER]
|
|
set ::VSVER [lindex $::SYS_VS_LIST $aVcVerIndex]
|
|
if { "$::VCVARS" == "" } {
|
|
set ::VCVARS [lindex $::SYS_VCVARS_LIST $aVcVerIndex]
|
|
}
|
|
|
|
proc wokdep:gui:Close {} {
|
|
# if changed ask
|
|
exit
|
|
}
|
|
|
|
proc wokdep:gui:SwitchConfig {} {
|
|
set ::PRJFMT [lindex $::SYS_PRJFMT_LIST [.myFrame.myPrjFrame.myPrjCombo current]]
|
|
set ::VCVER [lindex $::SYS_VC_LIST [.myFrame.myVsFrame.myVsCombo current]]
|
|
set ::VCVARS [lindex $::SYS_VCVARS_LIST [.myFrame.myVsFrame.myVsCombo current]]
|
|
|
|
set ::CSF_OPT_INC {}
|
|
set ::CSF_OPT_LIB32 {}
|
|
set ::CSF_OPT_LIB64 {}
|
|
set ::CSF_OPT_BIN32 {}
|
|
set ::CSF_OPT_BIN64 {}
|
|
wokdep:gui:UpdateList
|
|
}
|
|
|
|
proc wokdep:gui:SwitchArch {} {
|
|
if { "$::ARCH" == "32" } {
|
|
wokdep:gui:Show32Bitness ::aRowIter
|
|
}
|
|
if { "$::ARCH" == "64" } {
|
|
wokdep:gui:Show64Bitness ::aRowIter
|
|
}
|
|
|
|
if { [llength [grid info .myFrame.mySave]] != 0 } {
|
|
grid forget .myFrame.mySave .myFrame.myClose
|
|
}
|
|
|
|
# Bottom section
|
|
grid .myFrame.mySave -row $::aRowIter -column 4 -columnspan 2
|
|
grid .myFrame.myClose -row $::aRowIter -column 6 -columnspan 2
|
|
}
|
|
|
|
proc wokdep:gui:UpdateList {} {
|
|
set anIncErrs {}
|
|
set anLib32Errs {}
|
|
set anLib64Errs {}
|
|
set anBin32Errs {}
|
|
set anBin64Errs {}
|
|
wokdep:SearchTclTk anIncErrs anLib32Errs anLib64Errs anBin32Errs anBin64Errs
|
|
wokdep:SearchFreeType anIncErrs anLib32Errs anLib64Errs anBin32Errs anBin64Errs
|
|
wokdep:SearchX11 anIncErrs anLib32Errs anLib64Errs anBin32Errs anBin64Errs
|
|
if { "$::HAVE_GLES2" == "true" } {
|
|
wokdep:SearchEGL anIncErrs anLib32Errs anLib64Errs anBin32Errs anBin64Errs
|
|
wokdep:SearchGLES anIncErrs anLib32Errs anLib64Errs anBin32Errs anBin64Errs
|
|
}
|
|
if { "$::HAVE_FREEIMAGE" == "true" } {
|
|
wokdep:SearchFreeImage anIncErrs anLib32Errs anLib64Errs anBin32Errs anBin64Errs
|
|
}
|
|
if { "$::HAVE_FFMPEG" == "true" } {
|
|
wokdep:SearchFFmpeg anIncErrs anLib32Errs anLib64Errs anBin32Errs anBin64Errs
|
|
}
|
|
if { "$::HAVE_OPENVR" == "true" } {
|
|
wokdep:SearchOpenVR anIncErrs anLib32Errs anLib64Errs anBin32Errs anBin64Errs
|
|
}
|
|
if { "$::HAVE_TBB" == "true" } {
|
|
wokdep:SearchTBB anIncErrs anLib32Errs anLib64Errs anBin32Errs anBin64Errs
|
|
}
|
|
# if { "$::HAVE_OPENCL" == "true" } {
|
|
# wokdep:SearchOpenCL anIncErrs anLib32Errs anLib64Errs anBin32Errs anBin64Errs
|
|
# }
|
|
if { "$::HAVE_VTK" == "true" } {
|
|
wokdep:SearchVTK anIncErrs anLib32Errs anLib64Errs anBin32Errs anBin64Errs
|
|
}
|
|
|
|
if { "$::HAVE_ZLIB" == "true" } {
|
|
set aCheckLib "z"
|
|
if { "$::tcl_platform(platform)" == "windows" } {
|
|
set aCheckLib "zlib"
|
|
}
|
|
wokdep:SearchStandardLibrary anIncErrs anLib32Errs anLib64Errs anBin32Errs anBin64Errs "zlib" "zlib.h" "$aCheckLib" {"zlib"}
|
|
}
|
|
if { "$::HAVE_LIBLZMA" == "true" } {
|
|
set aCheckLib "lzma"
|
|
if { "$::tcl_platform(platform)" == "windows" } {
|
|
set aCheckLib "liblzma"
|
|
}
|
|
wokdep:SearchStandardLibrary anIncErrs anLib32Errs anLib64Errs anBin32Errs anBin64Errs "liblzma" "lzma.h" "$aCheckLib" {"lzma" "xz"}
|
|
}
|
|
if { "$::HAVE_E57" == "true" } {
|
|
wokdep:SearchStandardLibrary anIncErrs anLib32Errs anLib64Errs anBin32Errs anBin64Errs "e57" "e57/E57Foundation.h" "E57RefImpl" {"e57"}
|
|
set aCheckLib "xerces-c"
|
|
if { "$::tcl_platform(platform)" == "windows" } {
|
|
set aCheckLib "xerces-c_3"
|
|
}
|
|
wokdep:SearchStandardLibrary anIncErrs anLib32Errs anLib64Errs anBin32Errs anBin64Errs "xerces-c" "xercesc/sax2/XMLReaderFactory.hpp" "$aCheckLib" {"xerces"}
|
|
}
|
|
if { "$::HAVE_RAPIDJSON" == "true" } {
|
|
wokdep:SearchRapidJson anIncErrs anLib32Errs anLib64Errs anBin32Errs anBin64Errs
|
|
}
|
|
|
|
if {"$::BUILD_Inspector" == "true" } {
|
|
set ::CHECK_QT "true"
|
|
}
|
|
|
|
if { "$::CHECK_QT" == "true" } {
|
|
wokdep:SearchQt anIncErrs anLib32Errs anLib64Errs anBin32Errs anBin64Errs
|
|
}
|
|
|
|
if { "$::CHECK_JDK" == "true" } {
|
|
wokdep:SearchJDK anIncErrs anLib32Errs anLib64Errs anBin32Errs anBin64Errs
|
|
}
|
|
|
|
.myFrame.myIncErrLbl configure -text [join $anIncErrs "\n"]
|
|
.myFrame.myLib32ErrLbl configure -text [join $anLib32Errs "\n"]
|
|
.myFrame.myLib64ErrLbl configure -text [join $anLib64Errs "\n"]
|
|
.myFrame.myBin32ErrLbl configure -text [join $anBin32Errs "\n"]
|
|
.myFrame.myBin64ErrLbl configure -text [join $anBin64Errs "\n"]
|
|
}
|
|
|
|
proc wokdep:gui:BrowseVcVars {} {
|
|
set aResult [tk_chooseDirectory -initialdir $::VCVARS -title "Choose a directory"]
|
|
if { "$aResult" != "" } {
|
|
set ::VCVARS $aResult
|
|
}
|
|
}
|
|
|
|
proc wokdep:gui:BrowsePartiesRoot {} {
|
|
set aResult [tk_chooseDirectory -initialdir $::PRODUCTS_PATH_INPUT -title "Choose a directory"]
|
|
if { "$aResult" != "" } {
|
|
set ::PRODUCTS_PATH_INPUT $aResult
|
|
wokdep:gui:UpdateList
|
|
}
|
|
}
|
|
|
|
proc wokdep:gui:AddIncPath {} {
|
|
set aResult [tk_chooseDirectory -title "Choose a directory"]
|
|
if { "$aResult" != "" } {
|
|
lappend ::CSF_OPT_INC "$aResult"
|
|
wokdep:gui:UpdateList
|
|
}
|
|
}
|
|
|
|
proc wokdep:gui:AddLib32Path {} {
|
|
set aResult [tk_chooseDirectory -title "Choose a directory"]
|
|
if { "$aResult" != "" } {
|
|
lappend ::CSF_OPT_LIB32 "$aResult"
|
|
wokdep:gui:UpdateList
|
|
}
|
|
}
|
|
|
|
proc wokdep:gui:AddLib64Path {} {
|
|
set aResult [tk_chooseDirectory -title "Choose a directory"]
|
|
if { "$aResult" != "" } {
|
|
lappend ::CSF_OPT_LIB64 "$aResult"
|
|
wokdep:gui:UpdateList
|
|
}
|
|
}
|
|
|
|
proc wokdep:gui:AddBin32Path {} {
|
|
set aResult [tk_chooseDirectory -title "Choose a directory"]
|
|
if { "$aResult" != "" } {
|
|
lappend ::CSF_OPT_BIN32 "$aResult"
|
|
wokdep:gui:UpdateList
|
|
}
|
|
}
|
|
|
|
proc wokdep:gui:AddBin64Path {} {
|
|
set aResult [tk_chooseDirectory -title "Choose a directory"]
|
|
if { "$aResult" != "" } {
|
|
lappend ::CSF_OPT_BIN64 "$aResult"
|
|
wokdep:gui:UpdateList
|
|
}
|
|
}
|
|
|
|
proc wokdep:gui:RemoveIncPath {} {
|
|
set aSelIndices [.myFrame.myIncList curselection]
|
|
if { [llength $aSelIndices] != 0 } {
|
|
.myFrame.myIncList delete [lindex $aSelIndices 0]
|
|
}
|
|
wokdep:gui:UpdateList
|
|
}
|
|
|
|
proc wokdep:gui:RemoveLib32Path {} {
|
|
set aSelIndices [.myFrame.myLib32List curselection]
|
|
if { [llength $aSelIndices] != 0 } {
|
|
.myFrame.myLib32List delete [lindex $aSelIndices 0]
|
|
}
|
|
wokdep:gui:UpdateList
|
|
}
|
|
|
|
proc wokdep:gui:RemoveLib64Path {} {
|
|
set aSelIndices [.myFrame.myLib64List curselection]
|
|
if { [llength $aSelIndices] != 0 } {
|
|
.myFrame.myLib64List delete [lindex $aSelIndices 0]
|
|
}
|
|
wokdep:gui:UpdateList
|
|
}
|
|
|
|
proc wokdep:gui:RemoveBin32Path {} {
|
|
set aSelIndices [.myFrame.myBin32List curselection]
|
|
if { [llength $aSelIndices] != 0 } {
|
|
.myFrame.myBin32List delete [lindex $aSelIndices 0]
|
|
}
|
|
wokdep:gui:UpdateList
|
|
}
|
|
|
|
proc wokdep:gui:RemoveBin64Path {} {
|
|
set aSelIndices [.myFrame.myBin64List curselection]
|
|
if { [llength $aSelIndices] != 0 } {
|
|
.myFrame.myBin64List delete [lindex $aSelIndices 0]
|
|
}
|
|
wokdep:gui:UpdateList
|
|
}
|
|
|
|
proc wokdep:gui:ResetIncPath {} {
|
|
set ::CSF_OPT_INC {}
|
|
wokdep:gui:UpdateList
|
|
}
|
|
|
|
proc wokdep:gui:ResetLib32Path {} {
|
|
set ::CSF_OPT_LIB32 {}
|
|
wokdep:gui:UpdateList
|
|
}
|
|
|
|
proc wokdep:gui:ResetLib64Path {} {
|
|
set ::CSF_OPT_LIB64 {}
|
|
wokdep:gui:UpdateList
|
|
}
|
|
|
|
proc wokdep:gui:ResetBin32Path {} {
|
|
set ::CSF_OPT_BIN32 {}
|
|
wokdep:gui:UpdateList
|
|
}
|
|
|
|
proc wokdep:gui:ResetBin64Path {} {
|
|
set ::CSF_OPT_BIN64 {}
|
|
wokdep:gui:UpdateList
|
|
}
|
|
|
|
proc wokdep:gui:Show32Bitness { theRowIter } {
|
|
upvar $theRowIter aRowIter
|
|
|
|
if { [llength [grid info .myFrame.myLib64Lbl]] != 0 } {
|
|
grid forget .myFrame.myLib64Lbl .myFrame.myLib64List .myFrame.myLib64Scrl
|
|
grid forget .myFrame.myLib64Add .myFrame.myLib64Remove .myFrame.myLib64Clear .myFrame.myLib64ErrLbl
|
|
grid forget .myFrame.myBin64Lbl .myFrame.myBin64List .myFrame.myBin64Scrl
|
|
grid forget .myFrame.myBin64Add .myFrame.myBin64Remove .myFrame.myBin64Clear .myFrame.myBin64ErrLbl
|
|
}
|
|
|
|
# Additional libraries (32-bit) search paths
|
|
grid .myFrame.myLib32Lbl -row $aRowIter -column 0 -columnspan 10 -sticky w
|
|
incr aRowIter
|
|
grid .myFrame.myLib32List -row $aRowIter -column 0 -rowspan 4 -columnspan 5
|
|
grid .myFrame.myLib32Scrl -row $aRowIter -column 5 -rowspan 4
|
|
grid .myFrame.myLib32Add -row $aRowIter -column 6
|
|
incr aRowIter
|
|
#grid .myFrame.myLib32Edit -row $aRowIter -column 6
|
|
incr aRowIter
|
|
grid .myFrame.myLib32Remove -row $aRowIter -column 6
|
|
incr aRowIter
|
|
grid .myFrame.myLib32Clear -row $aRowIter -column 6
|
|
incr aRowIter
|
|
grid .myFrame.myLib32ErrLbl -row $aRowIter -column 0 -columnspan 10 -sticky w
|
|
incr aRowIter
|
|
|
|
# Additional executables (32-bit) search paths
|
|
grid .myFrame.myBin32Lbl -row $aRowIter -column 0 -columnspan 10 -sticky w
|
|
incr aRowIter
|
|
grid .myFrame.myBin32List -row $aRowIter -column 0 -rowspan 4 -columnspan 5
|
|
grid .myFrame.myBin32Scrl -row $aRowIter -column 5 -rowspan 4
|
|
grid .myFrame.myBin32Add -row $aRowIter -column 6
|
|
incr aRowIter
|
|
#grid .myFrame.myBin32Edit -row $aRowIter -column 6
|
|
incr aRowIter
|
|
grid .myFrame.myBin32Remove -row $aRowIter -column 6
|
|
incr aRowIter
|
|
grid .myFrame.myBin32Clear -row $aRowIter -column 6
|
|
incr aRowIter
|
|
grid .myFrame.myBin32ErrLbl -row $aRowIter -column 0 -columnspan 10 -sticky w
|
|
incr aRowIter
|
|
}
|
|
|
|
proc wokdep:gui:Show64Bitness { theRowIter } {
|
|
upvar $theRowIter aRowIter
|
|
|
|
if { [llength [grid info .myFrame.myLib32Lbl]] != 0 } {
|
|
grid forget .myFrame.myLib32Lbl .myFrame.myLib32List .myFrame.myLib32Scrl
|
|
grid forget .myFrame.myLib32Add .myFrame.myLib32Remove .myFrame.myLib32Clear .myFrame.myLib32ErrLbl
|
|
grid forget .myFrame.myBin32Lbl .myFrame.myBin32List .myFrame.myBin32Scrl
|
|
grid forget .myFrame.myBin32Add .myFrame.myBin32Remove .myFrame.myBin32Clear .myFrame.myBin32ErrLbl
|
|
}
|
|
|
|
# Additional libraries (64-bit) search paths
|
|
grid .myFrame.myLib64Lbl -row $aRowIter -column 0 -columnspan 10 -sticky w
|
|
incr aRowIter
|
|
grid .myFrame.myLib64List -row $aRowIter -column 0 -rowspan 4 -columnspan 5
|
|
grid .myFrame.myLib64Scrl -row $aRowIter -column 5 -rowspan 4
|
|
grid .myFrame.myLib64Add -row $aRowIter -column 6
|
|
incr aRowIter
|
|
#grid .myFrame.myLib64Edit -row $aRowIter -column 6
|
|
incr aRowIter
|
|
grid .myFrame.myLib64Remove -row $aRowIter -column 6
|
|
incr aRowIter
|
|
grid .myFrame.myLib64Clear -row $aRowIter -column 6
|
|
incr aRowIter
|
|
grid .myFrame.myLib64ErrLbl -row $aRowIter -column 0 -columnspan 10 -sticky w
|
|
incr aRowIter
|
|
|
|
# Additional executables (64-bit) search paths
|
|
grid .myFrame.myBin64Lbl -row $aRowIter -column 0 -columnspan 10 -sticky w
|
|
incr aRowIter
|
|
grid .myFrame.myBin64List -row $aRowIter -column 0 -rowspan 4 -columnspan 5
|
|
grid .myFrame.myBin64Scrl -row $aRowIter -column 5 -rowspan 4
|
|
grid .myFrame.myBin64Add -row $aRowIter -column 6
|
|
incr aRowIter
|
|
#grid .myFrame.myBin64Edit -row $aRowIter -column 6
|
|
incr aRowIter
|
|
grid .myFrame.myBin64Remove -row $aRowIter -column 6
|
|
incr aRowIter
|
|
grid .myFrame.myBin64Clear -row $aRowIter -column 6
|
|
incr aRowIter
|
|
grid .myFrame.myBin64ErrLbl -row $aRowIter -column 0 -columnspan 10 -sticky w
|
|
incr aRowIter
|
|
}
|
|
|
|
# Header
|
|
ttk::label .myFrame.myPrjFrame.myPrjLbl -text "Project format:" -padding {5 5 20 5}
|
|
ttk::combobox .myFrame.myPrjFrame.myPrjCombo -values $SYS_PRJNAME_LIST -state readonly -textvariable PRJNAME -width 40
|
|
ttk::label .myFrame.myVsFrame.myVsLbl -text "Visual Studio configuration:" -padding {5 5 20 5}
|
|
ttk::combobox .myFrame.myVsFrame.myVsCombo -values $SYS_VS_LIST -state readonly -textvariable VSVER -width 40
|
|
ttk::combobox .myFrame.myVsFrame.myArchCombo -values { {32} {64} } -textvariable ARCH -state readonly -width 6
|
|
entry .myFrame.myVcEntry -textvariable VCVER -width 10
|
|
entry .myFrame.myVcVarsEntry -textvariable VCVARS -width 70
|
|
ttk::button .myFrame.myVcBrowseBtn -text "Browse" -command wokdep:gui:BrowseVcVars
|
|
ttk::label .myFrame.myHxxChecks.myRelDebInfoLbl -text "Release with Debug info"
|
|
checkbutton .myFrame.myHxxChecks.myRelDebInfoCheck -offvalue "false" -onvalue "true" -variable HAVE_RelWithDebInfo
|
|
|
|
#
|
|
ttk::combobox .myFrame.myHxxChecks.myScutsCombo -values { {ShortCut} {Copy} {HardLink} } -textvariable SHORTCUT_HEADERS -state readonly -width 12
|
|
ttk::label .myFrame.myHxxChecks.myScutsLbl -text "Strategy for filling headers folder inc:"
|
|
|
|
#
|
|
ttk::label .myFrame.mySrchLbl -text "3rd-parties search path:" -padding {5 5 80 5}
|
|
entry .myFrame.mySrchEntry -textvariable PRODUCTS_PATH_INPUT -width 80
|
|
ttk::button .myFrame.mySrchBrowseBtn -text "Browse" -command wokdep:gui:BrowsePartiesRoot
|
|
checkbutton .myFrame.myChecks.myFImageCheck -offvalue "false" -onvalue "true" -variable HAVE_FREEIMAGE -command wokdep:gui:UpdateList
|
|
ttk::label .myFrame.myChecks.myFImageLbl -text "Use FreeImage"
|
|
checkbutton .myFrame.myChecks.myTbbCheck -offvalue "false" -onvalue "true" -variable HAVE_TBB -command wokdep:gui:UpdateList
|
|
ttk::label .myFrame.myChecks.myTbbLbl -text "Use Intel TBB"
|
|
checkbutton .myFrame.myChecks.myOpenVrCheck -offvalue "false" -onvalue "true" -variable HAVE_OPENVR -command wokdep:gui:UpdateList
|
|
ttk::label .myFrame.myChecks.myOpenVrLbl -text "Use OpenVR"
|
|
if { "$::tcl_platform(os)" != "Darwin" } {
|
|
checkbutton .myFrame.myChecks.myGlesCheck -offvalue "false" -onvalue "true" -variable HAVE_GLES2 -command wokdep:gui:UpdateList
|
|
ttk::label .myFrame.myChecks.myGlesLbl -text "Use OpenGL ES"
|
|
}
|
|
if { "$::tcl_platform(platform)" == "windows" } {
|
|
checkbutton .myFrame.myChecks.myD3dCheck -offvalue "false" -onvalue "true" -variable HAVE_D3D -command wokdep:gui:UpdateList
|
|
ttk::label .myFrame.myChecks.myD3dLbl -text "Use Direct3D"
|
|
}
|
|
checkbutton .myFrame.myChecks.myFFmpegCheck -offvalue "false" -onvalue "true" -variable HAVE_FFMPEG -command wokdep:gui:UpdateList
|
|
ttk::label .myFrame.myChecks.myFFmpegLbl -text "Use FFmpeg"
|
|
#checkbutton .myFrame.myChecks.myOpenClCheck -offvalue "false" -onvalue "true" -variable HAVE_OPENCL -command wokdep:gui:UpdateList
|
|
#ttk::label .myFrame.myChecks.myOpenClLbl -text "Use OpenCL"
|
|
checkbutton .myFrame.myChecks.myRapidJsonCheck -offvalue "false" -onvalue "true" -variable HAVE_RAPIDJSON -command wokdep:gui:UpdateList
|
|
ttk::label .myFrame.myChecks.myRapidJsonLbl -text "Use RapidJSON"
|
|
|
|
checkbutton .myFrame.myChecks.myMacGLXCheck -offvalue "false" -onvalue "true" -variable MACOSX_USE_GLX
|
|
ttk::label .myFrame.myChecks.myMacGLXLbl -text "Use X11 for windows drawing"
|
|
ttk::label .myFrame.myChecks.myVtkLbl -text "Use VTK"
|
|
checkbutton .myFrame.myChecks.myVtkCheck -offvalue "false" -onvalue "true" -variable HAVE_VTK -command wokdep:gui:UpdateList
|
|
|
|
checkbutton .myFrame.myChecks.myZLibCheck -offvalue "false" -onvalue "true" -variable HAVE_ZLIB -command wokdep:gui:UpdateList
|
|
ttk::label .myFrame.myChecks.myZLibLbl -text "Use zlib"
|
|
checkbutton .myFrame.myChecks.myLzmaCheck -offvalue "false" -onvalue "true" -variable HAVE_LIBLZMA -command wokdep:gui:UpdateList
|
|
ttk::label .myFrame.myChecks.myLzmaLbl -text "Use liblzma"
|
|
checkbutton .myFrame.myChecks.myE57Check -offvalue "false" -onvalue "true" -variable HAVE_E57 -command wokdep:gui:UpdateList
|
|
ttk::label .myFrame.myChecks.myE57Lbl -text "Use E57"
|
|
|
|
checkbutton .myFrame.myChecks.myQtCheck -offvalue "false" -onvalue "true" -variable CHECK_QT -command wokdep:gui:UpdateList
|
|
ttk::label .myFrame.myChecks.myQtLbl -text "Search Qt"
|
|
checkbutton .myFrame.myChecks.myJDKCheck -offvalue "false" -onvalue "true" -variable CHECK_JDK -command wokdep:gui:UpdateList
|
|
ttk::label .myFrame.myChecks.myJDKLbl -text "Search JDK"
|
|
|
|
if { "$::tcl_platform(platform)" == "windows" } {
|
|
checkbutton .myFrame.myChecks.myInspectorBuild -offvalue "false" -onvalue "true" -variable BUILD_Inspector -command wokdep:gui:UpdateList
|
|
ttk::label .myFrame.myChecks.myInspectorLbl -text "Build Inspector"
|
|
}
|
|
|
|
# Additional headers search paths
|
|
ttk::label .myFrame.myIncLbl -text "Additional headers search paths:" -padding {5 5 80 5}
|
|
scrollbar .myFrame.myIncScrl -command ".myFrame.myIncList yview"
|
|
listbox .myFrame.myIncList -listvariable CSF_OPT_INC -width 80 -height 5 -yscrollcommand ".myFrame.myIncScrl set"
|
|
ttk::button .myFrame.myIncAdd -text "Add" -command wokdep:gui:AddIncPath
|
|
ttk::button .myFrame.myIncEdit -text "Edit"
|
|
ttk::button .myFrame.myIncRemove -text "Remove" -command wokdep:gui:RemoveIncPath
|
|
ttk::button .myFrame.myIncClear -text "Reset" -command wokdep:gui:ResetIncPath
|
|
ttk::label .myFrame.myIncErrLbl -text "Error: " -foreground red -padding {5 5 5 5}
|
|
|
|
# Additional libraries (32-bit) search paths
|
|
ttk::label .myFrame.myLib32Lbl -text "Additional libraries (32-bit) search paths:" -padding {5 5 80 5}
|
|
scrollbar .myFrame.myLib32Scrl -command ".myFrame.myLib32List yview"
|
|
listbox .myFrame.myLib32List -listvariable CSF_OPT_LIB32 -width 80 -height 5 -yscrollcommand ".myFrame.myLib32Scrl set"
|
|
ttk::button .myFrame.myLib32Add -text "Add" -command wokdep:gui:AddLib32Path
|
|
ttk::button .myFrame.myLib32Edit -text "Edit"
|
|
ttk::button .myFrame.myLib32Remove -text "Remove" -command wokdep:gui:RemoveLib32Path
|
|
ttk::button .myFrame.myLib32Clear -text "Reset" -command wokdep:gui:ResetLib32Path
|
|
ttk::label .myFrame.myLib32ErrLbl -text "Error: " -foreground red -padding {5 5 5 5}
|
|
|
|
# Additional libraries (64-bit) search paths
|
|
ttk::label .myFrame.myLib64Lbl -text "Additional libraries (64-bit) search paths:" -padding {5 5 80 5}
|
|
scrollbar .myFrame.myLib64Scrl -command ".myFrame.myLib64List yview"
|
|
listbox .myFrame.myLib64List -listvariable CSF_OPT_LIB64 -width 80 -height 5 -yscrollcommand ".myFrame.myLib64Scrl set"
|
|
ttk::button .myFrame.myLib64Add -text "Add" -command wokdep:gui:AddLib64Path
|
|
ttk::button .myFrame.myLib64Edit -text "Edit"
|
|
ttk::button .myFrame.myLib64Remove -text "Remove" -command wokdep:gui:RemoveLib64Path
|
|
ttk::button .myFrame.myLib64Clear -text "Reset" -command wokdep:gui:ResetLib64Path
|
|
ttk::label .myFrame.myLib64ErrLbl -text "Error: " -foreground red -padding {5 5 5 5}
|
|
|
|
# Additional executables (32-bit) search paths
|
|
ttk::label .myFrame.myBin32Lbl -text "Additional executables (32-bit) search paths:" -padding {5 5 80 5}
|
|
scrollbar .myFrame.myBin32Scrl -command ".myFrame.myBin32List yview"
|
|
listbox .myFrame.myBin32List -listvariable CSF_OPT_BIN32 -width 80 -height 5 -yscrollcommand ".myFrame.myBin32Scrl set"
|
|
ttk::button .myFrame.myBin32Add -text "Add" -command wokdep:gui:AddBin32Path
|
|
ttk::button .myFrame.myBin32Edit -text "Edit"
|
|
ttk::button .myFrame.myBin32Remove -text "Remove" -command wokdep:gui:RemoveBin32Path
|
|
ttk::button .myFrame.myBin32Clear -text "Reset" -command wokdep:gui:ResetBin32Path
|
|
ttk::label .myFrame.myBin32ErrLbl -text "Error: " -foreground red -padding {5 5 5 5}
|
|
|
|
# Additional executables (64-bit) search paths
|
|
ttk::label .myFrame.myBin64Lbl -text "Additional executables (64-bit) search paths:" -padding {5 5 80 5}
|
|
scrollbar .myFrame.myBin64Scrl -command ".myFrame.myBin64List yview"
|
|
listbox .myFrame.myBin64List -listvariable CSF_OPT_BIN64 -width 80 -height 5 -yscrollcommand ".myFrame.myBin64Scrl set"
|
|
ttk::button .myFrame.myBin64Add -text "Add" -command wokdep:gui:AddBin64Path
|
|
ttk::button .myFrame.myBin64Edit -text "Edit"
|
|
ttk::button .myFrame.myBin64Remove -text "Remove" -command wokdep:gui:RemoveBin64Path
|
|
ttk::button .myFrame.myBin64Clear -text "Reset" -command wokdep:gui:ResetBin64Path
|
|
ttk::label .myFrame.myBin64ErrLbl -text "Error: " -foreground red -padding {5 5 5 5}
|
|
|
|
# Bottom
|
|
ttk::button .myFrame.mySave -text "Save" -command wokdep:SaveCustom
|
|
ttk::button .myFrame.myClose -text "Close" -command wokdep:gui:Close
|
|
|
|
# Create grid
|
|
# Header
|
|
grid .myFrame.myPrjFrame -row $aRowIter -column 0 -columnspan 10 -sticky w
|
|
grid .myFrame.myPrjFrame.myPrjLbl -row 0 -column 0
|
|
grid .myFrame.myPrjFrame.myPrjCombo -row 0 -column 1
|
|
incr aRowIter
|
|
if { "$tcl_platform(platform)" == "windows" } {
|
|
grid .myFrame.myVsFrame -row $aRowIter -column 0 -columnspan 10 -sticky w
|
|
grid .myFrame.myVsFrame.myVsLbl -row 0 -column 0
|
|
grid .myFrame.myVsFrame.myVsCombo -row 0 -column 1 -padx 5
|
|
grid .myFrame.myVsFrame.myArchCombo -row 0 -column 2
|
|
incr aRowIter
|
|
grid .myFrame.myVcEntry -row $aRowIter -column 0
|
|
grid .myFrame.myVcVarsEntry -row $aRowIter -column 1 -columnspan 4 -sticky w
|
|
grid .myFrame.myVcBrowseBtn -row $aRowIter -column 6
|
|
incr aRowIter
|
|
}
|
|
|
|
#
|
|
grid .myFrame.myHxxChecks -row $aRowIter -column 0 -columnspan 10 -sticky w
|
|
grid .myFrame.myHxxChecks.myScutsLbl -row 0 -column 0
|
|
grid .myFrame.myHxxChecks.myScutsCombo -row 0 -column 1
|
|
if { "$tcl_platform(platform)" == "windows" } {
|
|
grid .myFrame.myHxxChecks.myRelDebInfoCheck -row 0 -column 2
|
|
grid .myFrame.myHxxChecks.myRelDebInfoLbl -row 0 -column 3
|
|
}
|
|
incr aRowIter
|
|
#
|
|
grid .myFrame.mySrchLbl -row $aRowIter -column 0 -columnspan 10 -sticky w
|
|
incr aRowIter
|
|
grid .myFrame.mySrchEntry -row $aRowIter -column 0 -columnspan 5
|
|
grid .myFrame.mySrchBrowseBtn -row $aRowIter -column 6
|
|
incr aRowIter
|
|
|
|
grid .myFrame.myChecks -row $aRowIter -column 0 -columnspan 10 -sticky w
|
|
incr aRowIter
|
|
grid .myFrame.myChecks.myFImageCheck -row $aCheckRowIter -column 0 -sticky e
|
|
grid .myFrame.myChecks.myFImageLbl -row $aCheckRowIter -column 1 -sticky w
|
|
grid .myFrame.myChecks.myTbbCheck -row $aCheckRowIter -column 2 -sticky e
|
|
grid .myFrame.myChecks.myTbbLbl -row $aCheckRowIter -column 3 -sticky w
|
|
if { "$::tcl_platform(os)" != "Darwin" } {
|
|
grid .myFrame.myChecks.myGlesCheck -row $aCheckRowIter -column 4 -sticky e
|
|
grid .myFrame.myChecks.myGlesLbl -row $aCheckRowIter -column 5 -sticky w
|
|
}
|
|
#grid .myFrame.myChecks.myOpenClCheck -row $aCheckRowIter -column 6 -sticky e
|
|
#grid .myFrame.myChecks.myOpenClLbl -row $aCheckRowIter -column 7 -sticky w
|
|
grid .myFrame.myChecks.myZLibCheck -row $aCheckRowIter -column 6 -sticky e
|
|
grid .myFrame.myChecks.myZLibLbl -row $aCheckRowIter -column 7 -sticky w
|
|
|
|
grid .myFrame.myChecks.myQtCheck -row $aCheckRowIter -column 12 -sticky e
|
|
grid .myFrame.myChecks.myQtLbl -row $aCheckRowIter -column 13 -sticky w
|
|
|
|
incr aCheckRowIter
|
|
grid .myFrame.myChecks.myFFmpegCheck -row $aCheckRowIter -column 0 -sticky e
|
|
grid .myFrame.myChecks.myFFmpegLbl -row $aCheckRowIter -column 1 -sticky w
|
|
grid .myFrame.myChecks.myVtkCheck -row $aCheckRowIter -column 2 -sticky e
|
|
grid .myFrame.myChecks.myVtkLbl -row $aCheckRowIter -column 3 -sticky w
|
|
if { "$::tcl_platform(platform)" == "windows" } {
|
|
grid .myFrame.myChecks.myD3dCheck -row $aCheckRowIter -column 4 -sticky e
|
|
grid .myFrame.myChecks.myD3dLbl -row $aCheckRowIter -column 5 -sticky w
|
|
} elseif { "$::tcl_platform(os)" == "Darwin" } {
|
|
grid .myFrame.myChecks.myMacGLXCheck -row $aCheckRowIter -column 4 -sticky e
|
|
grid .myFrame.myChecks.myMacGLXLbl -row $aCheckRowIter -column 5 -sticky w
|
|
}
|
|
grid .myFrame.myChecks.myLzmaCheck -row $aCheckRowIter -column 6 -sticky e
|
|
grid .myFrame.myChecks.myLzmaLbl -row $aCheckRowIter -column 7 -sticky w
|
|
grid .myFrame.myChecks.myJDKCheck -row $aCheckRowIter -column 12 -sticky e
|
|
grid .myFrame.myChecks.myJDKLbl -row $aCheckRowIter -column 13 -sticky w
|
|
|
|
incr aCheckRowIter
|
|
grid .myFrame.myChecks.myRapidJsonCheck -row $aCheckRowIter -column 0 -sticky e
|
|
grid .myFrame.myChecks.myRapidJsonLbl -row $aCheckRowIter -column 1 -sticky w
|
|
grid .myFrame.myChecks.myOpenVrCheck -row $aCheckRowIter -column 4 -sticky e
|
|
grid .myFrame.myChecks.myOpenVrLbl -row $aCheckRowIter -column 5 -sticky w
|
|
grid .myFrame.myChecks.myE57Check -row $aCheckRowIter -column 6 -sticky e
|
|
grid .myFrame.myChecks.myE57Lbl -row $aCheckRowIter -column 7 -sticky w
|
|
|
|
if { "$::tcl_platform(platform)" == "windows" } {
|
|
grid .myFrame.myChecks.myInspectorBuild -row $aCheckRowIter -column 12 -sticky e
|
|
grid .myFrame.myChecks.myInspectorLbl -row $aCheckRowIter -column 13 -sticky w
|
|
}
|
|
|
|
incr aCheckRowIter
|
|
|
|
# Additional headers search paths
|
|
grid .myFrame.myIncLbl -row $aRowIter -column 0 -columnspan 10 -sticky w
|
|
incr aRowIter
|
|
grid .myFrame.myIncList -row $aRowIter -column 0 -rowspan 4 -columnspan 5
|
|
grid .myFrame.myIncScrl -row $aRowIter -column 5 -rowspan 4
|
|
grid .myFrame.myIncAdd -row $aRowIter -column 6
|
|
incr aRowIter
|
|
#grid .myFrame.myIncEdit -row $aRowIter -column 6
|
|
incr aRowIter
|
|
grid .myFrame.myIncRemove -row $aRowIter -column 6
|
|
incr aRowIter
|
|
grid .myFrame.myIncClear -row $aRowIter -column 6
|
|
incr aRowIter
|
|
grid .myFrame.myIncErrLbl -row $aRowIter -column 0 -columnspan 10 -sticky w
|
|
incr aRowIter
|
|
|
|
# Additional 32-bit search paths
|
|
if { "$ARCH" == "32" } {
|
|
wokdep:gui:Show32Bitness aRowIter
|
|
}
|
|
|
|
# Additional 64-bit search paths
|
|
if { "$ARCH" == "64" } {
|
|
wokdep:gui:Show64Bitness aRowIter
|
|
}
|
|
|
|
# Bottom section
|
|
grid .myFrame.mySave -row $aRowIter -column 4 -columnspan 2
|
|
grid .myFrame.myClose -row $aRowIter -column 6 -columnspan 2
|
|
|
|
# Bind events
|
|
bind .myFrame.myPrjFrame.myPrjCombo <<ComboboxSelected>> {
|
|
wokdep:gui:SwitchConfig
|
|
}
|
|
bind .myFrame.myVsFrame.myVsCombo <<ComboboxSelected>> {
|
|
wokdep:gui:SwitchConfig
|
|
}
|
|
bind .myFrame.myVsFrame.myArchCombo <<ComboboxSelected>> {
|
|
wokdep:gui:SwitchArch
|
|
}
|
|
|
|
.myFrame.mySrchEntry configure -validate all -validatecommand {
|
|
set ::PRODUCTS_PATH [file normalize "$::PRODUCTS_PATH_INPUT"]
|
|
#return [file exists "$::PRODUCTS_PATH"]
|
|
wokdep:gui:UpdateList
|
|
return 1
|
|
}
|
|
|
|
wokdep:gui:UpdateList
|