2016-09-27 22:01:08 +03:00
|
|
|
# Distributed under the OSI-approved BSD 3-Clause License. See accompanying
|
|
|
|
# file Copyright.txt or https://cmake.org/licensing for details.
|
|
|
|
|
2013-10-15 19:17:36 +04:00
|
|
|
#.rst:
|
|
|
|
# FindWish
|
|
|
|
# --------
|
|
|
|
#
|
|
|
|
# Find wish installation
|
|
|
|
#
|
|
|
|
# This module finds if TCL is installed and determines where the include
|
|
|
|
# files and libraries are. It also determines what the name of the
|
|
|
|
# library is. This code sets the following variables:
|
|
|
|
#
|
|
|
|
# ::
|
|
|
|
#
|
|
|
|
# TK_WISH = the path to the wish executable
|
|
|
|
#
|
2001-12-06 19:51:37 +03:00
|
|
|
#
|
|
|
|
#
|
2005-12-15 22:17:43 +03:00
|
|
|
# if UNIX is defined, then it will look for the cygwin version first
|
2009-09-28 19:45:50 +04:00
|
|
|
|
2012-08-13 21:47:32 +04:00
|
|
|
if(UNIX)
|
|
|
|
find_program(TK_WISH cygwish80 )
|
2012-08-13 21:50:14 +04:00
|
|
|
endif()
|
2001-12-06 19:51:37 +03:00
|
|
|
|
2012-08-13 21:47:32 +04:00
|
|
|
get_filename_component(TCL_TCLSH_PATH "${TCL_TCLSH}" PATH)
|
|
|
|
get_filename_component(TCL_TCLSH_PATH_PARENT "${TCL_TCLSH_PATH}" PATH)
|
|
|
|
string(REGEX REPLACE
|
2008-01-26 09:11:04 +03:00
|
|
|
"^.*tclsh([0-9]\\.*[0-9]).*$" "\\1" TCL_TCLSH_VERSION "${TCL_TCLSH}")
|
2008-01-18 21:51:25 +03:00
|
|
|
|
2012-08-13 21:47:32 +04:00
|
|
|
get_filename_component(TCL_INCLUDE_PATH_PARENT "${TCL_INCLUDE_PATH}" PATH)
|
|
|
|
get_filename_component(TK_INCLUDE_PATH_PARENT "${TK_INCLUDE_PATH}" PATH)
|
2008-01-18 21:15:12 +03:00
|
|
|
|
2012-08-13 21:47:32 +04:00
|
|
|
get_filename_component(TCL_LIBRARY_PATH "${TCL_LIBRARY}" PATH)
|
|
|
|
get_filename_component(TCL_LIBRARY_PATH_PARENT "${TCL_LIBRARY_PATH}" PATH)
|
|
|
|
string(REGEX REPLACE
|
2008-01-26 09:11:04 +03:00
|
|
|
"^.*tcl([0-9]\\.*[0-9]).*$" "\\1" TCL_LIBRARY_VERSION "${TCL_LIBRARY}")
|
2008-01-18 21:46:10 +03:00
|
|
|
|
2012-08-13 21:47:32 +04:00
|
|
|
get_filename_component(TK_LIBRARY_PATH "${TK_LIBRARY}" PATH)
|
|
|
|
get_filename_component(TK_LIBRARY_PATH_PARENT "${TK_LIBRARY_PATH}" PATH)
|
|
|
|
string(REGEX REPLACE
|
2008-01-26 09:11:04 +03:00
|
|
|
"^.*tk([0-9]\\.*[0-9]).*$" "\\1" TK_LIBRARY_VERSION "${TK_LIBRARY}")
|
2008-01-18 21:15:12 +03:00
|
|
|
|
2012-08-13 21:47:32 +04:00
|
|
|
set(TCLTK_POSSIBLE_BIN_PATHS
|
2008-01-18 21:15:12 +03:00
|
|
|
"${TCL_INCLUDE_PATH_PARENT}/bin"
|
|
|
|
"${TK_INCLUDE_PATH_PARENT}/bin"
|
|
|
|
"${TCL_LIBRARY_PATH_PARENT}/bin"
|
|
|
|
"${TK_LIBRARY_PATH_PARENT}/bin"
|
2008-01-24 00:27:36 +03:00
|
|
|
"${TCL_TCLSH_PATH_PARENT}/bin"
|
2008-01-25 21:07:59 +03:00
|
|
|
)
|
|
|
|
|
2012-08-13 21:47:32 +04:00
|
|
|
if(WIN32)
|
|
|
|
get_filename_component(
|
2012-08-13 21:42:58 +04:00
|
|
|
ActiveTcl_CurrentVersion
|
|
|
|
"[HKEY_LOCAL_MACHINE\\SOFTWARE\\ActiveState\\ActiveTcl;CurrentVersion]"
|
2008-01-25 21:07:59 +03:00
|
|
|
NAME)
|
2012-08-13 21:47:32 +04:00
|
|
|
set(TCLTK_POSSIBLE_BIN_PATHS ${TCLTK_POSSIBLE_BIN_PATHS}
|
2008-01-25 21:07:59 +03:00
|
|
|
"[HKEY_LOCAL_MACHINE\\SOFTWARE\\ActiveState\\ActiveTcl\\${ActiveTcl_CurrentVersion}]/bin"
|
|
|
|
"[HKEY_LOCAL_MACHINE\\SOFTWARE\\Scriptics\\Tcl\\8.6;Root]/bin"
|
|
|
|
"[HKEY_LOCAL_MACHINE\\SOFTWARE\\Scriptics\\Tcl\\8.5;Root]/bin"
|
|
|
|
"[HKEY_LOCAL_MACHINE\\SOFTWARE\\Scriptics\\Tcl\\8.4;Root]/bin"
|
|
|
|
"[HKEY_LOCAL_MACHINE\\SOFTWARE\\Scriptics\\Tcl\\8.3;Root]/bin"
|
|
|
|
"[HKEY_LOCAL_MACHINE\\SOFTWARE\\Scriptics\\Tcl\\8.2;Root]/bin"
|
|
|
|
"[HKEY_LOCAL_MACHINE\\SOFTWARE\\Scriptics\\Tcl\\8.0;Root]/bin"
|
|
|
|
)
|
2012-08-13 21:50:14 +04:00
|
|
|
endif()
|
2001-12-06 19:51:37 +03:00
|
|
|
|
2012-08-13 21:47:32 +04:00
|
|
|
set(TK_WISH_NAMES
|
2012-08-13 21:42:58 +04:00
|
|
|
wish
|
2008-01-26 09:11:04 +03:00
|
|
|
wish${TCL_LIBRARY_VERSION} wish${TK_LIBRARY_VERSION} wish${TCL_TCLSH_VERSION}
|
2008-01-24 00:27:36 +03:00
|
|
|
wish86 wish8.6
|
2012-08-13 21:42:58 +04:00
|
|
|
wish85 wish8.5
|
|
|
|
wish84 wish8.4
|
|
|
|
wish83 wish8.3
|
|
|
|
wish82 wish8.2
|
2008-01-24 00:27:36 +03:00
|
|
|
wish80 wish8.0
|
2008-01-25 21:07:59 +03:00
|
|
|
)
|
2008-01-25 03:31:24 +03:00
|
|
|
|
2012-08-13 21:47:32 +04:00
|
|
|
find_program(TK_WISH
|
2008-01-25 03:31:24 +03:00
|
|
|
NAMES ${TK_WISH_NAMES}
|
2008-06-10 00:04:06 +04:00
|
|
|
HINTS ${TCLTK_POSSIBLE_BIN_PATHS}
|
2008-01-25 21:07:59 +03:00
|
|
|
)
|
2008-01-24 00:27:36 +03:00
|
|
|
|
2012-08-13 21:47:32 +04:00
|
|
|
mark_as_advanced(TK_WISH)
|