LLVM OpenMP* Runtime Library
kmp_version.cpp
1 /*
2  * kmp_version.cpp
3  */
4 
5 
6 //===----------------------------------------------------------------------===//
7 //
8 // The LLVM Compiler Infrastructure
9 //
10 // This file is dual licensed under the MIT and the University of Illinois Open
11 // Source Licenses. See LICENSE.txt for details.
12 //
13 //===----------------------------------------------------------------------===//
14 
15 
16 #include "kmp.h"
17 #include "kmp_io.h"
18 #include "kmp_version.h"
19 
20 // Replace with snapshot date YYYYMMDD for promotion build.
21 #define KMP_VERSION_BUILD 20140926
22 
23 // Helper macros to convert value of macro to string literal.
24 #define _stringer( x ) #x
25 #define stringer( x ) _stringer( x )
26 
27 // Detect compiler.
28 #if KMP_COMPILER_ICC
29  #if __INTEL_COMPILER == 1010
30  #define KMP_COMPILER "Intel C++ Compiler 10.1"
31  #elif __INTEL_COMPILER == 1100
32  #define KMP_COMPILER "Intel C++ Compiler 11.0"
33  #elif __INTEL_COMPILER == 1110
34  #define KMP_COMPILER "Intel C++ Compiler 11.1"
35  #elif __INTEL_COMPILER == 1200
36  #define KMP_COMPILER "Intel C++ Compiler 12.0"
37  #elif __INTEL_COMPILER == 1210
38  #define KMP_COMPILER "Intel C++ Compiler 12.1"
39  #elif __INTEL_COMPILER == 1300
40  #define KMP_COMPILER "Intel C++ Compiler 13.0"
41  #elif __INTEL_COMPILER == 1310
42  #define KMP_COMPILER "Intel C++ Compiler 13.1"
43  #elif __INTEL_COMPILER == 1400
44  #define KMP_COMPILER "Intel C++ Compiler 14.0"
45  #elif __INTEL_COMPILER == 1410
46  #define KMP_COMPILER "Intel C++ Compiler 14.1"
47  #elif __INTEL_COMPILER == 1500
48  #define KMP_COMPILER "Intel C++ Compiler 15.0"
49  #elif __INTEL_COMPILER == 1600
50  #define KMP_COMPILER "Intel C++ Compiler 16.0"
51  #elif __INTEL_COMPILER == 1700
52  #define KMP_COMPILER "Intel C++ Compiler 17.0"
53  #elif __INTEL_COMPILER == 9998
54  #define KMP_COMPILER "Intel C++ Compiler mainline"
55  #elif __INTEL_COMPILER == 9999
56  #define KMP_COMPILER "Intel C++ Compiler mainline"
57  #endif
58 #elif KMP_COMPILER_CLANG
59  #define KMP_COMPILER "Clang " stringer( __clang_major__ ) "." stringer( __clang_minor__ )
60 #elif KMP_COMPILER_GCC
61  #define KMP_COMPILER "GCC " stringer( __GNUC__ ) "." stringer( __GNUC_MINOR__ )
62 #elif KMP_COMPILER_MSVC
63  #define KMP_COMPILER "MSVC " stringer( _MSC_FULL_VER )
64 #endif
65 #ifndef KMP_COMPILER
66  #warning "Unknown compiler"
67  #define KMP_COMPILER "unknown compiler"
68 #endif
69 
70 // Detect librray type (perf, stub).
71 #ifdef KMP_STUB
72  #define KMP_LIB_TYPE "stub"
73 #else
74  #define KMP_LIB_TYPE "performance"
75 #endif // KMP_LIB_TYPE
76 
77 // Detect link type (static, dynamic).
78 #ifdef KMP_DYNAMIC_LIB
79  #define KMP_LINK_TYPE "dynamic"
80 #else
81  #define KMP_LINK_TYPE "static"
82 #endif // KMP_LINK_TYPE
83 
84 // Finally, define strings.
85 #define KMP_LIBRARY KMP_LIB_TYPE " library (" KMP_LINK_TYPE ")"
86 #define KMP_COPYRIGHT ""
87 
88 int const __kmp_version_major = KMP_VERSION_MAJOR;
89 int const __kmp_version_minor = KMP_VERSION_MINOR;
90 int const __kmp_version_build = KMP_VERSION_BUILD;
91 int const __kmp_openmp_version =
92  #if OMP_45_ENABLED
93  201511;
94  #elif OMP_40_ENABLED
95  201307;
96  #else
97  201107;
98  #endif
99 
100 /* Do NOT change the format of this string! Intel(R) Thread Profiler checks for a
101  specific format some changes in the recognition routine there need to
102  be made before this is changed.
103 */
104 char const __kmp_copyright[] =
105  KMP_VERSION_PREFIX KMP_LIBRARY
106  " ver. " stringer( KMP_VERSION_MAJOR ) "." stringer( KMP_VERSION_MINOR )
107  "." stringer( KMP_VERSION_BUILD ) " "
108  KMP_COPYRIGHT;
109 
110 char const __kmp_version_copyright[] = KMP_VERSION_PREFIX KMP_COPYRIGHT;
111 char const __kmp_version_lib_ver[] = KMP_VERSION_PREFIX "version: " stringer( KMP_VERSION_MAJOR ) "." stringer( KMP_VERSION_MINOR ) "." stringer( KMP_VERSION_BUILD );
112 char const __kmp_version_lib_type[] = KMP_VERSION_PREFIX "library type: " KMP_LIB_TYPE;
113 char const __kmp_version_link_type[] = KMP_VERSION_PREFIX "link type: " KMP_LINK_TYPE;
114 char const __kmp_version_build_time[] = KMP_VERSION_PREFIX "build time: " "no_timestamp";
115 #if KMP_MIC2
116  char const __kmp_version_target_env[] = KMP_VERSION_PREFIX "target environment: MIC2";
117 #endif
118 char const __kmp_version_build_compiler[] = KMP_VERSION_PREFIX "build compiler: " KMP_COMPILER;
119 
120 //
121 // Called at serial initialization time.
122 //
123 static int __kmp_version_1_printed = FALSE;
124 
125 void
126 __kmp_print_version_1( void )
127 {
128  if ( __kmp_version_1_printed ) {
129  return;
130  }; // if
131  __kmp_version_1_printed = TRUE;
132 
133  #ifndef KMP_STUB
134  kmp_str_buf_t buffer;
135  __kmp_str_buf_init( & buffer );
136  // Print version strings skipping initial magic.
137  __kmp_str_buf_print( & buffer, "%s\n", & __kmp_version_lib_ver[ KMP_VERSION_MAGIC_LEN ] );
138  __kmp_str_buf_print( & buffer, "%s\n", & __kmp_version_lib_type[ KMP_VERSION_MAGIC_LEN ] );
139  __kmp_str_buf_print( & buffer, "%s\n", & __kmp_version_link_type[ KMP_VERSION_MAGIC_LEN ] );
140  __kmp_str_buf_print( & buffer, "%s\n", & __kmp_version_build_time[ KMP_VERSION_MAGIC_LEN ] );
141  #if KMP_MIC
142  __kmp_str_buf_print( & buffer, "%s\n", & __kmp_version_target_env[ KMP_VERSION_MAGIC_LEN ] );
143  #endif
144  __kmp_str_buf_print( & buffer, "%s\n", & __kmp_version_build_compiler[ KMP_VERSION_MAGIC_LEN ] );
145  #if defined(KMP_GOMP_COMPAT)
146  __kmp_str_buf_print( & buffer, "%s\n", & __kmp_version_alt_comp[ KMP_VERSION_MAGIC_LEN ] );
147  #endif /* defined(KMP_GOMP_COMPAT) */
148  __kmp_str_buf_print( & buffer, "%s\n", & __kmp_version_omp_api[ KMP_VERSION_MAGIC_LEN ] );
149  __kmp_str_buf_print( & buffer, "%sdynamic error checking: %s\n", KMP_VERSION_PREF_STR, ( __kmp_env_consistency_check ? "yes" : "no" ) );
150  #ifdef KMP_DEBUG
151  for ( int i = bs_plain_barrier; i < bs_last_barrier; ++ i ) {
152  __kmp_str_buf_print(
153  & buffer,
154  "%s%s barrier branch bits: gather=%u, release=%u\n",
155  KMP_VERSION_PREF_STR,
156  __kmp_barrier_type_name[ i ],
157  __kmp_barrier_gather_branch_bits[ i ],
158  __kmp_barrier_release_branch_bits[ i ]
159  ); // __kmp_str_buf_print
160  }; // for i
161  for ( int i = bs_plain_barrier; i < bs_last_barrier; ++ i ) {
162  __kmp_str_buf_print(
163  & buffer,
164  "%s%s barrier pattern: gather=%s, release=%s\n",
165  KMP_VERSION_PREF_STR,
166  __kmp_barrier_type_name[ i ],
167  __kmp_barrier_pattern_name[ __kmp_barrier_gather_pattern[ i ] ],
168  __kmp_barrier_pattern_name[ __kmp_barrier_release_pattern[ i ] ]
169  ); // __kmp_str_buf_print
170  }; // for i
171  __kmp_str_buf_print( & buffer, "%s\n", & __kmp_version_lock[ KMP_VERSION_MAGIC_LEN ] );
172  #endif
173  __kmp_str_buf_print(
174  & buffer,
175  "%sthread affinity support: %s\n",
176  KMP_VERSION_PREF_STR,
177  #if KMP_AFFINITY_SUPPORTED
178  (
179  KMP_AFFINITY_CAPABLE()
180  ?
181  (
182  __kmp_affinity_type == affinity_none
183  ?
184  "not used"
185  :
186  "yes"
187  )
188  :
189  "no"
190  )
191  #else
192  "no"
193  #endif
194  );
195  __kmp_printf( "%s", buffer.str );
196  __kmp_str_buf_free( & buffer );
197  K_DIAG( 1, ( "KMP_VERSION is true\n" ) );
198  #endif // KMP_STUB
199 } // __kmp_print_version_1
200 
201 //
202 // Called at parallel initialization time.
203 //
204 static int __kmp_version_2_printed = FALSE;
205 
206 void
207 __kmp_print_version_2( void ) {
208  if ( __kmp_version_2_printed ) {
209  return;
210  }; // if
211  __kmp_version_2_printed = TRUE;
212 } // __kmp_print_version_2
213 
214 // end of file //