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

openblas_get_config.c 2.8 kB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100
  1. /*****************************************************************************
  2. Copyright (c) 2011-2014, The OpenBLAS Project
  3. All rights reserved.
  4. Redistribution and use in source and binary forms, with or without
  5. modification, are permitted provided that the following conditions are
  6. met:
  7. 1. Redistributions of source code must retain the above copyright
  8. notice, this list of conditions and the following disclaimer.
  9. 2. Redistributions in binary form must reproduce the above copyright
  10. notice, this list of conditions and the following disclaimer in
  11. the documentation and/or other materials provided with the
  12. distribution.
  13. 3. Neither the name of the OpenBLAS project nor the names of
  14. its contributors may be used to endorse or promote products
  15. derived from this software without specific prior written
  16. permission.
  17. THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
  18. AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  19. IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  20. ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
  21. LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  22. DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
  23. SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER
  24. CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
  25. OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE
  26. USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  27. **********************************************************************************/
  28. #include "common.h"
  29. #include <string.h>
  30. #if defined(_WIN32) && defined(_MSC_VER)
  31. #if _MSC_VER < 1900
  32. #define snprintf _snprintf_s
  33. #endif
  34. #endif
  35. static char* openblas_config_str=""
  36. #ifdef USE64BITINT
  37. "USE64BITINT "
  38. #endif
  39. #ifdef NO_CBLAS
  40. "NO_CBLAS "
  41. #endif
  42. #ifdef NO_LAPACK
  43. "NO_LAPACK "
  44. #endif
  45. #ifdef NO_LAPACKE
  46. "NO_LAPACKE "
  47. #endif
  48. #ifdef DYNAMIC_ARCH
  49. "DYNAMIC_ARCH "
  50. #endif
  51. #ifdef NO_AFFINITY
  52. "NO_AFFINITY "
  53. #endif
  54. #ifdef USE_OPENMP
  55. "USE_OPENMP "
  56. #endif
  57. #ifndef DYNAMIC_ARCH
  58. CHAR_CORENAME
  59. #endif
  60. ;
  61. #ifdef DYNAMIC_ARCH
  62. char *gotoblas_corename();
  63. #endif
  64. static char tmp_config_str[256];
  65. int openblas_get_parallel();
  66. char* CNAME() {
  67. char tmpstr[20];
  68. strcpy(tmp_config_str, openblas_config_str);
  69. #ifdef DYNAMIC_ARCH
  70. strcat(tmp_config_str, gotoblas_corename());
  71. #endif
  72. if (openblas_get_parallel() == 0)
  73. sprintf(tmpstr, " SINGLE_THREADED");
  74. else
  75. snprintf(tmpstr,19," MAX_THREADS=%d",MAX_CPU_NUMBER);
  76. strcat(tmp_config_str, tmpstr);
  77. return tmp_config_str;
  78. }
  79. char* openblas_get_corename() {
  80. #ifndef DYNAMIC_ARCH
  81. return CHAR_CORENAME;
  82. #else
  83. return gotoblas_corename();
  84. #endif
  85. }