1 /* EINA - EFL data type library
2 * Copyright (C) 2008 Cedric Bail
4 * This library is free software; you can redistribute it and/or
5 * modify it under the terms of the GNU Lesser General Public
6 * License as published by the Free Software Foundation; either
7 * version 2.1 of the License, or (at your option) any later version.
9 * This library is distributed in the hope that it will be useful,
10 * but WITHOUT ANY WARRANTY; without even the implied warranty of
11 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
12 * Lesser General Public License for more details.
14 * You should have received a copy of the GNU Lesser General Public
15 * License along with this library;
16 * if not, see <http://www.gnu.org/licenses/>.
25 #ifdef EFL_HAVE_WIN32_THREADS
26 # define WIN32_LEAN_AND_MEAN
28 # undef WIN32_LEAN_AND_MEAN
31 #include "eina_lock.h"
32 #include "eina_config.h"
33 #include "eina_private.h"
34 #include "eina_types.h"
35 #include "eina_main.h"
36 #include "eina_error.h"
38 #include "eina_hash.h"
39 #include "eina_binshare.h"
40 #include "eina_stringshare.h"
41 #include "eina_ustringshare.h"
42 #include "eina_list.h"
43 #include "eina_matrixsparse.h"
44 #include "eina_array.h"
45 #include "eina_counter.h"
46 #include "eina_benchmark.h"
47 #include "eina_magic.h"
48 #include "eina_rectangle.h"
49 #include "eina_safety_checks.h"
51 /*============================================================================*
53 *============================================================================*/
59 static Eina_Version _version = { VMAJ, VMIN, VMIC, VREV };
61 static int _eina_main_count = 0;
62 #ifdef EFL_HAVE_THREADS
63 static int _eina_main_thread_count = 0;
65 static int _eina_log_dom = -1;
70 #define ERR(...) EINA_LOG_DOM_ERR(_eina_log_dom, __VA_ARGS__)
75 #define DBG(...) EINA_LOG_DOM_DBG(_eina_log_dom, __VA_ARGS__)
77 EAPI Eina_Bool _eina_threads_activated = EINA_FALSE;
79 #ifdef EINA_HAVE_DEBUG_THREADS
80 EAPI int _eina_threads_debug = 0;
81 EAPI pthread_t _eina_main_loop;;
82 EAPI pthread_mutex_t _eina_tracking_lock;
83 EAPI Eina_Inlist *_eina_tracking = NULL;
86 /* place module init/shutdown functions here to avoid other modules
87 * calling them by mistake.
89 #define S(x) extern Eina_Bool eina_ ## x ## _init(void); \
90 extern Eina_Bool eina_ ## x ## _shutdown(void)
116 struct eina_desc_setup
119 Eina_Bool (*init)(void);
120 Eina_Bool (*shutdown)(void);
123 static const struct eina_desc_setup _eina_desc_setup[] = {
124 #define S(x) {# x, eina_ ## x ## _init, eina_ ## x ## _shutdown}
125 /* log is a special case as it needs printf */
150 static const size_t _eina_desc_setup_len = sizeof(_eina_desc_setup) /
151 sizeof(_eina_desc_setup[0]);
154 _eina_shutdown_from_desc(const struct eina_desc_setup *itr)
156 for (itr--; itr >= _eina_desc_setup; itr--)
158 if (!itr->shutdown())
159 ERR("Problems shutting down eina module '%s', ignored.", itr->name);
162 eina_log_domain_unregister(_eina_log_dom);
171 /*============================================================================*
173 *============================================================================*/
176 /*============================================================================*
178 *============================================================================*/
182 * @brief Eina version (defined at configuration time)
184 EAPI Eina_Version *eina_version = &_version;
189 const struct eina_desc_setup *itr, *itr_end;
191 if (EINA_LIKELY(_eina_main_count > 0))
192 return ++_eina_main_count;
194 if (!eina_log_init())
196 fprintf(stderr, "Could not initialize eina logging system.\n");
200 _eina_log_dom = eina_log_domain_register("eina", EINA_LOG_COLOR_DEFAULT);
201 if (_eina_log_dom < 0)
203 EINA_LOG_ERR("Could not register log domain: eina");
208 #ifdef EINA_HAVE_DEBUG_THREADS
209 _eina_main_loop = pthread_self();
210 pthread_mutex_init(&_eina_tracking_lock, NULL);
212 if (getenv("EINA_DEBUG_THREADS"))
213 _eina_threads_debug = atoi(getenv("EINA_DEBUG_THREADS"));
216 itr = _eina_desc_setup;
217 itr_end = itr + _eina_desc_setup_len;
218 for (; itr < itr_end; itr++)
222 ERR("Could not initialize eina module '%s'.", itr->name);
223 _eina_shutdown_from_desc(itr);
228 _eina_main_count = 1;
236 if (EINA_UNLIKELY(_eina_main_count == 0))
238 _eina_shutdown_from_desc(_eina_desc_setup + _eina_desc_setup_len);
240 #ifdef EINA_HAVE_DEBUG_THREADS
241 pthread_mutex_destroy(&_eina_tracking_lock);
245 return _eina_main_count;
250 eina_threads_init(void)
252 #ifdef EFL_HAVE_THREADS
255 #ifdef EINA_HAVE_DEBUG_THREADS
256 assert(pthread_equal(_eina_main_loop, pthread_self()));
259 ++_eina_main_thread_count;
260 ret = _eina_main_thread_count;
262 if(_eina_main_thread_count > 1)
265 eina_share_common_threads_init();
266 eina_log_threads_init();
267 _eina_threads_activated = EINA_TRUE;
276 eina_threads_shutdown(void)
278 #ifdef EFL_HAVE_THREADS
281 #ifdef EINA_HAVE_DEBUG_THREADS
284 assert(pthread_equal(_eina_main_loop, pthread_self()));
285 assert(_eina_main_thread_count > 0);
288 ret = --_eina_main_thread_count;
289 if(_eina_main_thread_count > 0)
292 #ifdef EINA_HAVE_DEBUG_THREADS
293 pthread_mutex_lock(&_eina_tracking_lock);
296 fprintf(stderr, "*************************\n");
297 fprintf(stderr, "* The IMPOSSIBLE HAPPEN *\n");
298 fprintf(stderr, "* LOCK STILL TAKEN : *\n");
299 fprintf(stderr, "*************************\n");
300 EINA_INLIST_FOREACH(_eina_tracking, lk)
302 fprintf(stderr, "*************************\n");
305 pthread_mutex_unlock(&_eina_tracking_lock);
308 eina_share_common_threads_shutdown();
309 eina_log_threads_shutdown();
311 _eina_threads_activated = EINA_FALSE;
320 eina_main_loop_is(void)
322 #ifdef EINA_HAVE_DEBUG_THREADS
323 if (pthread_equal(_eina_main_loop, pthread_self()))
327 /* FIXME: need to check how to do this on windows */