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.7 kB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788899091929394
  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. static char* openblas_config_str=""
  31. #ifdef USE64BITINT
  32. "USE64BITINT "
  33. #endif
  34. #ifdef NO_CBLAS
  35. "NO_CBLAS "
  36. #endif
  37. #ifdef NO_LAPACK
  38. "NO_LAPACK "
  39. #endif
  40. #ifdef NO_LAPACKE
  41. "NO_LAPACKE "
  42. #endif
  43. #ifdef DYNAMIC_ARCH
  44. "DYNAMIC_ARCH "
  45. #endif
  46. #ifdef NO_AFFINITY
  47. "NO_AFFINITY "
  48. #endif
  49. #ifdef USE_OPENMP
  50. "USE_OPENMP "
  51. #endif
  52. #ifndef DYNAMIC_ARCH
  53. CHAR_CORENAME
  54. #endif
  55. ;
  56. #ifdef DYNAMIC_ARCH
  57. char *gotoblas_corename();
  58. #endif
  59. static char tmp_config_str[256];
  60. int openblas_get_parallel();
  61. char* CNAME() {
  62. char tmpstr[20];
  63. strcpy(tmp_config_str, openblas_config_str);
  64. #ifdef DYNAMIC_ARCH
  65. strcat(tmp_config_str, gotoblas_corename());
  66. #endif
  67. if (openblas_get_parallel() == 0)
  68. sprintf(tmpstr, " SINGLE_THREADED");
  69. else
  70. snprintf(tmpstr,19," MAX_THREADS=%d",MAX_CPU_NUMBER);
  71. strcat(tmp_config_str, tmpstr);
  72. return tmp_config_str;
  73. }
  74. char* openblas_get_corename() {
  75. #ifndef DYNAMIC_ARCH
  76. return CHAR_CORENAME;
  77. #else
  78. return gotoblas_corename();
  79. #endif
  80. }