1*cdf0e10cSrcweir /************************************************************************* 2*cdf0e10cSrcweir * 3*cdf0e10cSrcweir * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER. 4*cdf0e10cSrcweir * 5*cdf0e10cSrcweir * Copyright 2000, 2010 Oracle and/or its affiliates. 6*cdf0e10cSrcweir * 7*cdf0e10cSrcweir * OpenOffice.org - a multi-platform office productivity suite 8*cdf0e10cSrcweir * 9*cdf0e10cSrcweir * This file is part of OpenOffice.org. 10*cdf0e10cSrcweir * 11*cdf0e10cSrcweir * OpenOffice.org is free software: you can redistribute it and/or modify 12*cdf0e10cSrcweir * it under the terms of the GNU Lesser General Public License version 3 13*cdf0e10cSrcweir * only, as published by the Free Software Foundation. 14*cdf0e10cSrcweir * 15*cdf0e10cSrcweir * OpenOffice.org is distributed in the hope that it will be useful, 16*cdf0e10cSrcweir * but WITHOUT ANY WARRANTY; without even the implied warranty of 17*cdf0e10cSrcweir * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 18*cdf0e10cSrcweir * GNU Lesser General Public License version 3 for more details 19*cdf0e10cSrcweir * (a copy is included in the LICENSE file that accompanied this code). 20*cdf0e10cSrcweir * 21*cdf0e10cSrcweir * You should have received a copy of the GNU Lesser General Public License 22*cdf0e10cSrcweir * version 3 along with OpenOffice.org. If not, see 23*cdf0e10cSrcweir * <http://www.openoffice.org/license.html> 24*cdf0e10cSrcweir * for a copy of the LGPLv3 License. 25*cdf0e10cSrcweir * 26*cdf0e10cSrcweir ************************************************************************/ 27*cdf0e10cSrcweir 28*cdf0e10cSrcweir #ifndef INCLUDED_SAL_INTERNAL_ONCE_H 29*cdf0e10cSrcweir #define INCLUDED_SAL_INTERNAL_ONCE_H 30*cdf0e10cSrcweir 31*cdf0e10cSrcweir /** sal_once_type 32*cdf0e10cSrcweir * (platform dependent) 33*cdf0e10cSrcweir */ 34*cdf0e10cSrcweir 35*cdf0e10cSrcweir #if defined(SAL_UNX) || defined(SAL_OS2) 36*cdf0e10cSrcweir 37*cdf0e10cSrcweir #include <pthread.h> 38*cdf0e10cSrcweir 39*cdf0e10cSrcweir typedef pthread_once_t sal_once_type; 40*cdf0e10cSrcweir 41*cdf0e10cSrcweir #define SAL_ONCE_INIT PTHREAD_ONCE_INIT 42*cdf0e10cSrcweir #define SAL_ONCE(once, init) pthread_once((once), (init)) 43*cdf0e10cSrcweir 44*cdf0e10cSrcweir #elif defined(SAL_W32) 45*cdf0e10cSrcweir 46*cdf0e10cSrcweir #define WIN32_LEAN_AND_MEAN 47*cdf0e10cSrcweir #pragma warning(push,1) /* disable warnings within system headers */ 48*cdf0e10cSrcweir #include <windows.h> 49*cdf0e10cSrcweir #pragma warning(pop) 50*cdf0e10cSrcweir 51*cdf0e10cSrcweir typedef struct sal_once_st sal_once_type; 52*cdf0e10cSrcweir struct sal_once_st 53*cdf0e10cSrcweir { 54*cdf0e10cSrcweir LONG volatile m_done; 55*cdf0e10cSrcweir LONG volatile m_lock; 56*cdf0e10cSrcweir }; 57*cdf0e10cSrcweir 58*cdf0e10cSrcweir #define SAL_ONCE_INIT { 0, 0 } 59*cdf0e10cSrcweir #define SAL_ONCE(once, init) \ 60*cdf0e10cSrcweir { \ 61*cdf0e10cSrcweir sal_once_type * control = (once); \ 62*cdf0e10cSrcweir if (!(control->m_done)) \ 63*cdf0e10cSrcweir { \ 64*cdf0e10cSrcweir while (InterlockedExchange(&(control->m_lock), 1) == 1) Sleep(0); \ 65*cdf0e10cSrcweir if (!(control->m_done)) \ 66*cdf0e10cSrcweir { \ 67*cdf0e10cSrcweir void (*init_routine)(void) = (init); \ 68*cdf0e10cSrcweir (*init_routine)(); \ 69*cdf0e10cSrcweir control->m_done = 1; \ 70*cdf0e10cSrcweir } \ 71*cdf0e10cSrcweir InterlockedExchange(&(control->m_lock), 0); \ 72*cdf0e10cSrcweir } \ 73*cdf0e10cSrcweir } 74*cdf0e10cSrcweir 75*cdf0e10cSrcweir #else 76*cdf0e10cSrcweir #error Unknown platform 77*cdf0e10cSrcweir #endif /* SAL_UNX | SAL_W32 */ 78*cdf0e10cSrcweir 79*cdf0e10cSrcweir #endif /* INCLUDED_SAL_INTERNAL_ONCE_H */ 80