| /************************************************************** |
| * |
| * Licensed to the Apache Software Foundation (ASF) under one |
| * or more contributor license agreements. See the NOTICE file |
| * distributed with this work for additional information |
| * regarding copyright ownership. The ASF licenses this file |
| * to you under the Apache License, Version 2.0 (the |
| * "License"); you may not use this file except in compliance |
| * with the License. You may obtain a copy of the License at |
| * |
| * http://www.apache.org/licenses/LICENSE-2.0 |
| * |
| * Unless required by applicable law or agreed to in writing, |
| * software distributed under the License is distributed on an |
| * "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY |
| * KIND, either express or implied. See the License for the |
| * specific language governing permissions and limitations |
| * under the License. |
| * |
| *************************************************************/ |
| |
| |
| |
| // MARKER(update_precomp.py): autogen include statement, do not remove |
| #include "precompiled_sal.hxx" |
| |
| #include "osl/process.h" |
| |
| #ifndef INCLUDED_LIMITS_H |
| #include <limits.h> |
| #define INCLUDED_LIMITS_H |
| #endif |
| |
| #ifndef INCLUDED_PTHREAD_H |
| #include <pthread.h> |
| #define INCLUDED_PTHREAD_H |
| #endif |
| |
| #ifndef INCLUDED_STDLIB_H |
| #include <stdlib.h> |
| #define INCLUDED_STDLIB_H |
| #endif |
| |
| #ifndef INCLUDED_STRING_H |
| #include <string.h> |
| #define INCLUDED_STRING_H |
| #endif |
| #include "osl/diagnose.h" |
| #include "osl/file.h" |
| #include "osl/module.h" |
| #include "osl/thread.h" |
| #include "rtl/ustring.hxx" |
| #include "rtl/strbuf.h" |
| |
| #ifndef _OSL_FILE_PATH_HELPER_H_ |
| #include "file_path_helper.h" |
| #endif |
| |
| #ifndef _OSL_UUNXAPI_H_ |
| #include "uunxapi.h" |
| #endif |
| |
| /*************************************** |
| osl_bootstrap_getExecutableFile_Impl(). |
| |
| @internal |
| @see rtl_bootstrap |
| @see #i37371# |
| |
| **************************************/ |
| |
| extern "C" oslProcessError SAL_CALL osl_bootstrap_getExecutableFile_Impl ( |
| rtl_uString ** ppFileURL |
| ) SAL_THROW_EXTERN_C(); |
| |
| |
| #if defined(MACOSX) |
| #include <mach-o/dyld.h> |
| |
| oslProcessError SAL_CALL osl_bootstrap_getExecutableFile_Impl ( |
| rtl_uString ** ppFileURL |
| ) SAL_THROW_EXTERN_C() |
| { |
| oslProcessError result = osl_Process_E_NotFound; |
| |
| char buffer[PATH_MAX]; |
| size_t buflen = sizeof(buffer); |
| |
| #if __GNUC__ >= 4 && defined(MACOSX) |
| if (_NSGetExecutablePath (buffer, (uint32_t*)&buflen) == 0) |
| #else |
| if (_NSGetExecutablePath (buffer, &buflen) == 0) |
| #endif |
| { |
| /* Determine absolute path. */ |
| char abspath[PATH_MAX]; |
| if (realpath (buffer, abspath) != 0) |
| { |
| /* Convert from utf8 to unicode. */ |
| rtl_uString * pAbsPath = 0; |
| rtl_string2UString ( |
| &(pAbsPath), |
| abspath, rtl_str_getLength (abspath), |
| RTL_TEXTENCODING_UTF8, |
| OSTRING_TO_OUSTRING_CVTFLAGS); |
| |
| if (pAbsPath) |
| { |
| /* Convert from path to url. */ |
| if (osl_getFileURLFromSystemPath (pAbsPath, ppFileURL) == osl_File_E_None) |
| { |
| /* Success. */ |
| result = osl_Process_E_None; |
| } |
| rtl_uString_release (pAbsPath); |
| } |
| } |
| } |
| |
| return (result); |
| } |
| |
| #elif !defined(NO_DL_FUNCTIONS) |
| #include <dlfcn.h> |
| |
| oslProcessError SAL_CALL osl_bootstrap_getExecutableFile_Impl ( |
| rtl_uString ** ppFileURL |
| ) SAL_THROW_EXTERN_C() |
| { |
| oslProcessError result = osl_Process_E_NotFound; |
| |
| /* Determine address of "main()" function. */ |
| void * addr = dlsym (RTLD_DEFAULT, "main"); |
| if (addr != 0) |
| { |
| /* Determine module URL. */ |
| if (osl_getModuleURLFromAddress (addr, ppFileURL)) |
| { |
| /* Success. */ |
| result = osl_Process_E_None; |
| } |
| } |
| |
| return (result); |
| } |
| |
| #else /* NO_DL_FUNCTIONS */ |
| |
| oslProcessError SAL_CALL osl_bootstrap_getExecutableFile_Impl ( |
| rtl_uString ** ppFileURL |
| ) SAL_THROW_EXTERN_C() |
| { |
| /* Fallback to ordinary osl_getExecutableFile(). */ |
| return osl_getExecutableFile (ppFileURL); |
| } |
| |
| #endif /* NO_DL_FUNCTIONS */ |
| |
| /*************************************** |
| CommandArgs_Impl. |
| **************************************/ |
| struct CommandArgs_Impl |
| { |
| pthread_mutex_t m_mutex; |
| sal_uInt32 m_nCount; |
| rtl_uString ** m_ppArgs; |
| }; |
| |
| static struct CommandArgs_Impl g_command_args = |
| { |
| PTHREAD_MUTEX_INITIALIZER, |
| 0, |
| 0 |
| }; |
| |
| /*************************************** |
| osl_getExecutableFile(). |
| **************************************/ |
| oslProcessError SAL_CALL osl_getExecutableFile (rtl_uString ** ppustrFile) |
| { |
| oslProcessError result = osl_Process_E_NotFound; |
| |
| pthread_mutex_lock (&(g_command_args.m_mutex)); |
| OSL_ASSERT(g_command_args.m_nCount > 0); |
| if (g_command_args.m_nCount > 0) |
| { |
| /* CommandArgs set. Obtain argv[0]. */ |
| rtl_uString_assign (ppustrFile, g_command_args.m_ppArgs[0]); |
| result = osl_Process_E_None; |
| } |
| pthread_mutex_unlock (&(g_command_args.m_mutex)); |
| |
| return (result); |
| } |
| |
| /*************************************** |
| osl_getCommandArgCount(). |
| **************************************/ |
| sal_uInt32 SAL_CALL osl_getCommandArgCount (void) |
| { |
| sal_uInt32 result = 0; |
| |
| pthread_mutex_lock (&(g_command_args.m_mutex)); |
| OSL_ASSERT(g_command_args.m_nCount > 0); |
| if (g_command_args.m_nCount > 0) |
| result = g_command_args.m_nCount - 1; |
| pthread_mutex_unlock (&(g_command_args.m_mutex)); |
| |
| return (result); |
| } |
| |
| /*************************************** |
| osl_getCommandArg(). |
| **************************************/ |
| oslProcessError SAL_CALL osl_getCommandArg (sal_uInt32 nArg, rtl_uString ** strCommandArg) |
| { |
| oslProcessError result = osl_Process_E_NotFound; |
| |
| pthread_mutex_lock (&(g_command_args.m_mutex)); |
| OSL_ASSERT(g_command_args.m_nCount > 0); |
| if (g_command_args.m_nCount > (nArg + 1)) |
| { |
| rtl_uString_assign (strCommandArg, g_command_args.m_ppArgs[nArg + 1]); |
| result = osl_Process_E_None; |
| } |
| pthread_mutex_unlock (&(g_command_args.m_mutex)); |
| |
| return (result); |
| } |
| |
| /*************************************** |
| osl_setCommandArgs(). |
| **************************************/ |
| void SAL_CALL osl_setCommandArgs (int argc, char ** argv) |
| { |
| OSL_ASSERT(argc > 0); |
| pthread_mutex_lock (&(g_command_args.m_mutex)); |
| OSL_ENSURE (g_command_args.m_nCount == 0, "osl_setCommandArgs(): CommandArgs already set."); |
| if (g_command_args.m_nCount == 0) |
| { |
| rtl_uString** ppArgs = (rtl_uString**)rtl_allocateZeroMemory (argc * sizeof(rtl_uString*)); |
| if (ppArgs != 0) |
| { |
| rtl_TextEncoding encoding = osl_getThreadTextEncoding(); |
| for (int i = 0; i < argc; i++) |
| { |
| rtl_string2UString ( |
| &(ppArgs[i]), |
| argv[i], rtl_str_getLength (argv[i]), encoding, |
| OSTRING_TO_OUSTRING_CVTFLAGS); |
| } |
| if (ppArgs[0] != 0) |
| { |
| /* see @ osl_getExecutableFile(). */ |
| if (rtl_ustr_indexOfChar (rtl_uString_getStr(ppArgs[0]), sal_Unicode('/')) == -1) |
| { |
| const rtl::OUString PATH (RTL_CONSTASCII_USTRINGPARAM("PATH")); |
| |
| rtl_uString * pSearchPath = 0; |
| osl_getEnvironment (PATH.pData, &pSearchPath); |
| if (pSearchPath) |
| { |
| rtl_uString * pSearchResult = 0; |
| osl_searchPath (ppArgs[0], pSearchPath, &pSearchResult); |
| if (pSearchResult) |
| { |
| rtl_uString_assign (&(ppArgs[0]), pSearchResult); |
| rtl_uString_release (pSearchResult); |
| } |
| rtl_uString_release (pSearchPath); |
| } |
| } |
| |
| rtl_uString * pArg0 = 0; |
| if (realpath_u (ppArgs[0], &pArg0)) |
| { |
| osl_getFileURLFromSystemPath (pArg0, &(ppArgs[0])); |
| rtl_uString_release (pArg0); |
| } |
| } |
| g_command_args.m_nCount = argc; |
| g_command_args.m_ppArgs = ppArgs; |
| } |
| } |
| pthread_mutex_unlock (&(g_command_args.m_mutex)); |
| } |
| |
| /*************************************** |
| osl_getEnvironment(). |
| **************************************/ |
| oslProcessError SAL_CALL osl_getEnvironment(rtl_uString* pustrEnvVar, rtl_uString** ppustrValue) |
| { |
| oslProcessError result = osl_Process_E_NotFound; |
| rtl_TextEncoding encoding = osl_getThreadTextEncoding(); |
| rtl_String* pstr_env_var = 0; |
| |
| OSL_PRECOND(pustrEnvVar, "osl_getEnvironment(): Invalid parameter"); |
| OSL_PRECOND(ppustrValue, "osl_getEnvironment(): Invalid parameter"); |
| |
| rtl_uString2String( |
| &pstr_env_var, |
| rtl_uString_getStr(pustrEnvVar), rtl_uString_getLength(pustrEnvVar), encoding, |
| OUSTRING_TO_OSTRING_CVTFLAGS); |
| if (pstr_env_var != 0) |
| { |
| const char* p_env_var = getenv (rtl_string_getStr (pstr_env_var)); |
| if (p_env_var != 0) |
| { |
| rtl_string2UString( |
| ppustrValue, |
| p_env_var, strlen(p_env_var), encoding, |
| OSTRING_TO_OUSTRING_CVTFLAGS); |
| OSL_ASSERT(*ppustrValue != NULL); |
| |
| result = osl_Process_E_None; |
| } |
| rtl_string_release(pstr_env_var); |
| } |
| |
| return (result); |
| } |
| |
| /*************************************** |
| osl_setEnvironment(). |
| **************************************/ |
| oslProcessError SAL_CALL osl_setEnvironment(rtl_uString* pustrEnvVar, rtl_uString* pustrValue) |
| { |
| oslProcessError result = osl_Process_E_Unknown; |
| rtl_TextEncoding encoding = osl_getThreadTextEncoding(); |
| rtl_String* pstr_env_var = 0; |
| rtl_String* pstr_val = 0; |
| |
| OSL_PRECOND(pustrEnvVar, "osl_setEnvironment(): Invalid parameter"); |
| OSL_PRECOND(pustrValue, "osl_setEnvironment(): Invalid parameter"); |
| |
| rtl_uString2String( |
| &pstr_env_var, |
| rtl_uString_getStr(pustrEnvVar), rtl_uString_getLength(pustrEnvVar), encoding, |
| OUSTRING_TO_OSTRING_CVTFLAGS); |
| |
| rtl_uString2String( |
| &pstr_val, |
| rtl_uString_getStr(pustrValue), rtl_uString_getLength(pustrValue), encoding, |
| OUSTRING_TO_OSTRING_CVTFLAGS); |
| |
| if (pstr_env_var != 0 && pstr_val != 0) |
| { |
| #if defined (SOLARIS) |
| rtl_String * pBuffer = NULL; |
| |
| sal_Int32 nCapacity = rtl_stringbuffer_newFromStringBuffer( &pBuffer, |
| rtl_string_getLength(pstr_env_var) + rtl_string_getLength(pstr_val) + 1, |
| pstr_env_var ); |
| rtl_stringbuffer_insert( &pBuffer, &nCapacity, pBuffer->length, "=", 1); |
| rtl_stringbuffer_insert( &pBuffer, &nCapacity, pBuffer->length, |
| rtl_string_getStr(pstr_val), rtl_string_getLength(pstr_val) ); |
| |
| rtl_string_acquire(pBuffer); // argument to putenv must leak on success |
| |
| if (putenv(rtl_string_getStr(pBuffer)) == 0) |
| result = osl_Process_E_None; |
| else |
| rtl_string_release(pBuffer); |
| #else |
| if (setenv(rtl_string_getStr(pstr_env_var), rtl_string_getStr(pstr_val), 1) == 0) |
| result = osl_Process_E_None; |
| #endif |
| } |
| |
| if (pstr_val) |
| rtl_string_release(pstr_val); |
| |
| if (pstr_env_var != 0) |
| rtl_string_release(pstr_env_var); |
| |
| return (result); |
| } |
| |
| /*************************************** |
| osl_clearEnvironment(). |
| **************************************/ |
| oslProcessError SAL_CALL osl_clearEnvironment(rtl_uString* pustrEnvVar) |
| { |
| oslProcessError result = osl_Process_E_Unknown; |
| rtl_TextEncoding encoding = osl_getThreadTextEncoding(); |
| rtl_String* pstr_env_var = 0; |
| |
| OSL_PRECOND(pustrEnvVar, "osl_setEnvironment(): Invalid parameter"); |
| |
| rtl_uString2String( |
| &pstr_env_var, |
| rtl_uString_getStr(pustrEnvVar), rtl_uString_getLength(pustrEnvVar), encoding, |
| OUSTRING_TO_OSTRING_CVTFLAGS); |
| |
| if (pstr_env_var) |
| { |
| #if defined (SOLARIS) |
| rtl_String * pBuffer = NULL; |
| |
| sal_Int32 nCapacity = rtl_stringbuffer_newFromStringBuffer( &pBuffer, |
| rtl_string_getLength(pstr_env_var) + 1, pstr_env_var ); |
| rtl_stringbuffer_insert( &pBuffer, &nCapacity, pBuffer->length, "=", 1); |
| |
| rtl_string_acquire(pBuffer); // argument to putenv must leak on success |
| |
| if (putenv(rtl_string_getStr(pBuffer)) == 0) |
| result = osl_Process_E_None; |
| else |
| rtl_string_release(pBuffer); |
| #elif (defined(MACOSX) || defined(NETBSD) || defined(FREEBSD)) |
| //MacOSX baseline is 10.4, which has an old-school void return |
| //for unsetenv. |
| //See: http://developer.apple.com/mac/library/documentation/Darwin/Reference/ManPages/10.4/man3/unsetenv.3.html?useVersion=10.4 |
| unsetenv(rtl_string_getStr(pstr_env_var)); |
| result = osl_Process_E_None; |
| #else |
| if (unsetenv(rtl_string_getStr(pstr_env_var)) == 0) |
| result = osl_Process_E_None; |
| #endif |
| rtl_string_release(pstr_env_var); |
| } |
| |
| return (result); |
| } |
| |
| |
| /*************************************** |
| osl_getProcessWorkingDir(). |
| **************************************/ |
| oslProcessError SAL_CALL osl_getProcessWorkingDir(rtl_uString **ppustrWorkingDir) |
| { |
| oslProcessError result = osl_Process_E_Unknown; |
| char buffer[PATH_MAX]; |
| |
| OSL_PRECOND(ppustrWorkingDir, "osl_getProcessWorkingDir(): Invalid parameter"); |
| |
| if (getcwd (buffer, sizeof(buffer)) != 0) |
| { |
| rtl_uString* ustrTmp = 0; |
| |
| rtl_string2UString( |
| &ustrTmp, |
| buffer, strlen(buffer), osl_getThreadTextEncoding(), |
| OSTRING_TO_OUSTRING_CVTFLAGS); |
| if (ustrTmp != 0) |
| { |
| if (osl_getFileURLFromSystemPath (ustrTmp, ppustrWorkingDir) == osl_File_E_None) |
| result = osl_Process_E_None; |
| rtl_uString_release (ustrTmp); |
| } |
| } |
| |
| return (result); |
| } |
| |
| /****************************************************************************** |
| * |
| * new functions to set/return the current process locale |
| * |
| *****************************************************************************/ |
| |
| struct ProcessLocale_Impl |
| { |
| pthread_mutex_t m_mutex; |
| rtl_Locale * m_pLocale; |
| }; |
| |
| static struct ProcessLocale_Impl g_process_locale = |
| { |
| PTHREAD_MUTEX_INITIALIZER, |
| 0 |
| }; |
| |
| extern "C" void _imp_getProcessLocale( rtl_Locale ** ); |
| extern "C" int _imp_setProcessLocale( rtl_Locale * ); |
| |
| /********************************************** |
| osl_getProcessLocale(). |
| *********************************************/ |
| oslProcessError SAL_CALL osl_getProcessLocale( rtl_Locale ** ppLocale ) |
| { |
| oslProcessError result = osl_Process_E_Unknown; |
| OSL_PRECOND(ppLocale, "osl_getProcessLocale(): Invalid parameter."); |
| if (ppLocale) |
| { |
| pthread_mutex_lock(&(g_process_locale.m_mutex)); |
| |
| if (g_process_locale.m_pLocale == 0) |
| _imp_getProcessLocale (&(g_process_locale.m_pLocale)); |
| *ppLocale = g_process_locale.m_pLocale; |
| result = osl_Process_E_None; |
| |
| pthread_mutex_unlock (&(g_process_locale.m_mutex)); |
| } |
| return (result); |
| } |
| |
| /********************************************** |
| osl_setProcessLocale(). |
| *********************************************/ |
| oslProcessError SAL_CALL osl_setProcessLocale( rtl_Locale * pLocale ) |
| { |
| oslProcessError result = osl_Process_E_Unknown; |
| |
| OSL_PRECOND(pLocale, "osl_setProcessLocale(): Invalid parameter."); |
| |
| pthread_mutex_lock(&(g_process_locale.m_mutex)); |
| if (_imp_setProcessLocale (pLocale) == 0) |
| { |
| g_process_locale.m_pLocale = pLocale; |
| result = osl_Process_E_None; |
| } |
| pthread_mutex_unlock (&(g_process_locale.m_mutex)); |
| |
| return (result); |
| } |