Initial move of files into new tribits directory (broken)

This commit is just to provide a basic for doing diffs between commits to see
the changes needed to convert to the TriBITS system.

checkin-test.py

@@ -0,0 +1,119 @@
+#!/usr/bin/env python
+
+# @HEADER
+# ************************************************************************
+#
+# Trilinos: An Object-Oriented Solver Framework
+# Copyright (2001) Sandia Corporation
+#
+#
+# Copyright (2001) Sandia Corporation. Under the terms of Contract
+# DE-AC04-94AL85000, there is a non-exclusive license for use of this
+# work by or on behalf of the U.S. Government. Export of this program
+# may require a license from the United States Government.
+#
+# 1. Redistributions of source code must retain the above copyright
+# notice, this list of conditions and the following disclaimer.
+#
+# 2. Redistributions in binary form must reproduce the above copyright
+# notice, this list of conditions and the following disclaimer in the
+# documentation and/or other materials provided with the distribution.
+#
+# 3. Neither the name of the Corporation nor the names of the
+# contributors may be used to endorse or promote products derived from
+# this software without specific prior written permission.
+#
+# THIS SOFTWARE IS PROVIDED BY SANDIA CORPORATION "AS IS" AND ANY
+# EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
+# IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
+# PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL SANDIA CORPORATION OR THE
+# CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
+# EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
+# PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
+# PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
+# LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
+# NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
+# SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
+#
+# NOTICE: The United States Government is granted for itself and others
+# acting on its behalf a paid-up, nonexclusive, irrevocable worldwide
+# license in this data to reproduce, prepare derivative works, and
+# perform publicly and display publicly. Beginning five (5) years from
+# July 25, 2001, the United States Government is granted for itself and
+# others acting on its behalf a paid-up, nonexclusive, irrevocable
+# worldwide license in this data to reproduce, prepare derivative works,
+# distribute copies to the public, perform publicly and display
+# publicly, and to permit others to do so.
+#
+# NEITHER THE UNITED STATES GOVERNMENT, NOR THE UNITED STATES DEPARTMENT
+# OF ENERGY, NOR SANDIA CORPORATION, NOR ANY OF THEIR EMPLOYEES, MAKES
+# ANY WARRANTY, EXPRESS OR IMPLIED, OR ASSUMES ANY LEGAL LIABILITY OR
+# RESPONSIBILITY FOR THE ACCURACY, COMPLETENESS, OR USEFULNESS OF ANY
+# INFORMATION, APPARATUS, PRODUCT, OR PROCESS DISCLOSED, OR REPRESENTS
+# THAT ITS USE WOULD NOT INFRINGE PRIVATELY OWNED RIGHTS.
+#
+# ************************************************************************
+# @HEADER
+
+"""
+Script for doing checkin testing of Trilinos. Please run checkin-test.py -h
+for details
+"""
+
+
+#
+# Import commands
+#
+
+
+import sys
+import os
+import traceback
+
+scriptsDir = os.path.abspath(os.path.dirname(sys.argv[0]))+"/cmake/python"
+sys.path.insert(0, scriptsDir)
+
+from GeneralScriptSupport import *
+
+#
+# Read in the commandline arguments
+#
+
+#print "sys.argv:", sys.argv
+
+# Create a deep copy of the commandline arguments
+cmndLineArgs = []
+cmndLineArgs.extend(sys.argv)
+
+# See if the help option is set or not
+helpOpt = len( set(cmndLineArgs) & set(("--help", "-h")) ) > 0
+
+# See if --show-defaults was set or not
+showDefaultsOpt = len( set(cmndLineArgs) & set(("--show-defaults", "dummy")) ) > 0
+
+#
+# Forward the options but tee the output
+#
+
+if (not helpOpt) and (not showDefaultsOpt):
+ logFileName = "checkin-test.out"
+else:
+ logFileName = ""
+
+cmnd = scriptsDir+"/checkin-test-impl.py " + requoteCmndLineArgs(sys.argv[1:])
+
+if logFileName:
+ cmnd = cmnd + " 2>&1 | tee "+logFileName
+
+# This return value is always 0 even if it fails?
+rtnVal = echoRunSysCmnd(cmnd, throwExcept=False)
+
+# Grep the output to determine success or failure
+success = True
+if logFileName and getCmndOutput("grep 'REQUESTED ACTIONS: PASSED' "+logFileName, True, False)=="":
+ success = False
+
+if success:
+ sys.exit(0)
+else:
+ sys.exit(1)

config_tests/BLASMangling.cmake

@@ -0,0 +1,155 @@
+# @HEADER
+# ************************************************************************
+#
+# Trilinos: An Object-Oriented Solver Framework
+# Copyright (2001) Sandia Corporation
+#
+#
+# Copyright (2001) Sandia Corporation. Under the terms of Contract
+# DE-AC04-94AL85000, there is a non-exclusive license for use of this
+# work by or on behalf of the U.S. Government. Export of this program
+# may require a license from the United States Government.
+#
+# 1. Redistributions of source code must retain the above copyright
+# notice, this list of conditions and the following disclaimer.
+#
+# 2. Redistributions in binary form must reproduce the above copyright
+# notice, this list of conditions and the following disclaimer in the
+# documentation and/or other materials provided with the distribution.
+#
+# 3. Neither the name of the Corporation nor the names of the
+# contributors may be used to endorse or promote products derived from
+# this software without specific prior written permission.
+#
+# THIS SOFTWARE IS PROVIDED BY SANDIA CORPORATION "AS IS" AND ANY
+# EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
+# IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
+# PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL SANDIA CORPORATION OR THE
+# CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
+# EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
+# PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
+# PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
+# LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
+# NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
+# SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
+#
+# NOTICE: The United States Government is granted for itself and others
+# acting on its behalf a paid-up, nonexclusive, irrevocable worldwide
+# license in this data to reproduce, prepare derivative works, and
+# perform publicly and display publicly. Beginning five (5) years from
+# July 25, 2001, the United States Government is granted for itself and
+# others acting on its behalf a paid-up, nonexclusive, irrevocable
+# worldwide license in this data to reproduce, prepare derivative works,
+# distribute copies to the public, perform publicly and display
+# publicly, and to permit others to do so.
+#
+# NEITHER THE UNITED STATES GOVERNMENT, NOR THE UNITED STATES DEPARTMENT
+# OF ENERGY, NOR SANDIA CORPORATION, NOR ANY OF THEIR EMPLOYEES, MAKES
+# ANY WARRANTY, EXPRESS OR IMPLIED, OR ASSUMES ANY LEGAL LIABILITY OR
+# RESPONSIBILITY FOR THE ACCURACY, COMPLETENESS, OR USEFULNESS OF ANY
+# INFORMATION, APPARATUS, PRODUCT, OR PROCESS DISCLOSED, OR REPRESENTS
+# THAT ITS USE WOULD NOT INFRINGE PRIVATELY OWNED RIGHTS.
+#
+# ************************************************************************
+# @HEADER
+
+# Function that defines variables describing the BLAS name mangling convention
+#
+# Sets the following outputs on success:
+#
+# BLAS_FN_CASE
+# "UPPER" if names are translated to upper-case, 
+# "LOWER" otherwise.
+#
+# BLAS_FN_UNDERSCORE
+# "NO_UNDER" if nothing is appended, "UNDER" if
+# one underscore is appended, and "SECOND_UNDER"
+# if a function with an underscore has a second
+# appended.
+#
+# BLAS_FUNC_DEFAULT
+# The default mange mangling for Fortran functions
+# that do not contain an underscore.
+#
+# The Fortran 2003 name binding facilities and ISO_C_BINDING module
+# should be preferred over cpp macro trickery whenever possible.
+#
+FUNCTION(BLAS_MANGLING)
+
+ IF(NOT DEFINED BLAS_FN_CASE)
+
+ IF (Trilinos_VERBOSE_CONFIGURE)
+ MESSAGE("BLAS_MANGLING: Testing name Mangling Schemes!\n")
+ ENDIF()
+
+ FIND_FILE(_blascmakelists blasmangle/ ${CMAKE_MODULE_PATH})
+ IF (NOT _blascmakelists)
+ MESSAGE(STATUS "Error, the file blasmangle could not be found so we can not determine Fortran name mangling!")
+ RETURN()
+ ENDIF()
+
+ SET(_fcmangledir ${PROJECT_BINARY_DIR}/CMakeFiles/CMakeTmp/blasmangle)
+ FILE(MAKE_DIRECTORY ${_fcmangledir})
+
+ FOREACH(cdef LOWER UPPER)
+
+ FOREACH(udef UNDER NO_UNDER)
+
+ IF (Trilinos_VERBOSE_CONFIGURE)
+ MESSAGE("BLAS_MANGLING: Testing ${cdef} ${udef}\n\n")
+ ENDIF()
+
+ SET(_fcmangledir_case "${_fcmangledir}/${cdef}/${udef}")
+ FILE(MAKE_DIRECTORY "${_fcmangledir}/${cdef}")
+ FILE(MAKE_DIRECTORY ${_fcmangledir_case})
+
+ TRY_COMPILE(_blasmngl ${_fcmangledir_case} ${_blascmakelists} blasmangle
+ CMAKE_FLAGS "-DMANGLE_FLAGS:STRING=-DFC_FN_${cdef};-DFC_FN_${udef}"
+ OUTPUT_VARIABLE _blasmngl_output
+ )
+ IF (Trilinos_VERBOSE_CONFIGURE)
+ MESSAGE("${_blasmngl_output}\n\n")
+ ENDIF()
+
+ IF(_blasmngl)
+ IF (Trilinos_VERBOSE_CONFIGURE)
+ MESSAGE("BLAS_MANGLING: Bingo! ${cdef} ${udef} is the correct BLAS name mangling!\n")
+ ENDIF()
+ SET(BLAS_FN_CASE ${cdef} CACHE INTERNAL
+ "Case used by Fortran functions" FORCE)
+ SET(BLAS_FN_UNDERSCORE ${udef} CACHE INTERNAL
+ "Underscore convention used by Fortran functions" FORCE)
+ BREAK()
+ ENDIF()
+
+ ENDFOREACH()
+
+ IF(_blasmngl)
+ BREAK()
+ ENDIF()
+
+ ENDFOREACH()
+
+ IF(_blasmngl)
+ MESSAGE(STATUS "BLAS name mangling: ${BLAS_FN_CASE} ${BLAS_FN_UNDERSCORE}")
+ ELSE()
+ MESSAGE(STATUS "Warning, cannot automatically determine BLAS mangling.")
+ ENDIF()
+
+ ENDIF()
+
+ IF (BLAS_FN_CASE STREQUAL LOWER)
+ SET(BLAS_NAME_NAME name)
+ ELSEIF (BLAS_FN_CASE STREQUAL UPPER)
+ SET(BLAS_NAME_NAME NAME)
+ ENDIF()
+
+ IF (BLAS_FN_UNDERSCORE)
+ IF(BLAS_FN_UNDERSCORE STREQUAL "UNDER")
+ SET(BLAS_FUNC_DEFAULT "(name,NAME) ${BLAS_NAME_NAME} ## _" CACHE INTERNAL "")
+ ELSE()
+ SET(BLAS_FUNC_DEFAULT "(name,NAME) ${BLAS_NAME_NAME}" CACHE INTERNAL "")
+ ENDIF()
+ ENDIF()
+
+ENDFUNCTION()