|  | /************************************************************** | 
|  | * | 
|  | * 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_extensions.hxx" | 
|  |  | 
|  | #include "loggerconfig.hxx" | 
|  | #include <stdio.h> | 
|  |  | 
|  | /** === begin UNO includes === **/ | 
|  | #include <com/sun/star/lang/XMultiServiceFactory.hpp> | 
|  | #include <com/sun/star/container/XNameContainer.hpp> | 
|  | #include <com/sun/star/lang/XSingleServiceFactory.hpp> | 
|  | #include <com/sun/star/util/XChangesBatch.hpp> | 
|  | #include <com/sun/star/logging/LogLevel.hpp> | 
|  | #include <com/sun/star/lang/NullPointerException.hpp> | 
|  | #include <com/sun/star/lang/ServiceNotRegisteredException.hpp> | 
|  | #include <com/sun/star/beans/NamedValue.hpp> | 
|  | #include <com/sun/star/logging/XLogHandler.hpp> | 
|  | #include <com/sun/star/logging/XLogFormatter.hpp> | 
|  | /** === end UNO includes === **/ | 
|  |  | 
|  | #include <tools/diagnose_ex.h> | 
|  | #include <osl/process.h> | 
|  | #include <rtl/ustrbuf.hxx> | 
|  |  | 
|  | #include <comphelper/componentcontext.hxx> | 
|  |  | 
|  | #include <cppuhelper/component_context.hxx> | 
|  |  | 
|  | #include <vector> | 
|  |  | 
|  | //........................................................................ | 
|  | namespace logging | 
|  | { | 
|  | //........................................................................ | 
|  |  | 
|  | /** === begin UNO using === **/ | 
|  | using ::com::sun::star::uno::Reference; | 
|  | using ::com::sun::star::logging::XLogger; | 
|  | using ::com::sun::star::lang::XMultiServiceFactory; | 
|  | using ::com::sun::star::uno::Sequence; | 
|  | using ::com::sun::star::uno::Any; | 
|  | using ::com::sun::star::container::XNameContainer; | 
|  | using ::com::sun::star::uno::UNO_QUERY_THROW; | 
|  | using ::com::sun::star::lang::XSingleServiceFactory; | 
|  | using ::com::sun::star::uno::XInterface; | 
|  | using ::com::sun::star::util::XChangesBatch; | 
|  | using ::com::sun::star::uno::makeAny; | 
|  | using ::com::sun::star::lang::NullPointerException; | 
|  | using ::com::sun::star::uno::Exception; | 
|  | using ::com::sun::star::lang::ServiceNotRegisteredException; | 
|  | using ::com::sun::star::beans::NamedValue; | 
|  | using ::com::sun::star::logging::XLogHandler; | 
|  | using ::com::sun::star::logging::XLogFormatter; | 
|  | using ::com::sun::star::container::XNameAccess; | 
|  | using ::com::sun::star::uno::XComponentContext; | 
|  | /** === end UNO using === **/ | 
|  | namespace LogLevel = ::com::sun::star::logging::LogLevel; | 
|  |  | 
|  | namespace | 
|  | { | 
|  | //---------------------------------------------------------------- | 
|  | typedef void (*SettingTranslation)( const Reference< XLogger >&, const ::rtl::OUString&, Any& ); | 
|  |  | 
|  | //---------------------------------------------------------------- | 
|  | void    lcl_substituteFileHandlerURLVariables_nothrow( const Reference< XLogger >& _rxLogger, ::rtl::OUString& _inout_rFileURL ) | 
|  | { | 
|  | struct Variable | 
|  | { | 
|  | const sal_Char*         pVariablePattern; | 
|  | const sal_Int32         nPatternLength; | 
|  | rtl_TextEncoding        eEncoding; | 
|  | const ::rtl::OUString   sVariableValue; | 
|  |  | 
|  | Variable( const sal_Char* _pVariablePattern,  const sal_Int32 _nPatternLength, rtl_TextEncoding _eEncoding, | 
|  | const ::rtl::OUString& _rVariableValue ) | 
|  | :pVariablePattern( _pVariablePattern ) | 
|  | ,nPatternLength( _nPatternLength ) | 
|  | ,eEncoding( _eEncoding ) | 
|  | ,sVariableValue( _rVariableValue ) | 
|  | { | 
|  | } | 
|  | }; | 
|  |  | 
|  | ::rtl::OUString sLoggerName; | 
|  | try { sLoggerName = _rxLogger->getName(); } | 
|  | catch( const Exception& ) { DBG_UNHANDLED_EXCEPTION(); } | 
|  |  | 
|  | TimeValue aTimeValue; | 
|  | oslDateTime aDateTime; | 
|  | OSL_VERIFY( osl_getSystemTime( &aTimeValue ) ); | 
|  | OSL_VERIFY( osl_getDateTimeFromTimeValue( &aTimeValue, &aDateTime ) ); | 
|  |  | 
|  | char buffer[ 30 ]; | 
|  | const size_t buffer_size = sizeof( buffer ); | 
|  |  | 
|  | snprintf( buffer, buffer_size, "%04i-%02i-%02i", | 
|  | (int)aDateTime.Year, | 
|  | (int)aDateTime.Month, | 
|  | (int)aDateTime.Day ); | 
|  | rtl::OUString sDate = rtl::OUString::createFromAscii( buffer ); | 
|  |  | 
|  | snprintf( buffer, buffer_size, "%02i-%02i-%02i.%03i", | 
|  | (int)aDateTime.Hours, | 
|  | (int)aDateTime.Minutes, | 
|  | (int)aDateTime.Seconds, | 
|  | ::sal::static_int_cast< sal_Int16 >( aDateTime.NanoSeconds / 10000000 ) ); | 
|  | rtl::OUString sTime = rtl::OUString::createFromAscii( buffer ); | 
|  |  | 
|  | rtl::OUStringBuffer aBuff; | 
|  | aBuff.append( sDate ); | 
|  | aBuff.append( sal_Unicode( '.' ) ); | 
|  | aBuff.append( sTime ); | 
|  | rtl::OUString sDateTime = aBuff.makeStringAndClear(); | 
|  |  | 
|  | oslProcessIdentifier aProcessId = 0; | 
|  | oslProcessInfo info; | 
|  | info.Size = sizeof (oslProcessInfo); | 
|  | if ( osl_getProcessInfo ( 0, osl_Process_IDENTIFIER, &info ) == osl_Process_E_None) | 
|  | aProcessId = info.Ident; | 
|  | rtl::OUString aPID = rtl::OUString::valueOf( sal_Int64( aProcessId ) ); | 
|  |  | 
|  | Variable aVariables[] = | 
|  | { | 
|  | Variable( RTL_CONSTASCII_USTRINGPARAM( "$(loggername)" ), sLoggerName ), | 
|  | Variable( RTL_CONSTASCII_USTRINGPARAM( "$(date)" ), sDate ), | 
|  | Variable( RTL_CONSTASCII_USTRINGPARAM( "$(time)" ), sTime ), | 
|  | Variable( RTL_CONSTASCII_USTRINGPARAM( "$(datetime)" ), sDateTime ), | 
|  | Variable( RTL_CONSTASCII_USTRINGPARAM( "$(pid)" ), aPID ) | 
|  | }; | 
|  |  | 
|  | for ( size_t i = 0; i < sizeof( aVariables ) / sizeof( aVariables[0] ); ++i ) | 
|  | { | 
|  | ::rtl::OUString sPattern( aVariables[i].pVariablePattern, aVariables[i].nPatternLength, aVariables[i].eEncoding ); | 
|  | sal_Int32 nVariableIndex = _inout_rFileURL.indexOf( sPattern ); | 
|  | if  (   ( nVariableIndex == 0 ) | 
|  | ||  (   ( nVariableIndex > 0 ) | 
|  | &&  ( sPattern[ nVariableIndex - 1 ] != '$' ) | 
|  | ) | 
|  | ) | 
|  | { | 
|  | // found an (unescaped) variable | 
|  | _inout_rFileURL = _inout_rFileURL.replaceAt( nVariableIndex, sPattern.getLength(), aVariables[i].sVariableValue ); | 
|  | } | 
|  | } | 
|  | } | 
|  |  | 
|  | //---------------------------------------------------------------- | 
|  | void    lcl_transformFileHandlerSettings_nothrow( const Reference< XLogger >& _rxLogger, const ::rtl::OUString& _rSettingName, Any& _inout_rSettingValue ) | 
|  | { | 
|  | if ( !_rSettingName.equalsAscii( "FileURL" ) ) | 
|  | // not interested in this setting | 
|  | return; | 
|  |  | 
|  | ::rtl::OUString sURL; | 
|  | OSL_VERIFY( _inout_rSettingValue >>= sURL ); | 
|  | lcl_substituteFileHandlerURLVariables_nothrow( _rxLogger, sURL ); | 
|  | _inout_rSettingValue <<= sURL; | 
|  | } | 
|  |  | 
|  | //---------------------------------------------------------------- | 
|  | Reference< XInterface > lcl_createInstanceFromSetting_throw( | 
|  | const ::comphelper::ComponentContext& _rContext, | 
|  | const Reference< XLogger >& _rxLogger, | 
|  | const Reference< XNameAccess >& _rxLoggerSettings, | 
|  | const sal_Char* _pServiceNameAsciiNodeName, | 
|  | const sal_Char* _pServiceSettingsAsciiNodeName, | 
|  | SettingTranslation _pSettingTranslation = NULL | 
|  | ) | 
|  | { | 
|  | Reference< XInterface > xInstance; | 
|  |  | 
|  | // read the settings for the to-be-created service | 
|  | Reference< XNameAccess > xServiceSettingsNode( _rxLoggerSettings->getByName( | 
|  | ::rtl::OUString::createFromAscii( _pServiceSettingsAsciiNodeName ) ), UNO_QUERY_THROW ); | 
|  |  | 
|  | Sequence< ::rtl::OUString > aSettingNames( xServiceSettingsNode->getElementNames() ); | 
|  | size_t nServiceSettingCount( aSettingNames.getLength() ); | 
|  | Sequence< NamedValue > aSettings( nServiceSettingCount ); | 
|  | if ( nServiceSettingCount ) | 
|  | { | 
|  | const ::rtl::OUString* pSettingNames = aSettingNames.getConstArray(); | 
|  | const ::rtl::OUString* pSettingNamesEnd = aSettingNames.getConstArray() + aSettingNames.getLength(); | 
|  | NamedValue* pSetting = aSettings.getArray(); | 
|  |  | 
|  | for (   ; | 
|  | pSettingNames != pSettingNamesEnd; | 
|  | ++pSettingNames, ++pSetting | 
|  | ) | 
|  | { | 
|  | pSetting->Name = *pSettingNames; | 
|  | pSetting->Value = xServiceSettingsNode->getByName( *pSettingNames ); | 
|  |  | 
|  | if ( _pSettingTranslation ) | 
|  | (_pSettingTranslation)( _rxLogger, pSetting->Name, pSetting->Value ); | 
|  | } | 
|  | } | 
|  |  | 
|  | ::rtl::OUString sServiceName; | 
|  | _rxLoggerSettings->getByName( ::rtl::OUString::createFromAscii( _pServiceNameAsciiNodeName ) ) >>= sServiceName; | 
|  | if ( sServiceName.getLength() ) | 
|  | { | 
|  | bool bSuccess = false; | 
|  | if ( aSettings.getLength() ) | 
|  | { | 
|  | Sequence< Any > aConstructionArgs(1); | 
|  | aConstructionArgs[0] <<= aSettings; | 
|  | bSuccess = _rContext.createComponentWithArguments( sServiceName, aConstructionArgs, xInstance ); | 
|  | } | 
|  | else | 
|  | { | 
|  | bSuccess = _rContext.createComponent( sServiceName, xInstance ); | 
|  | } | 
|  |  | 
|  | if ( !bSuccess ) | 
|  | throw ServiceNotRegisteredException( sServiceName, NULL ); | 
|  | } | 
|  |  | 
|  | return xInstance; | 
|  | } | 
|  | } | 
|  |  | 
|  | //-------------------------------------------------------------------- | 
|  | void initializeLoggerFromConfiguration( const ::comphelper::ComponentContext& _rContext, const Reference< XLogger >& _rxLogger ) | 
|  | { | 
|  | try | 
|  | { | 
|  | if ( !_rxLogger.is() ) | 
|  | throw NullPointerException(); | 
|  |  | 
|  | // the configuration provider | 
|  | Reference< XMultiServiceFactory > xConfigProvider; | 
|  | ::rtl::OUString sConfigProvServiceName( RTL_CONSTASCII_USTRINGPARAM( "com.sun.star.configuration.ConfigurationProvider" ) ); | 
|  | if ( !_rContext.createComponent( sConfigProvServiceName, xConfigProvider ) ) | 
|  | throw ServiceNotRegisteredException( sConfigProvServiceName, _rxLogger ); | 
|  |  | 
|  | // write access to the "Settings" node (which includes settings for all loggers) | 
|  | Sequence< Any > aArguments(1); | 
|  | aArguments[0] <<= NamedValue( | 
|  | ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "nodepath" ) ), | 
|  | makeAny( ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "/org.openoffice.Office.Logging/Settings" ) ) ) | 
|  | ); | 
|  | Reference< XNameContainer > xAllSettings( xConfigProvider->createInstanceWithArguments( | 
|  | ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "com.sun.star.configuration.ConfigurationUpdateAccess" ) ), | 
|  | aArguments | 
|  | ), UNO_QUERY_THROW ); | 
|  |  | 
|  | ::rtl::OUString sLoggerName( _rxLogger->getName() ); | 
|  | if ( !xAllSettings->hasByName( sLoggerName ) ) | 
|  | { | 
|  | // no node yet for this logger. Create default settings. | 
|  | Reference< XSingleServiceFactory > xNodeFactory( xAllSettings, UNO_QUERY_THROW ); | 
|  | Reference< XInterface > xLoggerSettings( xNodeFactory->createInstance(), UNO_QUERY_THROW ); | 
|  | xAllSettings->insertByName( sLoggerName, makeAny( xLoggerSettings ) ); | 
|  | Reference< XChangesBatch > xChanges( xAllSettings, UNO_QUERY_THROW ); | 
|  | xChanges->commitChanges(); | 
|  | } | 
|  |  | 
|  | // actually read and forward the settings | 
|  | Reference< XNameAccess > xLoggerSettings( xAllSettings->getByName( sLoggerName ), UNO_QUERY_THROW ); | 
|  |  | 
|  | // the log level | 
|  | sal_Int32 nLogLevel( LogLevel::OFF ); | 
|  | OSL_VERIFY( xLoggerSettings->getByName( ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "LogLevel" ) ) ) >>= nLogLevel ); | 
|  | _rxLogger->setLevel( nLogLevel ); | 
|  |  | 
|  | // the default handler, if any | 
|  | Reference< XInterface > xUntyped( lcl_createInstanceFromSetting_throw( _rContext, _rxLogger, xLoggerSettings, "DefaultHandler", "HandlerSettings", &lcl_transformFileHandlerSettings_nothrow ) ); | 
|  | if ( !xUntyped.is() ) | 
|  | // no handler -> we're done | 
|  | return; | 
|  | Reference< XLogHandler > xHandler( xUntyped, UNO_QUERY_THROW ); | 
|  | _rxLogger->addLogHandler( xHandler ); | 
|  |  | 
|  | // The newly created handler might have an own (default) level. Ensure that it uses | 
|  | // the same level as the logger. | 
|  | xHandler->setLevel( nLogLevel ); | 
|  |  | 
|  | // the default formatter for the handler | 
|  | xUntyped = lcl_createInstanceFromSetting_throw( _rContext, _rxLogger, xLoggerSettings, "DefaultFormatter", "FormatterSettings" ); | 
|  | if ( !xUntyped.is() ) | 
|  | // no formatter -> we're done | 
|  | return; | 
|  | Reference< XLogFormatter > xFormatter( xUntyped, UNO_QUERY_THROW ); | 
|  | xHandler->setFormatter( xFormatter ); | 
|  |  | 
|  | // TODO: we could first create the formatter, then the handler. This would allow | 
|  | // passing the formatter as value in the component context, so the handler would | 
|  | // not create an own default formatter | 
|  | } | 
|  | catch( const Exception& ) | 
|  | { | 
|  | DBG_UNHANDLED_EXCEPTION(); | 
|  | } | 
|  | } | 
|  |  | 
|  | //........................................................................ | 
|  | } // namespace logging | 
|  | //........................................................................ |