2009-06-29 20:53:25 +0200 fs r273484 : #i103138# Rectangle conversion 2009-06-29 20:51:50 +0200 fs r273483 : #i103138# yet more refactoring, now also setting the proper zoom level at the proper point in time 2009-06-29 13:40:26 +0200 fs r273470 : added svn:ignore to ignore output paths 2009-06-29 10:08:54 +0200 fs r273455 : #i103138# refactored the code for positioning/zooming the control Basically, we now allow adjustControlGeometry_throw (formerly known as positionControl_throw and setControlZoom) to take an additional ViewTransformation parameter, describing the transformation to obtain the actual control position/size. Consequently, positionControl itself also allows for a ViewTransformation parameter. This has become necessary since during painting, the device which we created our control for might not necessarily have a proper MapMode set. In this case, if we would use this map mode for calculating the control's position/size, this would lead to wrong results. Note that this problem was introduced by the fix for #i101398#: During the fix, we postponed the control creation to a later time (when it is really needed). At this later time, the MapMode at the device is broken, at the earlier time where we formerly crearted the control (createPrimitive2DSequence), it is not yet broken. Whether or not the MapMode is defined as "broken" might depend on one's point of view, however ... I consider it broken, since: - we need the map mode to obtain the proper zoom level, which is to be forwarded to the control - there are scenarios where the MapMode is *not* set to MAP_PIXEL (in those scenarios, everything works fine), and there are scenarios where it *is* set to MAP_PIXEL (in those the bug 103138 appears). It somehow feels wrong that one cannot rely on the device's map mode this way, but on the other hand one has no possibility to obtain the current zoom by other means. Note that one issue (still to be submitted) is left: In the page pane of a Draw/Impress document, controls have a wrong text size. This is because in this pane, the above-mentioned "broken" map mode is used, which means the controls have a zoom of "1:1" set, which is wrong here. 2009-06-25 13:41:35 +0200 msc r273380 : #100000# the tabs changed die to new properties 2009-06-24 12:42:40 +0200 msc r273330 : #102082# remove issue warning 2009-06-22 10:43:14 +0200 fs r273201 : createPrimitive2DSequence: care for being disposed 2009-06-18 12:35:13 +0200 oj r273109 : #i102305# make nooptfiles for gcc 2009-06-17 12:14:37 +0200 oj r273056 : #i102305# fix for linux 2009-06-17 07:20:22 +0200 oj r273046 : #i102305# move ValueTransfer into the for loop to avoid a crash under Linux 2009-06-17 07:17:28 +0200 oj r273045 : #i102305# use varchar 2009-06-15 14:11:27 +0200 fs r272983 : added since tag 2009-06-15 12:11:39 +0200 oj r272973 : #i102305# SAL_DLLPUBLIC_EXPORT inserted 2009-06-15 11:08:53 +0200 fs r272969 : #i10000# 2009-06-15 09:25:13 +0200 fs r272963 : merging fix for P1 issue #i102701# 2009-06-11 11:31:24 +0200 fs r272858 : #i10000# copied the fix which before the rebase was done in ../dialog/macropg.src 2009-06-11 09:38:14 +0200 fs r272846 : CWS-TOOLING: rebase CWS dba32c to trunk@272827 (milestone: DEV300:m50) 2009-06-02 09:53:10 +0200 fs r272483 : #i10000# 2009-05-29 15:55:03 +0200 fs r272465 : #i100818# 2009-05-29 12:58:43 +0200 fs r272452 : don't apply comphelper::getString on possibly VOID any 2009-05-29 10:38:35 +0200 oj r272437 : #i101519# handle where condition 2009-05-29 09:53:39 +0200 fs r272434 : #i100818# call into releaseStubs /without/ locked GlobalMutex 2009-05-28 07:53:44 +0200 oj r272375 : #i101369# parse tree changed 2009-05-27 14:53:36 +0200 fs r272347 : #i10000# 2009-05-27 09:29:15 +0200 oj r272327 : #i101626# check for double before hard cast 2009-05-27 09:13:58 +0200 oj r272326 : #i101626# handle void correctly 2009-05-27 08:04:39 +0200 oj r272321 : #i102256# wrong method signature used 2009-05-27 07:55:52 +0200 oj r272320 : #i101519# look up parameter typ if used in function 2009-05-27 06:49:07 +0200 oj r272319 : #i101519# set parameter from rowset as well 2009-05-26 13:30:56 +0200 oj r272297 : #i101987# impl XBatchExecution 2009-05-26 12:44:34 +0200 oj r272293 : #i101700# check if group is not set 2009-05-26 12:16:53 +0200 oj r272290 : #i101369# resolved some reduce7reduce problems with boolean_term and search_condition 2009-05-26 12:12:42 +0200 oj r272289 : #i101369# fix for or on one line criteria 2009-05-25 16:02:25 +0200 fs r272257 : #i999704# +PROPERTY_MOUSE_WHEEL_BEHAVIOR 2009-05-25 16:01:55 +0200 fs r272256 : merging the changes from CWS dba32b herein 2009-05-25 15:49:57 +0200 fs r272254 : #i999704# 2009-05-25 15:32:57 +0200 fs r272252 : #i99704# grid columns also to respect the MouseWheelBehavior property 2009-05-25 15:23:43 +0200 fs r272251 : don't pass empty Anys to ::comphelper::getString 2009-05-25 14:48:43 +0200 fs r272248 : merged changes from CWS dba32b herein 2009-05-25 14:44:40 +0200 fs r272247 : #i99704# support new MouseWheelBehavior property 2009-05-25 14:43:18 +0200 fs r272246 : #i99704# WheelWithoutFocus (peer property) superseded by MouseWheelBehavior (model property) 2009-05-25 14:41:03 +0200 fs r272245 : #i99704# no need to set the mouse wheel behavior at the peer, this is now a model property, having the right default 2009-05-25 14:39:31 +0200 fs r272243 : removed dead import 2009-05-25 14:35:36 +0200 fs r272242 : the new EnableVisible doesn't make sense for grid columns 2009-05-25 14:34:33 +0200 fs r272241 : #i99704# +MouseWheelBehavior - allow to enable/disable the mouse wheel for the control, or make it focus-dependent 2009-05-25 14:26:11 +0200 fs r272240 : #i99704# change MouseSettings wheel flag (NoWheelActionWithoutFocus) to a three-state option, allowing to completely ignore the mouse wheel 2009-05-23 21:35:59 +0200 fs r272213 : localize 'sub component opened/closed' event 2009-05-22 21:42:47 +0200 fs r272211 : #i102003# 2009-05-22 21:42:20 +0200 fs r272210 : grammar 2009-05-22 21:36:10 +0200 fs r272209 : #i102140# load only once, not twice, and show error messages during loading (and during any form action, that is) asynchronously 2009-05-22 21:35:11 +0200 fs r272208 : #i102140# +clear 2009-05-22 14:50:30 +0200 fs r272194 : #i102139# for newly created DB docs, set the MacroExecutionMode to USE_CONFIG 2009-05-22 12:03:42 +0200 fs r272180 : #i88878# provided by noel.power@novell.com implement a visibility property (EnableVisible) for toolkit controls, and usage in forms and UNO dialogs 2009-05-15 15:37:31 +0200 fs r271942 : #i100671# corrected some @since tags, so autodoc has better chances of correctly reading them 2009-05-15 15:33:11 +0200 fs r271940 : don't call comphelper::getFOO for VOID values 2009-05-15 15:08:31 +0200 fs r271937 : includes 2009-05-15 13:39:22 +0200 fs r271934 : #i101398# createPrimitive2DSequence: when we already have a control, use the old code. In particular, call positionControlForPaint 2009-05-15 12:33:48 +0200 fs r271933 : make the geometry a part of the ControlPrimitive2D's identity 2009-05-15 10:15:44 +0200 fs r271928 : #i10000# 2009-05-14 20:55:38 +0200 fs r271921 : #i101398# don't reuse the name PRIMITIVE_ID_CONTROLPRIMITIVE2D, make the name of our own ControlPrimitive2D unique 2009-05-14 20:55:31 +0200 fs r271920 : #i101398# don't reuse the name PRIMITIVE_ID_CONTROLPRIMITIVE2D, make the name of our own ControlPrimitive2D unique 2009-05-14 20:23:23 +0200 fs r271919 : #i101622# 2009-05-14 16:04:38 +0200 fs r271898 : don't use comphelper::getInt32 on voids 2009-05-14 16:04:12 +0200 fs r271897 : merge fix for issue whose number just slipped my memory ... (originally fixed in CWS dba32b) 2009-05-14 15:36:55 +0200 fs r271895 : merging changes from DEV300:m48 2009-05-07 14:43:19 +0200 fs r271670 : #i101477# 2009-05-07 14:37:30 +0200 fs r271668 : #i101477# 2009-05-07 09:27:30 +0200 oj r271628 : #i101343# remove pch 2009-05-06 09:36:02 +0200 fs r271568 : getFoo: diagnostics 2009-05-04 09:23:06 +0200 oj r271438 : CWS-TOOLING: rebase CWS dba32c to trunk@271427 (milestone: DEV300:m47) 2009-04-29 23:18:13 +0200 fs r271394 : #i101398# use a dedicated 2DPrimitive for UNO Controls, which is able to provide the B2DRange *without* actually creating the control 2009-04-29 13:52:25 +0200 fs r271366 : #i101308#
2811 lines
125 KiB
C++
2811 lines
125 KiB
C++
/*************************************************************************
|
|
*
|
|
* DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
|
|
*
|
|
* Copyright 2008 by Sun Microsystems, Inc.
|
|
*
|
|
* OpenOffice.org - a multi-platform office productivity suite
|
|
*
|
|
* $RCSfile: sqlnode.cxx,v $
|
|
* $Revision: 1.57 $
|
|
*
|
|
* This file is part of OpenOffice.org.
|
|
*
|
|
* OpenOffice.org is free software: you can redistribute it and/or modify
|
|
* it under the terms of the GNU Lesser General Public License version 3
|
|
* only, as published by the Free Software Foundation.
|
|
*
|
|
* OpenOffice.org is distributed in the hope that it will be useful,
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
* GNU Lesser General Public License version 3 for more details
|
|
* (a copy is included in the LICENSE file that accompanied this code).
|
|
*
|
|
* You should have received a copy of the GNU Lesser General Public License
|
|
* version 3 along with OpenOffice.org. If not, see
|
|
* <http://www.openoffice.org/license.html>
|
|
* for a copy of the LGPLv3 License.
|
|
*
|
|
************************************************************************/
|
|
|
|
// MARKER(update_precomp.py): autogen include statement, do not remove
|
|
#include "precompiled_connectivity.hxx"
|
|
|
|
|
|
#include <connectivity/sqlnode.hxx>
|
|
#include <connectivity/sqlerror.hxx>
|
|
#include <internalnode.hxx>
|
|
#define YYBISON 1
|
|
#ifndef BISON_INCLUDED
|
|
#define BISON_INCLUDED
|
|
#include <sqlbison.hxx>
|
|
#endif
|
|
#include <connectivity/sqlparse.hxx>
|
|
#include <com/sun/star/lang/Locale.hpp>
|
|
#include <com/sun/star/util/XNumberFormatter.hpp>
|
|
#include <com/sun/star/util/XNumberFormatTypes.hpp>
|
|
#include <com/sun/star/i18n/NumberFormatIndex.hpp>
|
|
#include <com/sun/star/beans/XPropertySet.hpp>
|
|
#include <com/sun/star/sdbc/XDatabaseMetaData.hpp>
|
|
#include <com/sun/star/sdbc/DataType.hpp>
|
|
#include <com/sun/star/sdb/XQueriesSupplier.hpp>
|
|
#include <com/sun/star/sdb/ErrorCondition.hpp>
|
|
#include <com/sun/star/util/XNumberFormatter.hpp>
|
|
#include <com/sun/star/util/XNumberFormatsSupplier.hpp>
|
|
#include <com/sun/star/util/XNumberFormats.hpp>
|
|
#include <com/sun/star/util/NumberFormat.hpp>
|
|
#include <com/sun/star/util/XNumberFormatTypes.hpp>
|
|
#include <com/sun/star/lang/Locale.hpp>
|
|
#include <com/sun/star/i18n/KParseType.hpp>
|
|
#include <com/sun/star/i18n/KParseTokens.hpp>
|
|
#include "connectivity/dbconversion.hxx"
|
|
#include <com/sun/star/util/DateTime.hpp>
|
|
#include <com/sun/star/util/Time.hpp>
|
|
#include <com/sun/star/util/Date.hpp>
|
|
#include "TConnection.hxx"
|
|
#include "sqlscan.hxx"
|
|
#include <comphelper/numbers.hxx>
|
|
#include <comphelper/processfactory.hxx>
|
|
#include <comphelper/stl_types.hxx>
|
|
#include "connectivity/dbtools.hxx"
|
|
#include "connectivity/dbmetadata.hxx"
|
|
#include "connectivity/sqlerror.hxx"
|
|
#include <tools/diagnose_ex.h>
|
|
#include <string.h>
|
|
#include <boost/bind.hpp>
|
|
#include <algorithm>
|
|
#include <functional>
|
|
#include <rtl/logfile.hxx>
|
|
#include <rtl/ustrbuf.hxx>
|
|
|
|
using namespace ::com::sun::star::sdbc;
|
|
using namespace ::com::sun::star::util;
|
|
using namespace ::com::sun::star::beans;
|
|
using namespace ::com::sun::star::sdb;
|
|
using namespace ::com::sun::star::uno;
|
|
using namespace ::com::sun::star::lang;
|
|
using namespace ::com::sun::star::i18n;
|
|
using namespace ::com::sun::star;
|
|
using namespace ::osl;
|
|
using namespace ::dbtools;
|
|
using namespace ::comphelper;
|
|
|
|
|
|
extern int SQLyyparse (void);
|
|
extern ::rtl::OUString ConvertLikeToken(const ::connectivity::OSQLParseNode* pTokenNode, const ::connectivity::OSQLParseNode* pEscapeNode, sal_Bool bInternational);
|
|
extern void setParser( ::connectivity::OSQLParser* );
|
|
|
|
namespace
|
|
{
|
|
// -----------------------------------------------------------------------------
|
|
sal_Bool lcl_saveConvertToNumber(const Reference< XNumberFormatter > & _xFormatter,sal_Int32 _nKey,const ::rtl::OUString& _sValue,double& _nrValue)
|
|
{
|
|
sal_Bool bRet = sal_False;
|
|
try
|
|
{
|
|
_nrValue = _xFormatter->convertStringToNumber(_nKey, _sValue);
|
|
bRet = sal_True;
|
|
}
|
|
catch(Exception&)
|
|
{
|
|
}
|
|
return bRet;
|
|
}
|
|
// -----------------------------------------------------------------------------
|
|
void replaceAndReset(connectivity::OSQLParseNode*& _pResetNode,connectivity::OSQLParseNode* _pNewNode)
|
|
{
|
|
_pResetNode->getParent()->replace(_pResetNode, _pNewNode);
|
|
delete _pResetNode;
|
|
_pResetNode = _pNewNode;
|
|
}
|
|
// -----------------------------------------------------------------------------
|
|
/** quotes a string and search for quotes inside the string and replace them with the new quote
|
|
@param rValue
|
|
The value to be quoted.
|
|
@param rQuot
|
|
The quote
|
|
@param rQuotToReplace
|
|
The quote to replace with
|
|
@return
|
|
The quoted string.
|
|
*/
|
|
::rtl::OUString SetQuotation(const ::rtl::OUString& rValue, const ::rtl::OUString& rQuot, const ::rtl::OUString& rQuotToReplace)
|
|
{
|
|
::rtl::OUString rNewValue = rQuot;
|
|
rNewValue += rValue;
|
|
sal_Int32 nIndex = (sal_Int32)-1; // Quotes durch zweifache Quotes ersetzen, sonst kriegt der Parser Probleme
|
|
|
|
if (rQuot.getLength())
|
|
{
|
|
do
|
|
{
|
|
nIndex += 2;
|
|
nIndex = rNewValue.indexOf(rQuot,nIndex);
|
|
if(nIndex != -1)
|
|
rNewValue = rNewValue.replaceAt(nIndex,rQuot.getLength(),rQuotToReplace);
|
|
} while (nIndex != -1);
|
|
}
|
|
|
|
rNewValue += rQuot;
|
|
return rNewValue;
|
|
}
|
|
}
|
|
|
|
namespace connectivity
|
|
{
|
|
|
|
//=============================================================================
|
|
struct OSQLParser_Data
|
|
{
|
|
::com::sun::star::lang::Locale aLocale;
|
|
::connectivity::SQLError aErrors;
|
|
|
|
OSQLParser_Data( const Reference< XMultiServiceFactory >& _xServiceFactory )
|
|
:aErrors( _xServiceFactory )
|
|
{
|
|
}
|
|
};
|
|
|
|
//=============================================================================
|
|
//= SQLParseNodeParameter
|
|
//=============================================================================
|
|
//-----------------------------------------------------------------------------
|
|
SQLParseNodeParameter::SQLParseNodeParameter( const Reference< XConnection >& _rxConnection,
|
|
const Reference< XNumberFormatter >& _xFormatter, const Reference< XPropertySet >& _xField,
|
|
const Locale& _rLocale, const IParseContext* _pContext,
|
|
bool _bIntl, bool _bQuote, sal_Char _cDecSep, bool _bPredicate, bool _bParseToSDBC )
|
|
:rLocale(_rLocale)
|
|
,aMetaData( _rxConnection )
|
|
,pParser( NULL )
|
|
,pSubQueryHistory( new QueryNameSet )
|
|
,xFormatter(_xFormatter)
|
|
,xField(_xField)
|
|
,m_rContext( _pContext ? (const IParseContext&)(*_pContext) : (const IParseContext&)OSQLParser::s_aDefaultContext )
|
|
,cDecSep(_cDecSep)
|
|
,bQuote(_bQuote)
|
|
,bInternational(_bIntl)
|
|
,bPredicate(_bPredicate)
|
|
,bParseToSDBCLevel( _bParseToSDBC )
|
|
{
|
|
}
|
|
|
|
//-----------------------------------------------------------------------------
|
|
SQLParseNodeParameter::~SQLParseNodeParameter()
|
|
{
|
|
}
|
|
|
|
//=============================================================================
|
|
//= OSQLParseNode
|
|
//=============================================================================
|
|
//-----------------------------------------------------------------------------
|
|
::rtl::OUString OSQLParseNode::convertDateString(const SQLParseNodeParameter& rParam, const ::rtl::OUString& rString) const
|
|
{
|
|
RTL_LOGFILE_CONTEXT_AUTHOR( aLogger, "parse", "Ocke.Janssen@sun.com", "OSQLParseNode::convertDateString" );
|
|
Date aDate = DBTypeConversion::toDate(rString);
|
|
Reference< XNumberFormatsSupplier > xSupplier(rParam.xFormatter->getNumberFormatsSupplier());
|
|
Reference< XNumberFormatTypes > xTypes(xSupplier->getNumberFormats(), UNO_QUERY);
|
|
|
|
double fDate = DBTypeConversion::toDouble(aDate,DBTypeConversion::getNULLDate(xSupplier));
|
|
sal_Int32 nKey = xTypes->getStandardIndex(rParam.rLocale) + 36; // XXX hack
|
|
return rParam.xFormatter->convertNumberToString(nKey, fDate);
|
|
}
|
|
|
|
//-----------------------------------------------------------------------------
|
|
::rtl::OUString OSQLParseNode::convertDateTimeString(const SQLParseNodeParameter& rParam, const ::rtl::OUString& rString) const
|
|
{
|
|
RTL_LOGFILE_CONTEXT_AUTHOR( aLogger, "parse", "Ocke.Janssen@sun.com", "OSQLParseNode::convertDateTimeString" );
|
|
DateTime aDate = DBTypeConversion::toDateTime(rString);
|
|
Reference< XNumberFormatsSupplier > xSupplier(rParam.xFormatter->getNumberFormatsSupplier());
|
|
Reference< XNumberFormatTypes > xTypes(xSupplier->getNumberFormats(), UNO_QUERY);
|
|
|
|
double fDateTime = DBTypeConversion::toDouble(aDate,DBTypeConversion::getNULLDate(xSupplier));
|
|
sal_Int32 nKey = xTypes->getStandardIndex(rParam.rLocale) + 51; // XXX hack
|
|
return rParam.xFormatter->convertNumberToString(nKey, fDateTime);
|
|
}
|
|
|
|
//-----------------------------------------------------------------------------
|
|
::rtl::OUString OSQLParseNode::convertTimeString(const SQLParseNodeParameter& rParam, const ::rtl::OUString& rString) const
|
|
{
|
|
RTL_LOGFILE_CONTEXT_AUTHOR( aLogger, "parse", "Ocke.Janssen@sun.com", "OSQLParseNode::convertTimeString" );
|
|
Time aTime = DBTypeConversion::toTime(rString);
|
|
Reference< XNumberFormatsSupplier > xSupplier(rParam.xFormatter->getNumberFormatsSupplier());
|
|
|
|
Reference< XNumberFormatTypes > xTypes(xSupplier->getNumberFormats(), UNO_QUERY);
|
|
|
|
double fTime = DBTypeConversion::toDouble(aTime);
|
|
sal_Int32 nKey = xTypes->getStandardIndex(rParam.rLocale) + 41; // XXX hack
|
|
return rParam.xFormatter->convertNumberToString(nKey, fTime);
|
|
}
|
|
|
|
//-----------------------------------------------------------------------------
|
|
void OSQLParseNode::parseNodeToStr(::rtl::OUString& rString,
|
|
const Reference< XConnection >& _rxConnection,
|
|
const IParseContext* pContext,
|
|
sal_Bool _bIntl,
|
|
sal_Bool _bQuote) const
|
|
{
|
|
RTL_LOGFILE_CONTEXT_AUTHOR( aLogger, "parse", "Ocke.Janssen@sun.com", "OSQLParseNode::parseNodeToStr" );
|
|
|
|
parseNodeToStr(
|
|
rString, _rxConnection, NULL, NULL,
|
|
pContext ? pContext->getPreferredLocale() : OParseContext::getDefaultLocale(),
|
|
pContext, _bIntl, _bQuote, '.', false, false );
|
|
}
|
|
|
|
//-----------------------------------------------------------------------------
|
|
void OSQLParseNode::parseNodeToPredicateStr(::rtl::OUString& rString,
|
|
const Reference< XConnection >& _rxConnection,
|
|
const Reference< XNumberFormatter > & xFormatter,
|
|
const ::com::sun::star::lang::Locale& rIntl,
|
|
sal_Char _cDec,
|
|
const IParseContext* pContext ) const
|
|
{
|
|
RTL_LOGFILE_CONTEXT_AUTHOR( aLogger, "parse", "Ocke.Janssen@sun.com", "OSQLParseNode::parseNodeToPredicateStr" );
|
|
|
|
OSL_ENSURE(xFormatter.is(), "OSQLParseNode::parseNodeToPredicateStr:: no formatter!");
|
|
|
|
if (xFormatter.is())
|
|
parseNodeToStr(rString, _rxConnection, xFormatter, NULL, rIntl, pContext, sal_True, sal_True, _cDec, true, false);
|
|
}
|
|
|
|
//-----------------------------------------------------------------------------
|
|
void OSQLParseNode::parseNodeToPredicateStr(::rtl::OUString& rString,
|
|
const Reference< XConnection > & _rxConnection,
|
|
const Reference< XNumberFormatter > & xFormatter,
|
|
const Reference< XPropertySet > & _xField,
|
|
const ::com::sun::star::lang::Locale& rIntl,
|
|
sal_Char _cDec,
|
|
const IParseContext* pContext ) const
|
|
{
|
|
RTL_LOGFILE_CONTEXT_AUTHOR( aLogger, "parse", "Ocke.Janssen@sun.com", "OSQLParseNode::parseNodeToPredicateStr" );
|
|
|
|
OSL_ENSURE(xFormatter.is(), "OSQLParseNode::parseNodeToPredicateStr:: no formatter!");
|
|
|
|
if (xFormatter.is())
|
|
parseNodeToStr( rString, _rxConnection, xFormatter, _xField, rIntl, pContext, true, true, _cDec, true, false );
|
|
}
|
|
|
|
//-----------------------------------------------------------------------------
|
|
void OSQLParseNode::parseNodeToStr(::rtl::OUString& rString,
|
|
const Reference< XConnection > & _rxConnection,
|
|
const Reference< XNumberFormatter > & xFormatter,
|
|
const Reference< XPropertySet > & _xField,
|
|
const ::com::sun::star::lang::Locale& rIntl,
|
|
const IParseContext* pContext,
|
|
bool _bIntl,
|
|
bool _bQuote,
|
|
sal_Char _cDecSep,
|
|
bool _bPredicate,
|
|
bool _bSubstitute) const
|
|
{
|
|
RTL_LOGFILE_CONTEXT_AUTHOR( aLogger, "parse", "Ocke.Janssen@sun.com", "OSQLParseNode::parseNodeToStr" );
|
|
|
|
OSL_ENSURE( _rxConnection.is(), "OSQLParseNode::parseNodeToStr: invalid connection!" );
|
|
|
|
if ( _rxConnection.is() )
|
|
{
|
|
::rtl::OUStringBuffer sBuffer = rString;
|
|
try
|
|
{
|
|
OSQLParseNode::impl_parseNodeToString_throw( sBuffer,
|
|
SQLParseNodeParameter(
|
|
_rxConnection, xFormatter, _xField, rIntl, pContext,
|
|
_bIntl, _bQuote, _cDecSep, _bPredicate, _bSubstitute
|
|
) );
|
|
}
|
|
catch( const SQLException& )
|
|
{
|
|
OSL_ENSURE( false, "OSQLParseNode::parseNodeToStr: this should not throw!" );
|
|
// our callers don't expect this method to throw anything. The only known situation
|
|
// where impl_parseNodeToString_throw can throw is when there is a cyclic reference
|
|
// in the sub queries, but this cannot be the case here, as we do not parse to
|
|
// SDBC level.
|
|
}
|
|
rString = sBuffer.makeStringAndClear();
|
|
}
|
|
}
|
|
//-----------------------------------------------------------------------------
|
|
bool OSQLParseNode::parseNodeToExecutableStatement( ::rtl::OUString& _out_rString, const Reference< XConnection >& _rxConnection,
|
|
OSQLParser& _rParser, ::com::sun::star::sdbc::SQLException* _pErrorHolder ) const
|
|
{
|
|
RTL_LOGFILE_CONTEXT_AUTHOR( aLogger, "parse", "Ocke.Janssen@sun.com", "OSQLParseNode::parseNodeToExecutableStatement" );
|
|
OSL_PRECOND( _rxConnection.is(), "OSQLParseNode::parseNodeToExecutableStatement: invalid connection!" );
|
|
SQLParseNodeParameter aParseParam( _rxConnection,
|
|
NULL, NULL, OParseContext::getDefaultLocale(), NULL, false, true, '.', false, true );
|
|
|
|
if ( aParseParam.aMetaData.supportsSubqueriesInFrom() )
|
|
{
|
|
Reference< XQueriesSupplier > xSuppQueries( _rxConnection, UNO_QUERY );
|
|
OSL_ENSURE( xSuppQueries.is(), "OSQLParseNode::parseNodeToExecutableStatement: cannot substitute everything without a QueriesSupplier!" );
|
|
if ( xSuppQueries.is() )
|
|
aParseParam.xQueries = xSuppQueries->getQueries();
|
|
}
|
|
|
|
aParseParam.pParser = &_rParser;
|
|
|
|
_out_rString = ::rtl::OUString();
|
|
::rtl::OUStringBuffer sBuffer;
|
|
bool bSuccess = false;
|
|
try
|
|
{
|
|
impl_parseNodeToString_throw( sBuffer, aParseParam );
|
|
bSuccess = true;
|
|
}
|
|
catch( const SQLException& e )
|
|
{
|
|
if ( _pErrorHolder )
|
|
*_pErrorHolder = e;
|
|
}
|
|
_out_rString = sBuffer.makeStringAndClear();
|
|
return bSuccess;
|
|
}
|
|
|
|
//-----------------------------------------------------------------------------
|
|
namespace
|
|
{
|
|
bool lcl_isAliasNamePresent( const OSQLParseNode& _rTableNameNode )
|
|
{
|
|
return OSQLParseNode::getTableRange(_rTableNameNode.getParent()).getLength() != 0;
|
|
}
|
|
}
|
|
|
|
//-----------------------------------------------------------------------------
|
|
void OSQLParseNode::impl_parseNodeToString_throw(::rtl::OUStringBuffer& rString, const SQLParseNodeParameter& rParam) const
|
|
{
|
|
RTL_LOGFILE_CONTEXT_AUTHOR( aLogger, "parse", "Ocke.Janssen@sun.com", "OSQLParseNode::getTableRange" );
|
|
if ( isToken() )
|
|
{
|
|
parseLeaf(rString,rParam);
|
|
return;
|
|
}
|
|
|
|
// einmal auswerten wieviel Subtrees dieser Knoten besitzt
|
|
sal_uInt32 nCount = count();
|
|
|
|
bool bHandled = false;
|
|
switch ( getKnownRuleID() )
|
|
{
|
|
// special handling for parameters
|
|
case parameter:
|
|
{
|
|
if(rString.getLength())
|
|
rString.appendAscii(" ");
|
|
if (nCount == 1) // ?
|
|
m_aChildren[0]->impl_parseNodeToString_throw( rString, rParam );
|
|
else if (nCount == 2) // :Name
|
|
{
|
|
m_aChildren[0]->impl_parseNodeToString_throw( rString, rParam );
|
|
rString.append(m_aChildren[1]->m_aNodeValue);
|
|
} // [Name]
|
|
else
|
|
{
|
|
m_aChildren[0]->impl_parseNodeToString_throw( rString, rParam );
|
|
rString.append(m_aChildren[1]->m_aNodeValue);
|
|
rString.append(m_aChildren[2]->m_aNodeValue);
|
|
}
|
|
bHandled = true;
|
|
}
|
|
break;
|
|
|
|
// table refs
|
|
case table_ref:
|
|
if ( ( nCount == 2 ) || ( nCount == 3 ) || ( nCount == 5 ) )
|
|
{
|
|
impl_parseTableRangeNodeToString_throw( rString, rParam );
|
|
bHandled = true;
|
|
}
|
|
break;
|
|
|
|
// table name - might be a query name
|
|
case table_name:
|
|
bHandled = impl_parseTableNameNodeToString_throw( rString, rParam );
|
|
break;
|
|
|
|
case as:
|
|
if ( rParam.aMetaData.generateASBeforeCorrelationName() )
|
|
rString.append(::rtl::OUString::createFromAscii( " AS" ));
|
|
bHandled = true;
|
|
break;
|
|
|
|
case like_predicate:
|
|
// je nachdem ob international angegeben wird oder nicht wird like anders behandelt
|
|
// interanational: *, ? sind Platzhalter
|
|
// sonst SQL92 konform: %, _
|
|
impl_parseLikeNodeToString_throw( rString, rParam );
|
|
bHandled = true;
|
|
break;
|
|
|
|
case general_set_fct:
|
|
case set_fct_spec:
|
|
case position_exp:
|
|
case extract_exp:
|
|
case length_exp:
|
|
case char_value_fct:
|
|
{
|
|
if (!addDateValue(rString, rParam))
|
|
{
|
|
// Funktionsname nicht quoten
|
|
SQLParseNodeParameter aNewParam(rParam);
|
|
aNewParam.bQuote = ( SQL_ISRULE(this,length_exp) || SQL_ISRULE(this,char_value_fct) );
|
|
|
|
m_aChildren[0]->impl_parseNodeToString_throw( rString, aNewParam );
|
|
aNewParam.bQuote = rParam.bQuote;
|
|
//aNewParam.bPredicate = sal_False; // disable [ ] around names // look at i73215
|
|
::rtl::OUStringBuffer aStringPara;
|
|
for (sal_uInt32 i=1; i<nCount; i++)
|
|
{
|
|
const OSQLParseNode * pSubTree = m_aChildren[i];
|
|
if (pSubTree)
|
|
{
|
|
pSubTree->impl_parseNodeToString_throw( aStringPara, aNewParam );
|
|
|
|
// bei den CommaListen zwischen alle Subtrees Commas setzen
|
|
if ((m_eNodeType == SQL_NODE_COMMALISTRULE) && (i < (nCount - 1)))
|
|
aStringPara.appendAscii(",");
|
|
}
|
|
else
|
|
i++;
|
|
}
|
|
rString.append(aStringPara.makeStringAndClear());
|
|
}
|
|
bHandled = true;
|
|
}
|
|
break;
|
|
default:
|
|
break;
|
|
} // switch ( getKnownRuleID() )
|
|
|
|
if ( !bHandled )
|
|
{
|
|
for (OSQLParseNodes::const_iterator i = m_aChildren.begin();
|
|
i != m_aChildren.end();)
|
|
{
|
|
const OSQLParseNode* pSubTree = *i;
|
|
if ( !pSubTree )
|
|
{
|
|
++i;
|
|
continue;
|
|
}
|
|
|
|
SQLParseNodeParameter aNewParam(rParam);
|
|
|
|
// don't replace the field for subqueries
|
|
if (rParam.xField.is() && SQL_ISRULE(pSubTree,subquery))
|
|
aNewParam.xField = NULL;
|
|
|
|
// if there is a field given we don't display the fieldname, if there is any
|
|
if (rParam.xField.is() && SQL_ISRULE(pSubTree,column_ref))
|
|
{
|
|
sal_Bool bFilter = sal_False;
|
|
// retrieve the fields name
|
|
::rtl::OUString aFieldName;
|
|
try
|
|
{
|
|
sal_Int32 nNamePropertyId = PROPERTY_ID_NAME;
|
|
if ( rParam.xField->getPropertySetInfo()->hasPropertyByName( OMetaConnection::getPropMap().getNameByIndex( PROPERTY_ID_REALNAME ) ) )
|
|
nNamePropertyId = PROPERTY_ID_REALNAME;
|
|
rParam.xField->getPropertyValue( OMetaConnection::getPropMap().getNameByIndex( nNamePropertyId ) ) >>= aFieldName;
|
|
}
|
|
catch ( Exception& )
|
|
{
|
|
}
|
|
|
|
if(pSubTree->count())
|
|
{
|
|
const OSQLParseNode* pCol = pSubTree->m_aChildren[pSubTree->count()-1];
|
|
if ( ( SQL_ISRULE(pCol,column_val)
|
|
&& pCol->getChild(0)->getTokenValue().equalsIgnoreAsciiCase(aFieldName)
|
|
)
|
|
|| pCol->getTokenValue().equalsIgnoreAsciiCase(aFieldName)
|
|
)
|
|
bFilter = sal_True;
|
|
}
|
|
|
|
// ok we found the field, if the following node is the
|
|
// comparision operator '=' we filter it as well
|
|
if (bFilter)
|
|
{
|
|
if (SQL_ISRULE(this, comparison_predicate))
|
|
{
|
|
++i;
|
|
if(i != m_aChildren.end())
|
|
{
|
|
pSubTree = *i;
|
|
if (pSubTree && pSubTree->getNodeType() == SQL_NODE_EQUAL)
|
|
i++;
|
|
}
|
|
}
|
|
else
|
|
i++;
|
|
}
|
|
else
|
|
{
|
|
pSubTree->impl_parseNodeToString_throw( rString, aNewParam );
|
|
i++;
|
|
|
|
// bei den CommaListen zwischen alle Subtrees Commas setzen
|
|
if ((m_eNodeType == SQL_NODE_COMMALISTRULE) && (i != m_aChildren.end()))
|
|
rString.appendAscii(",");
|
|
}
|
|
}
|
|
else
|
|
{
|
|
pSubTree->impl_parseNodeToString_throw( rString, aNewParam );
|
|
i++;
|
|
|
|
// bei den CommaListen zwischen alle Subtrees Commas setzen
|
|
if ((m_eNodeType == SQL_NODE_COMMALISTRULE) && (i != m_aChildren.end()))
|
|
{
|
|
if (SQL_ISRULE(this,value_exp_commalist) && rParam.bPredicate)
|
|
rString.appendAscii(";");
|
|
else
|
|
rString.appendAscii(",");
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
//-----------------------------------------------------------------------------
|
|
bool OSQLParseNode::impl_parseTableNameNodeToString_throw( ::rtl::OUStringBuffer& rString, const SQLParseNodeParameter& rParam ) const
|
|
{
|
|
RTL_LOGFILE_CONTEXT_AUTHOR( aLogger, "parse", "Ocke.Janssen@sun.com", "OSQLParseNode::impl_parseTableNameNodeToString_throw" );
|
|
// is the table_name part of a table_ref?
|
|
OSL_ENSURE( getParent(), "OSQLParseNode::impl_parseTableNameNodeToString_throw: table_name without parent?" );
|
|
if ( !getParent() || ( getParent()->getKnownRuleID() != table_ref ) )
|
|
return false;
|
|
|
|
// if it's a query, maybe we need to substitute the SQL statement ...
|
|
if ( !rParam.bParseToSDBCLevel )
|
|
return false;
|
|
|
|
if ( !rParam.xQueries.is() )
|
|
// connection does not support queries in queries, or was no query supplier
|
|
return false;
|
|
|
|
try
|
|
{
|
|
::rtl::OUString sTableOrQueryName( getChild(0)->getTokenValue() );
|
|
bool bIsQuery = rParam.xQueries->hasByName( sTableOrQueryName );
|
|
if ( !bIsQuery )
|
|
return false;
|
|
|
|
// avoid recursion (e.g. "foo" defined as "SELECT * FROM bar" and "bar" defined as "SELECT * FROM foo".
|
|
if ( rParam.pSubQueryHistory->find( sTableOrQueryName ) != rParam.pSubQueryHistory->end() )
|
|
{
|
|
::rtl::OUString sMessage( ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "cyclic sub queries" ) ) );
|
|
OSL_ENSURE( rParam.pParser, "OSQLParseNode::impl_parseTableNameNodeToString_throw: no parser?" );
|
|
if ( rParam.pParser )
|
|
{
|
|
const SQLError& rErrors( rParam.pParser->getErrorHelper() );
|
|
rErrors.raiseException( sdb::ErrorCondition::PARSER_CYCLIC_SUB_QUERIES );
|
|
}
|
|
else
|
|
{
|
|
SQLError aErrors( ::comphelper::getProcessServiceFactory() );
|
|
aErrors.raiseException( sdb::ErrorCondition::PARSER_CYCLIC_SUB_QUERIES );
|
|
}
|
|
}
|
|
rParam.pSubQueryHistory->insert( sTableOrQueryName );
|
|
|
|
Reference< XPropertySet > xQuery( rParam.xQueries->getByName( sTableOrQueryName ), UNO_QUERY_THROW );
|
|
|
|
// substitute the query name with the constituting command
|
|
::rtl::OUString sCommand;
|
|
OSL_VERIFY( xQuery->getPropertyValue( OMetaConnection::getPropMap().getNameByIndex( PROPERTY_ID_COMMAND ) ) >>= sCommand );
|
|
|
|
sal_Bool bEscapeProcessing = sal_False;
|
|
OSL_VERIFY( xQuery->getPropertyValue( OMetaConnection::getPropMap().getNameByIndex( PROPERTY_ID_ESCAPEPROCESSING ) ) >>= bEscapeProcessing );
|
|
|
|
// the query we found here might itself be based on another query, so parse it recursively
|
|
OSL_ENSURE( rParam.pParser, "OSQLParseNode::impl_parseTableNameNodeToString_throw: cannot analyze sub queries without a parser!" );
|
|
if ( bEscapeProcessing && rParam.pParser )
|
|
{
|
|
::rtl::OUString sError;
|
|
::std::auto_ptr< OSQLParseNode > pSubQueryNode( rParam.pParser->parseTree( sError, sCommand, sal_False ) );
|
|
if ( pSubQueryNode.get() )
|
|
{
|
|
// parse the sub-select to SDBC level, too
|
|
::rtl::OUStringBuffer sSubSelect;
|
|
pSubQueryNode->impl_parseNodeToString_throw( sSubSelect, rParam );
|
|
if ( sSubSelect.getLength() )
|
|
sCommand = sSubSelect.makeStringAndClear();
|
|
}
|
|
}
|
|
|
|
rString.appendAscii( " ( " );
|
|
rString.append(sCommand);
|
|
rString.appendAscii( " )" );
|
|
|
|
// append the query name as table alias, since it might be referenced in other
|
|
// parts of the statement - but only if there's no other alias name present
|
|
if ( !lcl_isAliasNamePresent( *this ) )
|
|
{
|
|
rString.appendAscii( " AS " );
|
|
if ( rParam.bQuote )
|
|
rString.append(SetQuotation( sTableOrQueryName,
|
|
rParam.aMetaData.getIdentifierQuoteString(), rParam.aMetaData.getIdentifierQuoteString() ));
|
|
}
|
|
|
|
// don't forget to remove the query name from the history, else multiple inclusions
|
|
// won't work
|
|
// #i69227# / 2006-10-10 / frank.schoenheit@sun.com
|
|
rParam.pSubQueryHistory->erase( sTableOrQueryName );
|
|
|
|
return true;
|
|
}
|
|
catch( const SQLException& )
|
|
{
|
|
throw;
|
|
}
|
|
catch( const Exception& )
|
|
{
|
|
DBG_UNHANDLED_EXCEPTION();
|
|
}
|
|
return false;
|
|
}
|
|
|
|
//-----------------------------------------------------------------------------
|
|
void OSQLParseNode::impl_parseTableRangeNodeToString_throw(::rtl::OUStringBuffer& rString, const SQLParseNodeParameter& rParam) const
|
|
{
|
|
RTL_LOGFILE_CONTEXT_AUTHOR( aLogger, "parse", "Ocke.Janssen@sun.com", "OSQLParseNode::impl_parseTableRangeNodeToString_throw" );
|
|
OSL_PRECOND( ( count() == 2 ) || ( count() == 3 ) || ( count() == 5 ) ,"Illegal count");
|
|
|
|
// rString += ::rtl::OUString::createFromAscii(" ");
|
|
::std::for_each(m_aChildren.begin(),m_aChildren.end(),
|
|
boost::bind( &OSQLParseNode::impl_parseNodeToString_throw, _1, boost::ref( rString ), boost::cref( rParam ) ));
|
|
}
|
|
|
|
//-----------------------------------------------------------------------------
|
|
void OSQLParseNode::impl_parseLikeNodeToString_throw( ::rtl::OUStringBuffer& rString, const SQLParseNodeParameter& rParam ) const
|
|
{
|
|
RTL_LOGFILE_CONTEXT_AUTHOR( aLogger, "parse", "Ocke.Janssen@sun.com", "OSQLParseNode::impl_parseLikeNodeToString_throw" );
|
|
OSL_ENSURE(count() >= 4,"count != 5: Prepare for GPF");
|
|
|
|
const OSQLParseNode* pEscNode = NULL;
|
|
const OSQLParseNode* pParaNode = NULL;
|
|
|
|
SQLParseNodeParameter aNewParam(rParam);
|
|
//aNewParam.bQuote = sal_True; // why setting this to true? @see http://www.openoffice.org/issues/show_bug.cgi?id=75557
|
|
|
|
// if there is a field given we don't display the fieldname, if there are any
|
|
sal_Bool bAddName = sal_True;
|
|
if (rParam.xField.is())
|
|
{
|
|
// retrieve the fields name
|
|
::rtl::OUString aFieldName;
|
|
try
|
|
{
|
|
// retrieve the fields name
|
|
rtl::OUString aString;
|
|
rParam.xField->getPropertyValue(OMetaConnection::getPropMap().getNameByIndex(PROPERTY_ID_NAME)) >>= aString;
|
|
aFieldName = aString.getStr();
|
|
}
|
|
catch ( Exception& )
|
|
{
|
|
OSL_ENSURE( false, "OSQLParseNode::impl_parseLikeNodeToString_throw Exception occured!" );
|
|
}
|
|
if ( !m_aChildren[0]->isLeaf() )
|
|
{
|
|
const OSQLParseNode* pCol = m_aChildren[0]->getChild(m_aChildren[0]->count()-1);
|
|
if ((SQL_ISRULE(pCol,column_val) && pCol->getChild(0)->getTokenValue().equalsIgnoreAsciiCase(aFieldName)) ||
|
|
pCol->getTokenValue().equalsIgnoreAsciiCase(aFieldName) )
|
|
bAddName = sal_False;
|
|
}
|
|
}
|
|
|
|
if (bAddName)
|
|
m_aChildren[0]->impl_parseNodeToString_throw( rString, aNewParam );
|
|
|
|
m_aChildren[1]->impl_parseNodeToString_throw( rString, aNewParam );
|
|
if(count() == 5)
|
|
m_aChildren[2]->impl_parseNodeToString_throw( rString, aNewParam );
|
|
|
|
sal_Int32 nCurentPos = m_aChildren.size()-2;
|
|
pParaNode = m_aChildren[nCurentPos];
|
|
pEscNode = m_aChildren[nCurentPos+1];
|
|
|
|
if (pParaNode->isToken())
|
|
{
|
|
::rtl::OUString aStr = ConvertLikeToken(pParaNode, pEscNode, rParam.bInternational);
|
|
rString.appendAscii(" ");
|
|
rString.append(SetQuotation(aStr,::rtl::OUString::createFromAscii("\'"),::rtl::OUString::createFromAscii("\'\'")));
|
|
}
|
|
else
|
|
pParaNode->impl_parseNodeToString_throw( rString, aNewParam );
|
|
|
|
pEscNode->impl_parseNodeToString_throw( rString, aNewParam );
|
|
}
|
|
|
|
|
|
// -----------------------------------------------------------------------------
|
|
sal_Bool OSQLParseNode::getTableComponents(const OSQLParseNode* _pTableNode,
|
|
::com::sun::star::uno::Any &_rCatalog,
|
|
::rtl::OUString &_rSchema,
|
|
::rtl::OUString &_rTable)
|
|
{
|
|
RTL_LOGFILE_CONTEXT_AUTHOR( aLogger, "parse", "Ocke.Janssen@sun.com", "OSQLParseNode::getTableComponents" );
|
|
OSL_ENSURE(_pTableNode,"Wrong use of getTableComponents! _pTableNode is not allowed to be null!");
|
|
if(_pTableNode)
|
|
{
|
|
const OSQLParseNode* pTableNode = _pTableNode;
|
|
// clear the parameter given
|
|
_rCatalog = Any();
|
|
_rSchema = _rTable = ::rtl::OUString();
|
|
// see rule catalog_name: in sqlbison.y
|
|
if (SQL_ISRULE(pTableNode,catalog_name))
|
|
{
|
|
OSL_ENSURE(pTableNode->getChild(0) && pTableNode->getChild(0)->isToken(),"Invalid parsenode!");
|
|
_rCatalog <<= pTableNode->getChild(0)->getTokenValue();
|
|
pTableNode = pTableNode->getChild(2);
|
|
}
|
|
// check if we have schema_name rule
|
|
if(SQL_ISRULE(pTableNode,schema_name))
|
|
{
|
|
_rSchema = pTableNode->getChild(0)->getTokenValue();
|
|
pTableNode = pTableNode->getChild(2);
|
|
}
|
|
// check if we have table_name rule
|
|
if(SQL_ISRULE(pTableNode,table_name))
|
|
{
|
|
_rTable = pTableNode->getChild(0)->getTokenValue();
|
|
}
|
|
else
|
|
{
|
|
OSL_ENSURE(0,"Error in parse tree!");
|
|
}
|
|
}
|
|
return _rTable.getLength() != 0;
|
|
}
|
|
// -----------------------------------------------------------------------------
|
|
void OSQLParser::killThousandSeparator(OSQLParseNode* pLiteral)
|
|
{
|
|
if ( pLiteral )
|
|
{
|
|
if ( s_xLocaleData->getLocaleItem( m_pData->aLocale ).decimalSeparator.toChar() == ',' )
|
|
{
|
|
pLiteral->m_aNodeValue = pLiteral->m_aNodeValue.replace('.', sal_Unicode());
|
|
// and replace decimal
|
|
pLiteral->m_aNodeValue = pLiteral->m_aNodeValue.replace(',', '.');
|
|
}
|
|
else
|
|
pLiteral->m_aNodeValue = pLiteral->m_aNodeValue.replace(',', sal_Unicode());
|
|
}
|
|
}
|
|
// -----------------------------------------------------------------------------
|
|
OSQLParseNode* OSQLParser::convertNode(sal_Int32 nType,OSQLParseNode*& pLiteral)
|
|
{
|
|
if ( !pLiteral )
|
|
return NULL;
|
|
|
|
OSQLParseNode* pReturn = pLiteral;
|
|
|
|
if ( ( pLiteral->isRule() && !SQL_ISRULE(pLiteral,value_exp) ) || SQL_ISTOKEN(pLiteral,FALSE) || SQL_ISTOKEN(pLiteral,TRUE) )
|
|
{
|
|
switch(nType)
|
|
{
|
|
case DataType::CHAR:
|
|
case DataType::VARCHAR:
|
|
case DataType::LONGVARCHAR:
|
|
if ( !SQL_ISRULE(pReturn,char_value_exp) && !buildStringNodes(pReturn) )
|
|
pReturn = NULL;
|
|
default:
|
|
break;
|
|
}
|
|
}
|
|
else
|
|
{
|
|
switch(pLiteral->getNodeType())
|
|
{
|
|
case SQL_NODE_STRING:
|
|
switch(nType)
|
|
{
|
|
case DataType::CHAR:
|
|
case DataType::VARCHAR:
|
|
case DataType::LONGVARCHAR:
|
|
break;
|
|
case DataType::DATE:
|
|
case DataType::TIME:
|
|
case DataType::TIMESTAMP:
|
|
if (m_xFormatter.is())
|
|
pReturn = buildDate( nType, pReturn);
|
|
break;
|
|
default:
|
|
m_sErrorMessage = m_pContext->getErrorMessage(IParseContext::ERROR_INVALID_COMPARE);
|
|
break;
|
|
}
|
|
break;
|
|
case SQL_NODE_ACCESS_DATE:
|
|
switch(nType)
|
|
{
|
|
case DataType::DATE:
|
|
case DataType::TIME:
|
|
case DataType::TIMESTAMP:
|
|
if ( m_xFormatter.is() )
|
|
pReturn = buildDate( nType, pReturn);
|
|
else
|
|
m_sErrorMessage = m_pContext->getErrorMessage(IParseContext::ERROR_INVALID_DATE_COMPARE);
|
|
break;
|
|
default:
|
|
m_sErrorMessage = m_pContext->getErrorMessage(IParseContext::ERROR_INVALID_COMPARE);
|
|
break;
|
|
}
|
|
break;
|
|
case SQL_NODE_INTNUM:
|
|
switch(nType)
|
|
{
|
|
case DataType::BIT:
|
|
case DataType::BOOLEAN:
|
|
case DataType::DECIMAL:
|
|
case DataType::NUMERIC:
|
|
case DataType::TINYINT:
|
|
case DataType::SMALLINT:
|
|
case DataType::INTEGER:
|
|
case DataType::BIGINT:
|
|
case DataType::FLOAT:
|
|
case DataType::REAL:
|
|
case DataType::DOUBLE:
|
|
// kill thousand seperators if any
|
|
killThousandSeparator(pReturn);
|
|
break;
|
|
case DataType::CHAR:
|
|
case DataType::VARCHAR:
|
|
case DataType::LONGVARCHAR:
|
|
pReturn = buildNode_STR_NUM(pReturn);
|
|
break;
|
|
default:
|
|
m_sErrorMessage = m_pContext->getErrorMessage(IParseContext::ERROR_INVALID_INT_COMPARE);
|
|
break;
|
|
}
|
|
break;
|
|
case SQL_NODE_APPROXNUM:
|
|
switch(nType)
|
|
{
|
|
case DataType::DECIMAL:
|
|
case DataType::NUMERIC:
|
|
case DataType::FLOAT:
|
|
case DataType::REAL:
|
|
case DataType::DOUBLE:
|
|
// kill thousand seperators if any
|
|
killThousandSeparator(pReturn);
|
|
break;
|
|
case DataType::CHAR:
|
|
case DataType::VARCHAR:
|
|
case DataType::LONGVARCHAR:
|
|
pReturn = buildNode_STR_NUM(pReturn);
|
|
break;
|
|
case DataType::INTEGER:
|
|
default:
|
|
m_sErrorMessage = m_pContext->getErrorMessage(IParseContext::ERROR_INVALID_REAL_COMPARE);
|
|
break;
|
|
}
|
|
break;
|
|
default:
|
|
OSL_ENSURE(0,"Not handled!");
|
|
}
|
|
}
|
|
return pReturn;
|
|
}
|
|
// -----------------------------------------------------------------------------
|
|
sal_Int16 OSQLParser::buildPredicateRule(OSQLParseNode*& pAppend,OSQLParseNode* pLiteral,OSQLParseNode*& pCompare,OSQLParseNode* pLiteral2)
|
|
{
|
|
OSL_ENSURE(inPredicateCheck(),"Only in predicate check allowed!");
|
|
sal_Int16 nErg = 0;
|
|
if ( m_xField.is() )
|
|
{
|
|
sal_Int32 nType = 0;
|
|
try
|
|
{
|
|
m_xField->getPropertyValue(OMetaConnection::getPropMap().getNameByIndex(PROPERTY_ID_TYPE)) >>= nType;
|
|
}
|
|
catch( Exception& )
|
|
{
|
|
return nErg;
|
|
}
|
|
|
|
OSQLParseNode* pNode1 = convertNode(nType,pLiteral);
|
|
if ( pNode1 )
|
|
{
|
|
OSQLParseNode* pNode2 = convertNode(nType,pLiteral2);
|
|
if ( !m_sErrorMessage.getLength() )
|
|
nErg = buildNode(pAppend,pCompare,pNode1,pNode2);
|
|
}
|
|
}
|
|
if (!pCompare->getParent()) // I have no parent so I was not used and I must die :-)
|
|
delete pCompare;
|
|
return nErg;
|
|
}
|
|
// -----------------------------------------------------------------------------
|
|
sal_Int16 OSQLParser::buildLikeRule(OSQLParseNode*& pAppend, OSQLParseNode*& pLiteral, const OSQLParseNode* pEscape)
|
|
{
|
|
sal_Int16 nErg = 0;
|
|
sal_Int32 nType = 0;
|
|
|
|
if (!m_xField.is())
|
|
return nErg;
|
|
try
|
|
{
|
|
Any aValue;
|
|
{
|
|
aValue = m_xField->getPropertyValue(OMetaConnection::getPropMap().getNameByIndex(PROPERTY_ID_TYPE));
|
|
aValue >>= nType;
|
|
}
|
|
}
|
|
catch( Exception& )
|
|
{
|
|
return nErg;
|
|
}
|
|
|
|
switch (nType)
|
|
{
|
|
case DataType::CHAR:
|
|
case DataType::VARCHAR:
|
|
case DataType::LONGVARCHAR:
|
|
if(pLiteral->isRule())
|
|
{
|
|
pAppend->append(pLiteral);
|
|
nErg = 1;
|
|
}
|
|
else
|
|
{
|
|
switch(pLiteral->getNodeType())
|
|
{
|
|
case SQL_NODE_STRING:
|
|
pLiteral->m_aNodeValue = ConvertLikeToken(pLiteral, pEscape, sal_False);
|
|
pAppend->append(pLiteral);
|
|
nErg = 1;
|
|
break;
|
|
case SQL_NODE_APPROXNUM:
|
|
if (m_xFormatter.is() && m_nFormatKey)
|
|
{
|
|
sal_Int16 nScale = 0;
|
|
try
|
|
{
|
|
Any aValue = getNumberFormatProperty( m_xFormatter, m_nFormatKey, ::rtl::OUString::createFromAscii("Decimals") );
|
|
aValue >>= nScale;
|
|
}
|
|
catch( Exception& )
|
|
{
|
|
}
|
|
|
|
pAppend->append(new OSQLInternalNode(stringToDouble(pLiteral->getTokenValue(),nScale),SQL_NODE_STRING));
|
|
}
|
|
else
|
|
pAppend->append(new OSQLInternalNode(pLiteral->getTokenValue(),SQL_NODE_STRING));
|
|
|
|
delete pLiteral;
|
|
nErg = 1;
|
|
break;
|
|
default:
|
|
m_sErrorMessage = m_pContext->getErrorMessage(IParseContext::ERROR_VALUE_NO_LIKE);
|
|
m_sErrorMessage = m_sErrorMessage.replaceAt(m_sErrorMessage.indexOf(::rtl::OUString::createFromAscii("#1")),2,pLiteral->getTokenValue());
|
|
break;
|
|
}
|
|
}
|
|
break;
|
|
default:
|
|
m_sErrorMessage = m_pContext->getErrorMessage(IParseContext::ERROR_FIELD_NO_LIKE);
|
|
break;
|
|
}
|
|
return nErg;
|
|
}
|
|
//-----------------------------------------------------------------------------
|
|
OSQLParseNode* OSQLParser::buildNode_Date(const double& fValue, sal_Int32 nType)
|
|
{
|
|
::rtl::OUString aEmptyString;
|
|
OSQLParseNode* pNewNode = new OSQLInternalNode(aEmptyString, SQL_NODE_RULE,OSQLParser::RuleID(OSQLParseNode::set_fct_spec));
|
|
pNewNode->append(new OSQLInternalNode(::rtl::OUString::createFromAscii("{"), SQL_NODE_PUNCTUATION));
|
|
OSQLParseNode* pDateNode = new OSQLInternalNode(aEmptyString, SQL_NODE_RULE,OSQLParser::RuleID(OSQLParseNode::odbc_fct_spec));
|
|
pNewNode->append(pDateNode);
|
|
pNewNode->append(new OSQLInternalNode(::rtl::OUString::createFromAscii("}"), SQL_NODE_PUNCTUATION));
|
|
|
|
switch (nType)
|
|
{
|
|
case DataType::DATE:
|
|
{
|
|
Date aDate = DBTypeConversion::toDate(fValue,DBTypeConversion::getNULLDate(m_xFormatter->getNumberFormatsSupplier()));
|
|
::rtl::OUString aString = DBTypeConversion::toDateString(aDate);
|
|
pDateNode->append(new OSQLInternalNode(aEmptyString, SQL_NODE_KEYWORD, SQL_TOKEN_D));
|
|
pDateNode->append(new OSQLInternalNode(aString, SQL_NODE_STRING));
|
|
break;
|
|
}
|
|
case DataType::TIME:
|
|
{
|
|
Time aTime = DBTypeConversion::toTime(fValue);
|
|
::rtl::OUString aString = DBTypeConversion::toTimeString(aTime);
|
|
pDateNode->append(new OSQLInternalNode(aEmptyString, SQL_NODE_KEYWORD, SQL_TOKEN_T));
|
|
pDateNode->append(new OSQLInternalNode(aString, SQL_NODE_STRING));
|
|
break;
|
|
}
|
|
case DataType::TIMESTAMP:
|
|
{
|
|
DateTime aDateTime = DBTypeConversion::toDateTime(fValue,DBTypeConversion::getNULLDate(m_xFormatter->getNumberFormatsSupplier()));
|
|
if (aDateTime.Seconds || aDateTime.Minutes || aDateTime.Hours)
|
|
{
|
|
::rtl::OUString aString = DBTypeConversion::toDateTimeString(aDateTime);
|
|
pDateNode->append(new OSQLInternalNode(aEmptyString, SQL_NODE_KEYWORD, SQL_TOKEN_TS));
|
|
pDateNode->append(new OSQLInternalNode(aString, SQL_NODE_STRING));
|
|
}
|
|
else
|
|
{
|
|
Date aDate(aDateTime.Day,aDateTime.Month,aDateTime.Year);
|
|
pDateNode->append(new OSQLInternalNode(aEmptyString, SQL_NODE_KEYWORD, SQL_TOKEN_D));
|
|
pDateNode->append(new OSQLInternalNode(DBTypeConversion::toDateString(aDate), SQL_NODE_STRING));
|
|
}
|
|
break;
|
|
}
|
|
}
|
|
|
|
return pNewNode;
|
|
}
|
|
// -----------------------------------------------------------------------------
|
|
OSQLParseNode* OSQLParser::buildNode_STR_NUM(OSQLParseNode*& _pLiteral)
|
|
{
|
|
OSQLParseNode* pReturn = NULL;
|
|
if ( _pLiteral )
|
|
{
|
|
if (m_nFormatKey)
|
|
{
|
|
sal_Int16 nScale = 0;
|
|
::rtl::OUString aDec;
|
|
try
|
|
{
|
|
Any aValue = getNumberFormatProperty( m_xFormatter, m_nFormatKey, ::rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("Decimals")) );
|
|
aValue >>= nScale;
|
|
}
|
|
catch( Exception& )
|
|
{
|
|
}
|
|
|
|
pReturn = new OSQLInternalNode(stringToDouble(_pLiteral->getTokenValue(),nScale),SQL_NODE_STRING);
|
|
}
|
|
else
|
|
pReturn = new OSQLInternalNode(_pLiteral->getTokenValue(),SQL_NODE_STRING);
|
|
|
|
delete _pLiteral;
|
|
_pLiteral = NULL;
|
|
}
|
|
return pReturn;
|
|
}
|
|
// -----------------------------------------------------------------------------
|
|
::rtl::OUString OSQLParser::stringToDouble(const ::rtl::OUString& _rValue,sal_Int16 _nScale)
|
|
{
|
|
::rtl::OUString aValue;
|
|
if(!m_xCharClass.is())
|
|
m_xCharClass = Reference<XCharacterClassification>(m_xServiceFactory->createInstance(::rtl::OUString::createFromAscii("com.sun.star.i18n.CharacterClassification")),UNO_QUERY);
|
|
if(m_xCharClass.is() && s_xLocaleData.is())
|
|
{
|
|
try
|
|
{
|
|
ParseResult aResult = m_xCharClass->parsePredefinedToken(KParseType::ANY_NUMBER,_rValue,0,m_pData->aLocale,0,::rtl::OUString(),KParseType::ANY_NUMBER,::rtl::OUString());
|
|
if((aResult.TokenType & KParseType::IDENTNAME) && aResult.EndPos == _rValue.getLength())
|
|
{
|
|
aValue = ::rtl::OUString::valueOf(aResult.Value);
|
|
sal_Int32 nPos = aValue.lastIndexOf(::rtl::OUString::createFromAscii("."));
|
|
if((nPos+_nScale) < aValue.getLength())
|
|
aValue = aValue.replaceAt(nPos+_nScale,aValue.getLength()-nPos-_nScale,::rtl::OUString());
|
|
aValue = aValue.replaceAt(aValue.lastIndexOf(::rtl::OUString::createFromAscii(".")),1,s_xLocaleData->getLocaleItem(m_pData->aLocale).decimalSeparator);
|
|
return aValue;
|
|
}
|
|
}
|
|
catch(Exception&)
|
|
{
|
|
}
|
|
}
|
|
return aValue;
|
|
}
|
|
// -----------------------------------------------------------------------------
|
|
|
|
::osl::Mutex& OSQLParser::getMutex()
|
|
{
|
|
static ::osl::Mutex aMutex;
|
|
return aMutex;
|
|
}
|
|
|
|
//-----------------------------------------------------------------------------
|
|
OSQLParseNode* OSQLParser::predicateTree(::rtl::OUString& rErrorMessage, const ::rtl::OUString& rStatement,
|
|
const Reference< ::com::sun::star::util::XNumberFormatter > & xFormatter,
|
|
const Reference< XPropertySet > & xField)
|
|
{
|
|
|
|
|
|
// mutex for parsing
|
|
static ::osl::Mutex aMutex;
|
|
|
|
// Guard the parsing
|
|
::osl::MutexGuard aGuard(getMutex());
|
|
// must be reset
|
|
setParser(this);
|
|
|
|
|
|
// reset the parser
|
|
m_xField = xField;
|
|
m_xFormatter = xFormatter;
|
|
|
|
if (m_xField.is())
|
|
{
|
|
sal_Int32 nType=0;
|
|
try
|
|
{
|
|
// get the field name
|
|
rtl::OUString aString;
|
|
|
|
// retrieve the fields name
|
|
// #75243# use the RealName of the column if there is any otherwise the name which could be the alias
|
|
// of the field
|
|
Reference< XPropertySetInfo> xInfo = m_xField->getPropertySetInfo();
|
|
if ( xInfo->hasPropertyByName(OMetaConnection::getPropMap().getNameByIndex(PROPERTY_ID_REALNAME)))
|
|
m_xField->getPropertyValue(OMetaConnection::getPropMap().getNameByIndex(PROPERTY_ID_REALNAME)) >>= aString;
|
|
else
|
|
m_xField->getPropertyValue(OMetaConnection::getPropMap().getNameByIndex(PROPERTY_ID_NAME)) >>= aString;
|
|
|
|
m_sFieldName = aString;
|
|
|
|
// get the field format key
|
|
if ( xInfo->hasPropertyByName(OMetaConnection::getPropMap().getNameByIndex(PROPERTY_ID_FORMATKEY)))
|
|
m_xField->getPropertyValue(OMetaConnection::getPropMap().getNameByIndex(PROPERTY_ID_FORMATKEY)) >>= m_nFormatKey;
|
|
else
|
|
m_nFormatKey = 0;
|
|
|
|
// get the field type
|
|
m_xField->getPropertyValue(OMetaConnection::getPropMap().getNameByIndex(PROPERTY_ID_TYPE)) >>= nType;
|
|
}
|
|
catch ( Exception& )
|
|
{
|
|
OSL_ASSERT(0);
|
|
}
|
|
|
|
if (m_nFormatKey && m_xFormatter.is())
|
|
{
|
|
Any aValue = getNumberFormatProperty( m_xFormatter, m_nFormatKey, OMetaConnection::getPropMap().getNameByIndex(PROPERTY_ID_LOCALE) );
|
|
OSL_ENSURE(aValue.getValueType() == ::getCppuType((const ::com::sun::star::lang::Locale*)0), "OSQLParser::PredicateTree : invalid language property !");
|
|
|
|
if (aValue.getValueType() == ::getCppuType((const ::com::sun::star::lang::Locale*)0))
|
|
aValue >>= m_pData->aLocale;
|
|
}
|
|
else
|
|
m_pData->aLocale = m_pContext->getPreferredLocale();
|
|
|
|
if ( m_xFormatter.is() )
|
|
{
|
|
try
|
|
{
|
|
Reference< ::com::sun::star::util::XNumberFormatsSupplier > xFormatSup = m_xFormatter->getNumberFormatsSupplier();
|
|
if ( xFormatSup.is() )
|
|
{
|
|
Reference< ::com::sun::star::util::XNumberFormats > xFormats = xFormatSup->getNumberFormats();
|
|
if ( xFormats.is() )
|
|
{
|
|
::com::sun::star::lang::Locale aLocale;
|
|
aLocale.Language = ::rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("en"));
|
|
aLocale.Country = ::rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("US"));
|
|
::rtl::OUString sFormat(RTL_CONSTASCII_USTRINGPARAM("YYYY-MM-DD"));
|
|
m_nDateFormatKey = xFormats->queryKey(sFormat,aLocale,sal_False);
|
|
if ( m_nDateFormatKey == sal_Int32(-1) )
|
|
m_nDateFormatKey = xFormats->addNew(sFormat, aLocale);
|
|
}
|
|
}
|
|
}
|
|
catch ( Exception& )
|
|
{
|
|
OSL_ENSURE(0,"DateFormatKey");
|
|
}
|
|
}
|
|
|
|
switch (nType)
|
|
{
|
|
case DataType::DATE:
|
|
case DataType::TIME:
|
|
case DataType::TIMESTAMP:
|
|
s_pScanner->SetRule(s_pScanner->GetDATERule());
|
|
break;
|
|
case DataType::CHAR:
|
|
case DataType::VARCHAR:
|
|
case DataType::LONGVARCHAR:
|
|
s_pScanner->SetRule(s_pScanner->GetSTRINGRule());
|
|
break;
|
|
default:
|
|
if ( s_xLocaleData->getLocaleItem( m_pData->aLocale ).decimalSeparator.toChar() == ',' )
|
|
s_pScanner->SetRule(s_pScanner->GetGERRule());
|
|
else
|
|
s_pScanner->SetRule(s_pScanner->GetENGRule());
|
|
}
|
|
|
|
}
|
|
else
|
|
s_pScanner->SetRule(s_pScanner->GetSQLRule());
|
|
|
|
s_pScanner->prepareScan(rStatement, m_pContext, sal_True);
|
|
|
|
SQLyylval.pParseNode = NULL;
|
|
// SQLyypvt = NULL;
|
|
m_pParseTree = NULL;
|
|
m_sErrorMessage= ::rtl::OUString();
|
|
|
|
// ... und den Parser anwerfen ...
|
|
if (SQLyyparse() != 0)
|
|
{
|
|
m_sFieldName= ::rtl::OUString();
|
|
m_xField = NULL;
|
|
m_xFormatter = NULL;
|
|
m_nFormatKey = 0;
|
|
m_nDateFormatKey = 0;
|
|
|
|
if (!m_sErrorMessage.getLength())
|
|
m_sErrorMessage = s_pScanner->getErrorMessage();
|
|
if (!m_sErrorMessage.getLength())
|
|
m_sErrorMessage = m_pContext->getErrorMessage(IParseContext::ERROR_GENERAL);
|
|
|
|
rErrorMessage = m_sErrorMessage;
|
|
|
|
// clear the garbage collector
|
|
(*s_pGarbageCollector)->clearAndDelete();
|
|
return NULL;
|
|
}
|
|
else
|
|
{
|
|
(*s_pGarbageCollector)->clear();
|
|
|
|
m_sFieldName= ::rtl::OUString();
|
|
m_xField = NULL;
|
|
m_xFormatter = NULL;
|
|
m_nFormatKey = 0;
|
|
m_nDateFormatKey = 0;
|
|
|
|
// Das Ergebnis liefern (den Root Parse Node):
|
|
|
|
// Stattdessen setzt die Parse-Routine jetzt den Member pParseTree
|
|
// - einfach diesen zurueckliefern:
|
|
OSL_ENSURE(m_pParseTree != NULL,"OSQLParser: Parser hat keinen ParseTree geliefert");
|
|
return m_pParseTree;
|
|
}
|
|
}
|
|
|
|
//=============================================================================
|
|
//-----------------------------------------------------------------------------
|
|
OSQLParser::OSQLParser(const ::com::sun::star::uno::Reference< ::com::sun::star::lang::XMultiServiceFactory >& _xServiceFactory,const IParseContext* _pContext)
|
|
:m_pContext(_pContext)
|
|
,m_pParseTree(NULL)
|
|
,m_pData( new OSQLParser_Data( _xServiceFactory ) )
|
|
,m_nFormatKey(0)
|
|
,m_nDateFormatKey(0)
|
|
,m_xServiceFactory(_xServiceFactory)
|
|
{
|
|
|
|
|
|
setParser(this);
|
|
|
|
#ifdef SQLYYDEBUG
|
|
#ifdef SQLYYDEBUG_ON
|
|
SQLyydebug = 1;
|
|
#endif
|
|
#endif
|
|
|
|
::osl::MutexGuard aGuard(getMutex());
|
|
// do we have to initialize the data
|
|
if (s_nRefCount == 0)
|
|
{
|
|
s_pScanner = new OSQLScanner();
|
|
s_pScanner->setScanner();
|
|
s_pGarbageCollector = new OSQLParseNodesGarbageCollector();
|
|
|
|
if(!s_xLocaleData.is())
|
|
s_xLocaleData = Reference<XLocaleData>(m_xServiceFactory->createInstance(::rtl::OUString::createFromAscii("com.sun.star.i18n.LocaleData")),UNO_QUERY);
|
|
|
|
// auf 0 zuruecksetzen
|
|
memset(OSQLParser::s_nRuleIDs,0,sizeof(OSQLParser::s_nRuleIDs[0]) * (OSQLParseNode::rule_count+1));
|
|
|
|
struct
|
|
{
|
|
OSQLParseNode::Rule eRule; // the parse node's ID for the rule
|
|
::rtl::OString sRuleName; // the name of the rule ("select_statement")
|
|
} aRuleDescriptions[] =
|
|
{
|
|
{ OSQLParseNode::select_statement, "select_statement" },
|
|
{ OSQLParseNode::table_exp, "table_exp" },
|
|
{ OSQLParseNode::table_ref_commalist, "table_ref_commalist" },
|
|
{ OSQLParseNode::table_ref, "table_ref" },
|
|
{ OSQLParseNode::catalog_name, "catalog_name" },
|
|
{ OSQLParseNode::schema_name, "schema_name" },
|
|
{ OSQLParseNode::table_name, "table_name" },
|
|
{ OSQLParseNode::opt_column_commalist, "opt_column_commalist" },
|
|
{ OSQLParseNode::column_commalist, "column_commalist" },
|
|
{ OSQLParseNode::column_ref_commalist, "column_ref_commalist" },
|
|
{ OSQLParseNode::column_ref, "column_ref" },
|
|
{ OSQLParseNode::opt_order_by_clause, "opt_order_by_clause" },
|
|
{ OSQLParseNode::ordering_spec_commalist, "ordering_spec_commalist" },
|
|
{ OSQLParseNode::ordering_spec, "ordering_spec" },
|
|
{ OSQLParseNode::opt_asc_desc, "opt_asc_desc" },
|
|
{ OSQLParseNode::where_clause, "where_clause" },
|
|
{ OSQLParseNode::opt_where_clause, "opt_where_clause" },
|
|
{ OSQLParseNode::search_condition, "search_condition" },
|
|
{ OSQLParseNode::comparison_predicate, "comparison_predicate" },
|
|
{ OSQLParseNode::between_predicate, "between_predicate" },
|
|
{ OSQLParseNode::like_predicate, "like_predicate" },
|
|
{ OSQLParseNode::opt_escape, "opt_escape" },
|
|
{ OSQLParseNode::test_for_null, "test_for_null" },
|
|
{ OSQLParseNode::scalar_exp_commalist, "scalar_exp_commalist" },
|
|
{ OSQLParseNode::scalar_exp, "scalar_exp" },
|
|
{ OSQLParseNode::parameter_ref, "parameter_ref" },
|
|
{ OSQLParseNode::parameter, "parameter" },
|
|
{ OSQLParseNode::general_set_fct, "general_set_fct" },
|
|
{ OSQLParseNode::range_variable, "range_variable" },
|
|
{ OSQLParseNode::column, "column" },
|
|
{ OSQLParseNode::delete_statement_positioned, "delete_statement_positioned" },
|
|
{ OSQLParseNode::delete_statement_searched, "delete_statement_searched" },
|
|
{ OSQLParseNode::update_statement_positioned, "update_statement_positioned" },
|
|
{ OSQLParseNode::update_statement_searched, "update_statement_searched" },
|
|
{ OSQLParseNode::assignment_commalist, "assignment_commalist" },
|
|
{ OSQLParseNode::assignment, "assignment" },
|
|
{ OSQLParseNode::values_or_query_spec, "values_or_query_spec" },
|
|
{ OSQLParseNode::insert_statement, "insert_statement" },
|
|
{ OSQLParseNode::insert_atom_commalist, "insert_atom_commalist" },
|
|
{ OSQLParseNode::insert_atom, "insert_atom" },
|
|
{ OSQLParseNode::predicate_check, "predicate_check" },
|
|
{ OSQLParseNode::from_clause, "from_clause" },
|
|
{ OSQLParseNode::qualified_join, "qualified_join" },
|
|
{ OSQLParseNode::cross_union, "cross_union" },
|
|
{ OSQLParseNode::select_sublist, "select_sublist" },
|
|
{ OSQLParseNode::derived_column, "derived_column" },
|
|
{ OSQLParseNode::column_val, "column_val" },
|
|
{ OSQLParseNode::set_fct_spec, "set_fct_spec" },
|
|
{ OSQLParseNode::boolean_term, "boolean_term" },
|
|
{ OSQLParseNode::boolean_primary, "boolean_primary" },
|
|
{ OSQLParseNode::num_value_exp, "num_value_exp" },
|
|
{ OSQLParseNode::join_type, "join_type" },
|
|
{ OSQLParseNode::position_exp, "position_exp" },
|
|
{ OSQLParseNode::extract_exp, "extract_exp" },
|
|
{ OSQLParseNode::length_exp, "length_exp" },
|
|
{ OSQLParseNode::char_value_fct, "char_value_fct" },
|
|
{ OSQLParseNode::odbc_call_spec, "odbc_call_spec" },
|
|
{ OSQLParseNode::in_predicate, "in_predicate" },
|
|
{ OSQLParseNode::existence_test, "existence_test" },
|
|
{ OSQLParseNode::unique_test, "unique_test" },
|
|
{ OSQLParseNode::all_or_any_predicate, "all_or_any_predicate" },
|
|
{ OSQLParseNode::named_columns_join, "named_columns_join" },
|
|
{ OSQLParseNode::join_condition, "join_condition" },
|
|
{ OSQLParseNode::joined_table, "joined_table" },
|
|
{ OSQLParseNode::boolean_factor, "boolean_factor" },
|
|
{ OSQLParseNode::sql_not, "sql_not" },
|
|
{ OSQLParseNode::boolean_test, "boolean_test" },
|
|
{ OSQLParseNode::manipulative_statement, "manipulative_statement" },
|
|
{ OSQLParseNode::subquery, "subquery" },
|
|
{ OSQLParseNode::value_exp_commalist, "value_exp_commalist" },
|
|
{ OSQLParseNode::odbc_fct_spec, "odbc_fct_spec" },
|
|
{ OSQLParseNode::union_statement, "union_statement" },
|
|
{ OSQLParseNode::outer_join_type, "outer_join_type" },
|
|
{ OSQLParseNode::char_value_exp, "char_value_exp" },
|
|
{ OSQLParseNode::term, "term" },
|
|
{ OSQLParseNode::value_exp_primary, "value_exp_primary" },
|
|
{ OSQLParseNode::value_exp, "value_exp" },
|
|
{ OSQLParseNode::selection, "selection" },
|
|
{ OSQLParseNode::fold, "fold" },
|
|
{ OSQLParseNode::char_substring_fct, "char_substring_fct" },
|
|
{ OSQLParseNode::factor, "factor" },
|
|
{ OSQLParseNode::base_table_def, "base_table_def" },
|
|
{ OSQLParseNode::base_table_element_commalist, "base_table_element_commalist" },
|
|
{ OSQLParseNode::data_type, "data_type" },
|
|
{ OSQLParseNode::column_def, "column_def" },
|
|
{ OSQLParseNode::table_node, "table_node" },
|
|
{ OSQLParseNode::as, "as" },
|
|
{ OSQLParseNode::op_column_commalist, "op_column_commalist" },
|
|
{ OSQLParseNode::table_primary_as_range_column, "table_primary_as_range_column" }
|
|
};
|
|
size_t nRuleMapCount = sizeof( aRuleDescriptions ) / sizeof( aRuleDescriptions[0] );
|
|
OSL_ENSURE( nRuleMapCount == size_t( OSQLParseNode::rule_count ), "OSQLParser::OSQLParser: added a new rule? Adjust this map!" );
|
|
|
|
for ( size_t mapEntry = 0; mapEntry < nRuleMapCount; ++mapEntry )
|
|
{
|
|
// look up the rule description in the our identifier map
|
|
sal_uInt32 nParserRuleID = StrToRuleID( aRuleDescriptions[ mapEntry ].sRuleName );
|
|
// map the parser's rule ID to the OSQLParseNode::Rule
|
|
s_aReverseRuleIDLookup[ nParserRuleID ] = aRuleDescriptions[ mapEntry ].eRule;
|
|
// and map the OSQLParseNode::Rule to the parser's rule ID
|
|
s_nRuleIDs[ aRuleDescriptions[ mapEntry ].eRule ] = nParserRuleID;
|
|
}
|
|
}
|
|
++s_nRefCount;
|
|
|
|
if (m_pContext == NULL)
|
|
// take the default context
|
|
m_pContext = &s_aDefaultContext;
|
|
|
|
m_pData->aLocale = m_pContext->getPreferredLocale();
|
|
}
|
|
|
|
//-----------------------------------------------------------------------------
|
|
OSQLParser::~OSQLParser()
|
|
{
|
|
{
|
|
::osl::MutexGuard aGuard(getMutex());
|
|
OSL_ENSURE(s_nRefCount > 0, "OSQLParser::~OSQLParser() : suspicious call : have a refcount of 0 !");
|
|
if (!--s_nRefCount)
|
|
{
|
|
s_pScanner->setScanner(sal_True);
|
|
delete s_pScanner;
|
|
s_pScanner = NULL;
|
|
|
|
delete s_pGarbageCollector;
|
|
s_pGarbageCollector = NULL;
|
|
// is only set the first time so we should delete it only when there no more instances
|
|
s_xLocaleData = NULL;
|
|
|
|
RuleIDMap aEmpty;
|
|
s_aReverseRuleIDLookup.swap( aEmpty );
|
|
}
|
|
m_pParseTree = NULL;
|
|
}
|
|
}
|
|
// -----------------------------------------------------------------------------
|
|
void OSQLParseNode::substituteParameterNames(OSQLParseNode* _pNode)
|
|
{
|
|
RTL_LOGFILE_CONTEXT_AUTHOR( aLogger, "parse", "Ocke.Janssen@sun.com", "OSQLParseNode::substituteParameterNames" );
|
|
sal_Int32 nCount = _pNode->count();
|
|
for(sal_Int32 i=0;i < nCount;++i)
|
|
{
|
|
OSQLParseNode* pChildNode = _pNode->getChild(i);
|
|
if(SQL_ISRULE(pChildNode,parameter) && pChildNode->count() > 1)
|
|
{
|
|
OSQLParseNode* pNewNode = new OSQLParseNode(::rtl::OUString::createFromAscii("?") ,SQL_NODE_PUNCTUATION,0);
|
|
delete pChildNode->replace(pChildNode->getChild(0),pNewNode);
|
|
sal_Int32 nChildCount = pChildNode->count();
|
|
for(sal_Int32 j=1;j < nChildCount;++j)
|
|
delete pChildNode->removeAt(1);
|
|
}
|
|
else
|
|
substituteParameterNames(pChildNode);
|
|
|
|
}
|
|
}
|
|
// -----------------------------------------------------------------------------
|
|
bool OSQLParser::extractDate(OSQLParseNode* pLiteral,double& _rfValue)
|
|
{
|
|
Reference< XNumberFormatsSupplier > xFormatSup = m_xFormatter->getNumberFormatsSupplier();
|
|
Reference< XNumberFormatTypes > xFormatTypes;
|
|
if ( xFormatSup.is() )
|
|
xFormatTypes = xFormatTypes.query( xFormatSup->getNumberFormats() );
|
|
|
|
// if there is no format key, yet, make sure we have a feasible one for our locale
|
|
try
|
|
{
|
|
if ( !m_nFormatKey && xFormatTypes.is() )
|
|
m_nFormatKey = ::dbtools::getDefaultNumberFormat( m_xField, xFormatTypes, m_pData->aLocale );
|
|
}
|
|
catch( Exception& ) { }
|
|
::rtl::OUString sValue = pLiteral->getTokenValue();
|
|
sal_Int32 nTryFormat = m_nFormatKey;
|
|
bool bSuccess = lcl_saveConvertToNumber( m_xFormatter, nTryFormat, sValue, _rfValue );
|
|
|
|
// If our format key didn't do, try the default date format for our locale.
|
|
if ( !bSuccess && xFormatTypes.is() )
|
|
{
|
|
try
|
|
{
|
|
nTryFormat = xFormatTypes->getStandardFormat( NumberFormat::DATE, m_pData->aLocale );
|
|
}
|
|
catch( Exception& ) { }
|
|
bSuccess = lcl_saveConvertToNumber( m_xFormatter, nTryFormat, sValue, _rfValue );
|
|
}
|
|
|
|
// if this also didn't do, try ISO format
|
|
if ( !bSuccess && xFormatTypes.is() )
|
|
{
|
|
try
|
|
{
|
|
nTryFormat = xFormatTypes->getFormatIndex( NumberFormatIndex::DATE_DIN_YYYYMMDD, m_pData->aLocale );
|
|
}
|
|
catch( Exception& ) { }
|
|
bSuccess = lcl_saveConvertToNumber( m_xFormatter, nTryFormat, sValue, _rfValue );
|
|
}
|
|
|
|
// if this also didn't do, try fallback date format (en-US)
|
|
if ( !bSuccess )
|
|
{
|
|
nTryFormat = m_nDateFormatKey;
|
|
bSuccess = lcl_saveConvertToNumber( m_xFormatter, nTryFormat, sValue, _rfValue );
|
|
}
|
|
return bSuccess;
|
|
}
|
|
// -----------------------------------------------------------------------------
|
|
OSQLParseNode* OSQLParser::buildDate(sal_Int32 _nType,OSQLParseNode*& pLiteral)
|
|
{
|
|
// try converting the string into a date, according to our format key
|
|
double fValue = 0.0;
|
|
OSQLParseNode* pFCTNode = NULL;
|
|
|
|
if ( extractDate(pLiteral,fValue) )
|
|
pFCTNode = buildNode_Date( fValue, _nType);
|
|
|
|
delete pLiteral;
|
|
pLiteral = NULL;
|
|
|
|
if ( !pFCTNode )
|
|
m_sErrorMessage = m_pContext->getErrorMessage(IParseContext::ERROR_INVALID_DATE_COMPARE);
|
|
|
|
return pFCTNode;
|
|
}
|
|
// -----------------------------------------------------------------------------
|
|
//-----------------------------------------------------------------------------
|
|
OSQLParseNode::OSQLParseNode(const sal_Char * pNewValue,
|
|
SQLNodeType eNewNodeType,
|
|
sal_uInt32 nNewNodeID)
|
|
:m_pParent(NULL)
|
|
,m_aNodeValue(pNewValue,strlen(pNewValue),RTL_TEXTENCODING_UTF8)
|
|
,m_eNodeType(eNewNodeType)
|
|
,m_nNodeID(nNewNodeID)
|
|
{
|
|
RTL_LOGFILE_CONTEXT_AUTHOR( aLogger, "parse", "Ocke.Janssen@sun.com", "OSQLParseNode::OSQLParseNode" );
|
|
|
|
OSL_ENSURE(m_eNodeType >= SQL_NODE_RULE && m_eNodeType <= SQL_NODE_CONCAT,"OSQLParseNode: mit unzulaessigem NodeType konstruiert");
|
|
}
|
|
//-----------------------------------------------------------------------------
|
|
OSQLParseNode::OSQLParseNode(const ::rtl::OString &_rNewValue,
|
|
SQLNodeType eNewNodeType,
|
|
sal_uInt32 nNewNodeID)
|
|
:m_pParent(NULL)
|
|
,m_aNodeValue(_rNewValue,_rNewValue.getLength(),RTL_TEXTENCODING_UTF8)
|
|
,m_eNodeType(eNewNodeType)
|
|
,m_nNodeID(nNewNodeID)
|
|
{
|
|
RTL_LOGFILE_CONTEXT_AUTHOR( aLogger, "parse", "Ocke.Janssen@sun.com", "OSQLParseNode::OSQLParseNode" );
|
|
|
|
OSL_ENSURE(m_eNodeType >= SQL_NODE_RULE && m_eNodeType <= SQL_NODE_CONCAT,"OSQLParseNode: mit unzulaessigem NodeType konstruiert");
|
|
}
|
|
//-----------------------------------------------------------------------------
|
|
OSQLParseNode::OSQLParseNode(const sal_Unicode * pNewValue,
|
|
SQLNodeType eNewNodeType,
|
|
sal_uInt32 nNewNodeID)
|
|
:m_pParent(NULL)
|
|
,m_aNodeValue(pNewValue)
|
|
,m_eNodeType(eNewNodeType)
|
|
,m_nNodeID(nNewNodeID)
|
|
{
|
|
RTL_LOGFILE_CONTEXT_AUTHOR( aLogger, "parse", "Ocke.Janssen@sun.com", "OSQLParseNode::OSQLParseNode" );
|
|
|
|
OSL_ENSURE(m_eNodeType >= SQL_NODE_RULE && m_eNodeType <= SQL_NODE_CONCAT,"OSQLParseNode: mit unzulaessigem NodeType konstruiert");
|
|
}
|
|
//-----------------------------------------------------------------------------
|
|
OSQLParseNode::OSQLParseNode(const ::rtl::OUString &_rNewValue,
|
|
SQLNodeType eNewNodeType,
|
|
sal_uInt32 nNewNodeID)
|
|
:m_pParent(NULL)
|
|
,m_aNodeValue(_rNewValue)
|
|
,m_eNodeType(eNewNodeType)
|
|
,m_nNodeID(nNewNodeID)
|
|
{
|
|
RTL_LOGFILE_CONTEXT_AUTHOR( aLogger, "parse", "Ocke.Janssen@sun.com", "OSQLParseNode::OSQLParseNode" );
|
|
|
|
OSL_ENSURE(m_eNodeType >= SQL_NODE_RULE && m_eNodeType <= SQL_NODE_CONCAT,"OSQLParseNode: mit unzulaessigem NodeType konstruiert");
|
|
}
|
|
//-----------------------------------------------------------------------------
|
|
OSQLParseNode::OSQLParseNode(const OSQLParseNode& rParseNode)
|
|
{
|
|
RTL_LOGFILE_CONTEXT_AUTHOR( aLogger, "parse", "Ocke.Janssen@sun.com", "OSQLParseNode::OSQLParseNode" );
|
|
|
|
// klemm den getParent auf NULL
|
|
m_pParent = NULL;
|
|
|
|
// kopiere die member
|
|
m_aNodeValue = rParseNode.m_aNodeValue;
|
|
m_eNodeType = rParseNode.m_eNodeType;
|
|
m_nNodeID = rParseNode.m_nNodeID;
|
|
|
|
|
|
// denk dran, dass von Container abgeleitet wurde, laut SV-Help erzeugt
|
|
// copy-Constructor des Containers einen neuen Container mit den gleichen
|
|
// Zeigern als Inhalt -> d.h. nach dem Kopieren des Container wird fuer
|
|
// alle Zeiger ungleich NULL eine Kopie hergestellt und anstelle des alten
|
|
// Zeigers wieder eingehangen.
|
|
|
|
// wenn kein Blatt, dann SubTrees bearbeiten
|
|
for (OSQLParseNodes::const_iterator i = rParseNode.m_aChildren.begin();
|
|
i != rParseNode.m_aChildren.end(); i++)
|
|
append(new OSQLParseNode(**i));
|
|
}
|
|
// -----------------------------------------------------------------------------
|
|
//-----------------------------------------------------------------------------
|
|
OSQLParseNode& OSQLParseNode::operator=(const OSQLParseNode& rParseNode)
|
|
{
|
|
if (this != &rParseNode)
|
|
{
|
|
// kopiere die member - pParent bleibt der alte
|
|
m_aNodeValue = rParseNode.m_aNodeValue;
|
|
m_eNodeType = rParseNode.m_eNodeType;
|
|
m_nNodeID = rParseNode.m_nNodeID;
|
|
|
|
for (OSQLParseNodes::const_iterator i = m_aChildren.begin();
|
|
i != m_aChildren.end(); i++)
|
|
delete *i;
|
|
|
|
m_aChildren.clear();
|
|
|
|
for (OSQLParseNodes::const_iterator j = rParseNode.m_aChildren.begin();
|
|
j != rParseNode.m_aChildren.end(); j++)
|
|
append(new OSQLParseNode(**j));
|
|
}
|
|
return *this;
|
|
}
|
|
|
|
//-----------------------------------------------------------------------------
|
|
sal_Bool OSQLParseNode::operator==(OSQLParseNode& rParseNode) const
|
|
{
|
|
// die member muessen gleich sein
|
|
sal_Bool bResult = (m_nNodeID == rParseNode.m_nNodeID) &&
|
|
(m_eNodeType == rParseNode.m_eNodeType) &&
|
|
(m_aNodeValue == rParseNode.m_aNodeValue) &&
|
|
count() == rParseNode.count();
|
|
|
|
// Parameters are not equal!
|
|
bResult = bResult && !SQL_ISRULE(this, parameter);
|
|
|
|
// compare childs
|
|
for (sal_uInt32 i=0; bResult && i < count(); i++)
|
|
bResult = *getChild(i) == *rParseNode.getChild(i);
|
|
|
|
return bResult;
|
|
}
|
|
|
|
//-----------------------------------------------------------------------------
|
|
OSQLParseNode::~OSQLParseNode()
|
|
{
|
|
for (OSQLParseNodes::const_iterator i = m_aChildren.begin();
|
|
i != m_aChildren.end(); i++)
|
|
delete *i;
|
|
m_aChildren.clear();
|
|
}
|
|
|
|
//-----------------------------------------------------------------------------
|
|
void OSQLParseNode::append(OSQLParseNode* pNewNode)
|
|
{
|
|
RTL_LOGFILE_CONTEXT_AUTHOR( aLogger, "parse", "Ocke.Janssen@sun.com", "OSQLParseNode::append" );
|
|
|
|
OSL_ENSURE(pNewNode != NULL, "OSQLParseNode: ungueltiger NewSubTree");
|
|
OSL_ENSURE(pNewNode->getParent() == NULL, "OSQLParseNode: Knoten ist kein Waise");
|
|
OSL_ENSURE(::std::find(m_aChildren.begin(), m_aChildren.end(), pNewNode) == m_aChildren.end(),
|
|
"OSQLParseNode::append() Node already element of parent");
|
|
|
|
// stelle Verbindung zum getParent her:
|
|
pNewNode->setParent( this );
|
|
// und haenge den SubTree hinten an
|
|
m_aChildren.push_back(pNewNode);
|
|
}
|
|
// -----------------------------------------------------------------------------
|
|
sal_Bool OSQLParseNode::addDateValue(::rtl::OUStringBuffer& rString, const SQLParseNodeParameter& rParam) const
|
|
{
|
|
RTL_LOGFILE_CONTEXT_AUTHOR( aLogger, "parse", "Ocke.Janssen@sun.com", "OSQLParseNode::addDateValue" );
|
|
// special display for date/time values
|
|
if (SQL_ISRULE(this,set_fct_spec) && SQL_ISPUNCTUATION(m_aChildren[0],"{"))
|
|
{
|
|
const OSQLParseNode* pODBCNode = m_aChildren[1];
|
|
const OSQLParseNode* pODBCNodeChild = pODBCNode->m_aChildren[0];
|
|
|
|
if (pODBCNodeChild->getNodeType() == SQL_NODE_KEYWORD && (
|
|
SQL_ISTOKEN(pODBCNodeChild, D) ||
|
|
SQL_ISTOKEN(pODBCNodeChild, T) ||
|
|
SQL_ISTOKEN(pODBCNodeChild, TS) ))
|
|
{
|
|
::rtl::OUString suQuote(::rtl::OUString::createFromAscii("'"));
|
|
if (rParam.bPredicate)
|
|
{
|
|
if (rParam.aMetaData.shouldEscapeDateTime())
|
|
{
|
|
suQuote = ::rtl::OUString::createFromAscii("#");
|
|
}
|
|
}
|
|
else
|
|
{
|
|
if (rParam.aMetaData.shouldEscapeDateTime())
|
|
{
|
|
// suQuote = ::rtl::OUString::createFromAscii("'");
|
|
return sal_False;
|
|
}
|
|
}
|
|
|
|
if (rString.getLength())
|
|
rString.appendAscii(" ");
|
|
rString.append(suQuote);
|
|
const ::rtl::OUString sTokenValue = pODBCNode->m_aChildren[1]->getTokenValue();
|
|
if (SQL_ISTOKEN(pODBCNodeChild, D))
|
|
{
|
|
rString.append(rParam.bPredicate ? convertDateString(rParam, sTokenValue) : sTokenValue);
|
|
}
|
|
else if (SQL_ISTOKEN(pODBCNodeChild, T))
|
|
{
|
|
rString.append(rParam.bPredicate ? convertTimeString(rParam, sTokenValue) : sTokenValue);
|
|
}
|
|
else
|
|
{
|
|
rString.append(rParam.bPredicate ? convertDateTimeString(rParam, sTokenValue) : sTokenValue);
|
|
}
|
|
rString.append(suQuote);
|
|
return sal_True;
|
|
}
|
|
}
|
|
return sal_False;
|
|
}
|
|
// -----------------------------------------------------------------------------
|
|
void OSQLParseNode::replaceNodeValue(const ::rtl::OUString& rTableAlias,const ::rtl::OUString& rColumnName)
|
|
{
|
|
RTL_LOGFILE_CONTEXT_AUTHOR( aLogger, "parse", "Ocke.Janssen@sun.com", "OSQLParseNode::replaceNodeValue" );
|
|
for (sal_uInt32 i=0;i<count();++i)
|
|
{
|
|
if (SQL_ISRULE(this,column_ref) && count() == 1 && getChild(0)->getTokenValue() == rColumnName)
|
|
{
|
|
OSQLParseNode * pCol = removeAt((sal_uInt32)0);
|
|
append(new OSQLParseNode(rTableAlias,SQL_NODE_NAME));
|
|
append(new OSQLParseNode(::rtl::OUString::createFromAscii("."),SQL_NODE_PUNCTUATION));
|
|
append(pCol);
|
|
}
|
|
else
|
|
getChild(i)->replaceNodeValue(rTableAlias,rColumnName);
|
|
}
|
|
}
|
|
//-----------------------------------------------------------------------------
|
|
OSQLParseNode* OSQLParseNode::getByRule(OSQLParseNode::Rule eRule) const
|
|
{
|
|
RTL_LOGFILE_CONTEXT_AUTHOR( aLogger, "parse", "Ocke.Janssen@sun.com", "OSQLParseNode::getByRule" );
|
|
OSQLParseNode* pRetNode = 0;
|
|
if (isRule() && OSQLParser::RuleID(eRule) == getRuleID())
|
|
pRetNode = (OSQLParseNode*)this;
|
|
else
|
|
{
|
|
for (OSQLParseNodes::const_iterator i = m_aChildren.begin();
|
|
!pRetNode && i != m_aChildren.end(); i++)
|
|
pRetNode = (*i)->getByRule(eRule);
|
|
}
|
|
return pRetNode;
|
|
}
|
|
//-----------------------------------------------------------------------------
|
|
OSQLParseNode* MakeANDNode(OSQLParseNode *pLeftLeaf,OSQLParseNode *pRightLeaf)
|
|
{
|
|
OSQLParseNode* pNewNode = new OSQLParseNode(::rtl::OUString(),SQL_NODE_RULE,OSQLParser::RuleID(OSQLParseNode::boolean_term));
|
|
pNewNode->append(pLeftLeaf);
|
|
pNewNode->append(new OSQLParseNode(::rtl::OUString::createFromAscii("AND"),SQL_NODE_KEYWORD,SQL_TOKEN_AND));
|
|
pNewNode->append(pRightLeaf);
|
|
return pNewNode;
|
|
}
|
|
//-----------------------------------------------------------------------------
|
|
OSQLParseNode* MakeORNode(OSQLParseNode *pLeftLeaf,OSQLParseNode *pRightLeaf)
|
|
{
|
|
OSQLParseNode* pNewNode = new OSQLParseNode(::rtl::OUString(),SQL_NODE_RULE,OSQLParser::RuleID(OSQLParseNode::search_condition));
|
|
pNewNode->append(pLeftLeaf);
|
|
pNewNode->append(new OSQLParseNode(::rtl::OUString::createFromAscii("OR"),SQL_NODE_KEYWORD,SQL_TOKEN_OR));
|
|
pNewNode->append(pRightLeaf);
|
|
return pNewNode;
|
|
}
|
|
//-----------------------------------------------------------------------------
|
|
void OSQLParseNode::disjunctiveNormalForm(OSQLParseNode*& pSearchCondition)
|
|
{
|
|
RTL_LOGFILE_CONTEXT_AUTHOR( aLogger, "parse", "Ocke.Janssen@sun.com", "OSQLParseNode::disjunctiveNormalForm" );
|
|
if(!pSearchCondition) // no where condition at entry point
|
|
return;
|
|
|
|
OSQLParseNode::absorptions(pSearchCondition);
|
|
// '(' search_condition ')'
|
|
if (SQL_ISRULE(pSearchCondition,boolean_primary))
|
|
{
|
|
OSQLParseNode* pLeft = pSearchCondition->getChild(1);
|
|
disjunctiveNormalForm(pLeft);
|
|
}
|
|
// search_condition SQL_TOKEN_OR boolean_term
|
|
else if (SQL_ISRULE(pSearchCondition,search_condition))
|
|
{
|
|
OSQLParseNode* pLeft = pSearchCondition->getChild(0);
|
|
disjunctiveNormalForm(pLeft);
|
|
|
|
OSQLParseNode* pRight = pSearchCondition->getChild(2);
|
|
disjunctiveNormalForm(pRight);
|
|
}
|
|
// boolean_term SQL_TOKEN_AND boolean_factor
|
|
else if (SQL_ISRULE(pSearchCondition,boolean_term))
|
|
{
|
|
OSQLParseNode* pLeft = pSearchCondition->getChild(0);
|
|
disjunctiveNormalForm(pLeft);
|
|
|
|
OSQLParseNode* pRight = pSearchCondition->getChild(2);
|
|
disjunctiveNormalForm(pRight);
|
|
|
|
OSQLParseNode* pNewNode = NULL;
|
|
// '(' search_condition ')' on left side
|
|
if(pLeft->count() == 3 && SQL_ISRULE(pLeft,boolean_primary) && SQL_ISRULE(pLeft->getChild(1),search_condition))
|
|
{
|
|
// and-or tree on left side
|
|
OSQLParseNode* pOr = pLeft->getChild(1);
|
|
OSQLParseNode* pNewLeft = NULL;
|
|
OSQLParseNode* pNewRight = NULL;
|
|
|
|
// cut right from parent
|
|
pSearchCondition->removeAt(2);
|
|
|
|
pNewRight = MakeANDNode(pOr->removeAt(2) ,pRight);
|
|
pNewLeft = MakeANDNode(pOr->removeAt((sal_uInt32)0) ,new OSQLParseNode(*pRight));
|
|
pNewNode = MakeORNode(pNewLeft,pNewRight);
|
|
// and append new Node
|
|
replaceAndReset(pSearchCondition,pNewNode);
|
|
|
|
disjunctiveNormalForm(pSearchCondition);
|
|
}
|
|
else if(pRight->count() == 3 && SQL_ISRULE(pRight,boolean_primary) && SQL_ISRULE(pRight->getChild(1),search_condition))
|
|
{ // '(' search_condition ')' on right side
|
|
// and-or tree on right side
|
|
// a and (b or c)
|
|
OSQLParseNode* pOr = pRight->getChild(1);
|
|
OSQLParseNode* pNewLeft = NULL;
|
|
OSQLParseNode* pNewRight = NULL;
|
|
|
|
// cut left from parent
|
|
pSearchCondition->removeAt((sal_uInt32)0);
|
|
|
|
pNewRight = MakeANDNode(pLeft,pOr->removeAt(2));
|
|
pNewLeft = MakeANDNode(new OSQLParseNode(*pLeft),pOr->removeAt((sal_uInt32)0));
|
|
pNewNode = MakeORNode(pNewLeft,pNewRight);
|
|
|
|
// and append new Node
|
|
replaceAndReset(pSearchCondition,pNewNode);
|
|
disjunctiveNormalForm(pSearchCondition);
|
|
}
|
|
else if(SQL_ISRULE(pLeft,boolean_primary) && (!SQL_ISRULE(pLeft->getChild(1),search_condition) || !SQL_ISRULE(pLeft->getChild(1),boolean_term)))
|
|
pSearchCondition->replace(pLeft, pLeft->removeAt(1));
|
|
else if(SQL_ISRULE(pRight,boolean_primary) && (!SQL_ISRULE(pRight->getChild(1),search_condition) || !SQL_ISRULE(pRight->getChild(1),boolean_term)))
|
|
pSearchCondition->replace(pRight, pRight->removeAt(1));
|
|
}
|
|
}
|
|
//-----------------------------------------------------------------------------
|
|
void OSQLParseNode::negateSearchCondition(OSQLParseNode*& pSearchCondition,sal_Bool bNegate)
|
|
{
|
|
RTL_LOGFILE_CONTEXT_AUTHOR( aLogger, "parse", "Ocke.Janssen@sun.com", "OSQLParseNode::negateSearchCondition" );
|
|
if(!pSearchCondition) // no where condition at entry point
|
|
return;
|
|
// '(' search_condition ')'
|
|
if (pSearchCondition->count() == 3 && SQL_ISRULE(pSearchCondition,boolean_primary))
|
|
{
|
|
OSQLParseNode* pRight = pSearchCondition->getChild(1);
|
|
negateSearchCondition(pRight,bNegate);
|
|
}
|
|
// search_condition SQL_TOKEN_OR boolean_term
|
|
else if (SQL_ISRULE(pSearchCondition,search_condition))
|
|
{
|
|
OSQLParseNode* pLeft = pSearchCondition->getChild(0);
|
|
OSQLParseNode* pRight = pSearchCondition->getChild(2);
|
|
if(bNegate)
|
|
{
|
|
OSQLParseNode* pNewNode = new OSQLParseNode(::rtl::OUString(),SQL_NODE_RULE,OSQLParser::RuleID(OSQLParseNode::boolean_term));
|
|
pNewNode->append(pSearchCondition->removeAt((sal_uInt32)0));
|
|
pNewNode->append(new OSQLParseNode(::rtl::OUString::createFromAscii("AND"),SQL_NODE_KEYWORD,SQL_TOKEN_AND));
|
|
pNewNode->append(pSearchCondition->removeAt((sal_uInt32)1));
|
|
replaceAndReset(pSearchCondition,pNewNode);
|
|
|
|
pLeft = pNewNode->getChild(0);
|
|
pRight = pNewNode->getChild(2);
|
|
}
|
|
|
|
negateSearchCondition(pLeft,bNegate);
|
|
negateSearchCondition(pRight,bNegate);
|
|
}
|
|
// boolean_term SQL_TOKEN_AND boolean_factor
|
|
else if (SQL_ISRULE(pSearchCondition,boolean_term))
|
|
{
|
|
OSQLParseNode* pLeft = pSearchCondition->getChild(0);
|
|
OSQLParseNode* pRight = pSearchCondition->getChild(2);
|
|
if(bNegate)
|
|
{
|
|
OSQLParseNode* pNewNode = new OSQLParseNode(::rtl::OUString(),SQL_NODE_RULE,OSQLParser::RuleID(OSQLParseNode::search_condition));
|
|
pNewNode->append(pSearchCondition->removeAt((sal_uInt32)0));
|
|
pNewNode->append(new OSQLParseNode(::rtl::OUString::createFromAscii("OR"),SQL_NODE_KEYWORD,SQL_TOKEN_OR));
|
|
pNewNode->append(pSearchCondition->removeAt((sal_uInt32)1));
|
|
replaceAndReset(pSearchCondition,pNewNode);
|
|
|
|
pLeft = pNewNode->getChild(0);
|
|
pRight = pNewNode->getChild(2);
|
|
}
|
|
|
|
negateSearchCondition(pLeft,bNegate);
|
|
negateSearchCondition(pRight,bNegate);
|
|
}
|
|
// SQL_TOKEN_NOT ( boolean_test )
|
|
else if (SQL_ISRULE(pSearchCondition,boolean_factor))
|
|
{
|
|
OSQLParseNode *pNot = pSearchCondition->removeAt((sal_uInt32)0);
|
|
delete pNot;
|
|
OSQLParseNode *pBooleanTest = pSearchCondition->removeAt((sal_uInt32)0);
|
|
// TODO is this needed // pBooleanTest->setParent(NULL);
|
|
replaceAndReset(pSearchCondition,pBooleanTest);
|
|
|
|
if (!bNegate)
|
|
negateSearchCondition(pSearchCondition,sal_True); // negate all deeper values
|
|
}
|
|
// row_value_constructor comparison row_value_constructor
|
|
// row_value_constructor comparison any_all_some subquery
|
|
else if(bNegate && (SQL_ISRULE(pSearchCondition,comparison_predicate) || SQL_ISRULE(pSearchCondition,all_or_any_predicate)))
|
|
{
|
|
OSQLParseNode* pComparison = pSearchCondition->getChild(1);
|
|
OSQLParseNode* pNewComparison = NULL;
|
|
switch(pComparison->getNodeType())
|
|
{
|
|
case SQL_NODE_EQUAL:
|
|
pNewComparison = new OSQLParseNode(::rtl::OUString::createFromAscii("<>"),SQL_NODE_NOTEQUAL,SQL_NOTEQUAL);
|
|
break;
|
|
case SQL_NODE_LESS:
|
|
pNewComparison = new OSQLParseNode(::rtl::OUString::createFromAscii(">="),SQL_NODE_GREATEQ,SQL_GREATEQ);
|
|
break;
|
|
case SQL_NODE_GREAT:
|
|
pNewComparison = new OSQLParseNode(::rtl::OUString::createFromAscii("<="),SQL_NODE_LESSEQ,SQL_LESSEQ);
|
|
break;
|
|
case SQL_NODE_LESSEQ:
|
|
pNewComparison = new OSQLParseNode(::rtl::OUString::createFromAscii(">"),SQL_NODE_GREAT,SQL_GREAT);
|
|
break;
|
|
case SQL_NODE_GREATEQ:
|
|
pNewComparison = new OSQLParseNode(::rtl::OUString::createFromAscii("<"),SQL_NODE_LESS,SQL_LESS);
|
|
break;
|
|
case SQL_NODE_NOTEQUAL:
|
|
pNewComparison = new OSQLParseNode(::rtl::OUString::createFromAscii("="),SQL_NODE_EQUAL,SQL_EQUAL);
|
|
break;
|
|
default:
|
|
OSL_ENSURE( false, "OSQLParseNode::negateSearchCondition: unexpected node type!" );
|
|
break;
|
|
}
|
|
pSearchCondition->replace(pComparison, pNewComparison);
|
|
delete pComparison;
|
|
}
|
|
|
|
else if(bNegate && (SQL_ISRULE(pSearchCondition,test_for_null) || SQL_ISRULE(pSearchCondition,in_predicate) ||
|
|
SQL_ISRULE(pSearchCondition,between_predicate) || SQL_ISRULE(pSearchCondition,boolean_test) ))
|
|
{
|
|
sal_uInt32 nNotPos = 0;
|
|
// row_value_constructor not SQL_TOKEN_IN in_predicate_value
|
|
// row_value_constructor not SQL_TOKEN_BETWEEN row_value_constructor SQL_TOKEN_AND row_value_constructor
|
|
if ( SQL_ISRULE( pSearchCondition, in_predicate )
|
|
|| SQL_ISRULE( pSearchCondition, between_predicate )
|
|
)
|
|
nNotPos = 1;
|
|
// row_value_constructor SQL_TOKEN_IS not SQL_TOKEN_NULL
|
|
// boolean_primary SQL_TOKEN_IS not truth_value
|
|
else if ( SQL_ISRULE( pSearchCondition, test_for_null )
|
|
|| SQL_ISRULE( pSearchCondition, boolean_test )
|
|
)
|
|
nNotPos = 2;
|
|
|
|
OSQLParseNode* pNot = pSearchCondition->getChild(nNotPos);
|
|
OSQLParseNode* pNotNot = NULL;
|
|
if(pNot->isRule())
|
|
pNotNot = new OSQLParseNode(::rtl::OUString::createFromAscii("NOT"),SQL_NODE_KEYWORD,SQL_TOKEN_NOT);
|
|
else
|
|
pNotNot = new OSQLParseNode(::rtl::OUString(),SQL_NODE_RULE,OSQLParser::RuleID(OSQLParseNode::sql_not));
|
|
pSearchCondition->replace(pNot, pNotNot);
|
|
delete pNot;
|
|
}
|
|
else if(bNegate && (SQL_ISRULE(pSearchCondition,like_predicate)))
|
|
{
|
|
OSQLParseNode* pCheckForNOT = pSearchCondition->getChild( 1 );
|
|
if ( SQL_ISTOKEN(pCheckForNOT,NOT) )
|
|
delete pSearchCondition->removeAt( 1 );
|
|
else
|
|
{
|
|
OSQLParseNode* pNot = new OSQLParseNode( ::rtl::OUString::createFromAscii( "NOT" ), SQL_NODE_KEYWORD, SQL_TOKEN_NOT );
|
|
pSearchCondition->insert( 1, pNot );
|
|
}
|
|
}
|
|
}
|
|
//-----------------------------------------------------------------------------
|
|
void OSQLParseNode::eraseBraces(OSQLParseNode*& pSearchCondition)
|
|
{
|
|
RTL_LOGFILE_CONTEXT_AUTHOR( aLogger, "parse", "Ocke.Janssen@sun.com", "OSQLParseNode::eraseBraces" );
|
|
if (pSearchCondition && (SQL_ISRULE(pSearchCondition,boolean_primary) || (pSearchCondition->count() == 3 && SQL_ISPUNCTUATION(pSearchCondition->getChild(0),"(") &&
|
|
SQL_ISPUNCTUATION(pSearchCondition->getChild(2),")"))))
|
|
{
|
|
OSQLParseNode* pRight = pSearchCondition->getChild(1);
|
|
absorptions(pRight);
|
|
// if child is not a or or and tree then delete () around child
|
|
if(!(SQL_ISRULE(pSearchCondition->getChild(1),boolean_term) || SQL_ISRULE(pSearchCondition->getChild(1),search_condition)) ||
|
|
SQL_ISRULE(pSearchCondition->getChild(1),boolean_term) || // and can always stand without ()
|
|
(SQL_ISRULE(pSearchCondition->getChild(1),search_condition) && SQL_ISRULE(pSearchCondition->getParent(),search_condition)))
|
|
{
|
|
OSQLParseNode* pNode = pSearchCondition->removeAt(1);
|
|
replaceAndReset(pSearchCondition,pNode);
|
|
}
|
|
}
|
|
}
|
|
//-----------------------------------------------------------------------------
|
|
void OSQLParseNode::absorptions(OSQLParseNode*& pSearchCondition)
|
|
{
|
|
RTL_LOGFILE_CONTEXT_AUTHOR( aLogger, "parse", "Ocke.Janssen@sun.com", "OSQLParseNode::absorptions" );
|
|
if(!pSearchCondition) // no where condition at entry point
|
|
return;
|
|
|
|
eraseBraces(pSearchCondition);
|
|
|
|
if(SQL_ISRULE(pSearchCondition,boolean_term) || SQL_ISRULE(pSearchCondition,search_condition))
|
|
{
|
|
OSQLParseNode* pLeft = pSearchCondition->getChild(0);
|
|
absorptions(pLeft);
|
|
OSQLParseNode* pRight = pSearchCondition->getChild(2);
|
|
absorptions(pRight);
|
|
}
|
|
|
|
sal_uInt32 nPos = 0;
|
|
// a and a || a or a
|
|
OSQLParseNode* pNewNode = NULL;
|
|
if(( SQL_ISRULE(pSearchCondition,boolean_term) || SQL_ISRULE(pSearchCondition,search_condition))
|
|
&& *pSearchCondition->getChild(0) == *pSearchCondition->getChild(2))
|
|
{
|
|
pNewNode = pSearchCondition->removeAt((sal_uInt32)0);
|
|
replaceAndReset(pSearchCondition,pNewNode);
|
|
}
|
|
// (a or b) and a || ( b or c ) and a
|
|
// a and ( a or b) || a and ( b or c )
|
|
else if ( SQL_ISRULE(pSearchCondition,boolean_term)
|
|
&& (
|
|
( SQL_ISRULE(pSearchCondition->getChild(nPos = 0),boolean_primary)
|
|
|| SQL_ISRULE(pSearchCondition->getChild(nPos),search_condition)
|
|
)
|
|
|| ( SQL_ISRULE(pSearchCondition->getChild(nPos = 2),boolean_primary)
|
|
|| SQL_ISRULE(pSearchCondition->getChild(nPos),search_condition)
|
|
)
|
|
)
|
|
)
|
|
{
|
|
OSQLParseNode* p2ndSearch = pSearchCondition->getChild(nPos);
|
|
if ( SQL_ISRULE(p2ndSearch,boolean_primary) )
|
|
p2ndSearch = p2ndSearch->getChild(1);
|
|
|
|
if ( *p2ndSearch->getChild(0) == *pSearchCondition->getChild(2-nPos) )
|
|
{
|
|
pNewNode = pSearchCondition->removeAt((sal_uInt32)0);
|
|
replaceAndReset(pSearchCondition,pNewNode);
|
|
|
|
}
|
|
else if ( *p2ndSearch->getChild(2) == *pSearchCondition->getChild(2-nPos) )
|
|
{
|
|
pNewNode = pSearchCondition->removeAt((sal_uInt32)2);
|
|
replaceAndReset(pSearchCondition,pNewNode);
|
|
}
|
|
else if ( p2ndSearch->getByRule(OSQLParseNode::boolean_term) )
|
|
{
|
|
// a and ( b or c ) -> ( a and b ) or ( a and c )
|
|
// ( b or c ) and a -> ( a and b ) or ( a and c )
|
|
OSQLParseNode* pC = p2ndSearch->removeAt((sal_uInt32)2);
|
|
OSQLParseNode* pB = p2ndSearch->removeAt((sal_uInt32)0);
|
|
OSQLParseNode* pA = pSearchCondition->removeAt((sal_uInt32)2-nPos);
|
|
|
|
OSQLParseNode* p1stAnd = MakeANDNode(pA,pB);
|
|
OSQLParseNode* p2ndAnd = MakeANDNode(new OSQLParseNode(*pA),pC);
|
|
pNewNode = MakeORNode(p1stAnd,p2ndAnd);
|
|
replaceAndReset(pSearchCondition,pNewNode);
|
|
}
|
|
}
|
|
// a or a and b || a or b and a
|
|
else if(SQL_ISRULE(pSearchCondition,search_condition) && SQL_ISRULE(pSearchCondition->getChild(2),boolean_term))
|
|
{
|
|
if(*pSearchCondition->getChild(2)->getChild(0) == *pSearchCondition->getChild(0))
|
|
{
|
|
pNewNode = pSearchCondition->removeAt((sal_uInt32)0);
|
|
replaceAndReset(pSearchCondition,pNewNode);
|
|
}
|
|
else if(*pSearchCondition->getChild(2)->getChild(2) == *pSearchCondition->getChild(0))
|
|
{
|
|
pNewNode = pSearchCondition->removeAt((sal_uInt32)0);
|
|
replaceAndReset(pSearchCondition,pNewNode);
|
|
}
|
|
}
|
|
// a and b or a || b and a or a
|
|
else if(SQL_ISRULE(pSearchCondition,search_condition) && SQL_ISRULE(pSearchCondition->getChild(0),boolean_term))
|
|
{
|
|
if(*pSearchCondition->getChild(0)->getChild(0) == *pSearchCondition->getChild(2))
|
|
{
|
|
pNewNode = pSearchCondition->removeAt((sal_uInt32)2);
|
|
replaceAndReset(pSearchCondition,pNewNode);
|
|
}
|
|
else if(*pSearchCondition->getChild(0)->getChild(2) == *pSearchCondition->getChild(2))
|
|
{
|
|
pNewNode = pSearchCondition->removeAt((sal_uInt32)2);
|
|
replaceAndReset(pSearchCondition,pNewNode);
|
|
}
|
|
}
|
|
eraseBraces(pSearchCondition);
|
|
}
|
|
//-----------------------------------------------------------------------------
|
|
void OSQLParseNode::compress(OSQLParseNode *&pSearchCondition)
|
|
{
|
|
RTL_LOGFILE_CONTEXT_AUTHOR( aLogger, "parse", "Ocke.Janssen@sun.com", "OSQLParseNode::compress" );
|
|
if(!pSearchCondition) // no where condition at entry point
|
|
return;
|
|
|
|
OSQLParseNode::eraseBraces(pSearchCondition);
|
|
|
|
if(SQL_ISRULE(pSearchCondition,boolean_term) || SQL_ISRULE(pSearchCondition,search_condition))
|
|
{
|
|
OSQLParseNode* pLeft = pSearchCondition->getChild(0);
|
|
compress(pLeft);
|
|
|
|
OSQLParseNode* pRight = pSearchCondition->getChild(2);
|
|
compress(pRight);
|
|
}
|
|
else if( SQL_ISRULE(pSearchCondition,boolean_primary) || (pSearchCondition->count() == 3 && SQL_ISPUNCTUATION(pSearchCondition->getChild(0),"(") &&
|
|
SQL_ISPUNCTUATION(pSearchCondition->getChild(2),")")))
|
|
{
|
|
OSQLParseNode* pRight = pSearchCondition->getChild(1);
|
|
compress(pRight);
|
|
// if child is not a or or and tree then delete () around child
|
|
if(!(SQL_ISRULE(pSearchCondition->getChild(1),boolean_term) || SQL_ISRULE(pSearchCondition->getChild(1),search_condition)) ||
|
|
(SQL_ISRULE(pSearchCondition->getChild(1),boolean_term) && SQL_ISRULE(pSearchCondition->getParent(),boolean_term)) ||
|
|
(SQL_ISRULE(pSearchCondition->getChild(1),search_condition) && SQL_ISRULE(pSearchCondition->getParent(),search_condition)))
|
|
{
|
|
OSQLParseNode* pNode = pSearchCondition->removeAt(1);
|
|
replaceAndReset(pSearchCondition,pNode);
|
|
}
|
|
}
|
|
|
|
// or with two and trees where one element of the and trees are equal
|
|
if(SQL_ISRULE(pSearchCondition,search_condition) && SQL_ISRULE(pSearchCondition->getChild(0),boolean_term) && SQL_ISRULE(pSearchCondition->getChild(2),boolean_term))
|
|
{
|
|
if(*pSearchCondition->getChild(0)->getChild(0) == *pSearchCondition->getChild(2)->getChild(0))
|
|
{
|
|
OSQLParseNode* pLeft = pSearchCondition->getChild(0)->removeAt(2);
|
|
OSQLParseNode* pRight = pSearchCondition->getChild(2)->removeAt(2);
|
|
OSQLParseNode* pNode = MakeORNode(pLeft,pRight);
|
|
|
|
OSQLParseNode* pNewRule = new OSQLParseNode(::rtl::OUString(),SQL_NODE_RULE,OSQLParser::RuleID(OSQLParseNode::boolean_primary));
|
|
pNewRule->append(new OSQLParseNode(::rtl::OUString::createFromAscii("("),SQL_NODE_PUNCTUATION));
|
|
pNewRule->append(pNode);
|
|
pNewRule->append(new OSQLParseNode(::rtl::OUString::createFromAscii(")"),SQL_NODE_PUNCTUATION));
|
|
|
|
OSQLParseNode::eraseBraces(pLeft);
|
|
OSQLParseNode::eraseBraces(pRight);
|
|
|
|
pNode = MakeANDNode(pSearchCondition->getChild(0)->removeAt((sal_uInt32)0),pNewRule);
|
|
replaceAndReset(pSearchCondition,pNode);
|
|
}
|
|
else if(*pSearchCondition->getChild(0)->getChild(2) == *pSearchCondition->getChild(2)->getChild(0))
|
|
{
|
|
OSQLParseNode* pLeft = pSearchCondition->getChild(0)->removeAt((sal_uInt32)0);
|
|
OSQLParseNode* pRight = pSearchCondition->getChild(2)->removeAt(2);
|
|
OSQLParseNode* pNode = MakeORNode(pLeft,pRight);
|
|
|
|
OSQLParseNode* pNewRule = new OSQLParseNode(::rtl::OUString(),SQL_NODE_RULE,OSQLParser::RuleID(OSQLParseNode::boolean_primary));
|
|
pNewRule->append(new OSQLParseNode(::rtl::OUString::createFromAscii("("),SQL_NODE_PUNCTUATION));
|
|
pNewRule->append(pNode);
|
|
pNewRule->append(new OSQLParseNode(::rtl::OUString::createFromAscii(")"),SQL_NODE_PUNCTUATION));
|
|
|
|
OSQLParseNode::eraseBraces(pLeft);
|
|
OSQLParseNode::eraseBraces(pRight);
|
|
|
|
pNode = MakeANDNode(pSearchCondition->getChild(0)->removeAt(1),pNewRule);
|
|
replaceAndReset(pSearchCondition,pNode);
|
|
}
|
|
else if(*pSearchCondition->getChild(0)->getChild(0) == *pSearchCondition->getChild(2)->getChild(2))
|
|
{
|
|
OSQLParseNode* pLeft = pSearchCondition->getChild(0)->removeAt(2);
|
|
OSQLParseNode* pRight = pSearchCondition->getChild(2)->removeAt((sal_uInt32)0);
|
|
OSQLParseNode* pNode = MakeORNode(pLeft,pRight);
|
|
|
|
OSQLParseNode* pNewRule = new OSQLParseNode(::rtl::OUString(),SQL_NODE_RULE,OSQLParser::RuleID(OSQLParseNode::boolean_primary));
|
|
pNewRule->append(new OSQLParseNode(::rtl::OUString::createFromAscii("("),SQL_NODE_PUNCTUATION));
|
|
pNewRule->append(pNode);
|
|
pNewRule->append(new OSQLParseNode(::rtl::OUString::createFromAscii(")"),SQL_NODE_PUNCTUATION));
|
|
|
|
OSQLParseNode::eraseBraces(pLeft);
|
|
OSQLParseNode::eraseBraces(pRight);
|
|
|
|
pNode = MakeANDNode(pSearchCondition->getChild(0)->removeAt((sal_uInt32)0),pNewRule);
|
|
replaceAndReset(pSearchCondition,pNode);
|
|
}
|
|
else if(*pSearchCondition->getChild(0)->getChild(2) == *pSearchCondition->getChild(2)->getChild(2))
|
|
{
|
|
OSQLParseNode* pLeft = pSearchCondition->getChild(0)->removeAt((sal_uInt32)0);
|
|
OSQLParseNode* pRight = pSearchCondition->getChild(2)->removeAt((sal_uInt32)0);
|
|
OSQLParseNode* pNode = MakeORNode(pLeft,pRight);
|
|
|
|
OSQLParseNode* pNewRule = new OSQLParseNode(::rtl::OUString(),SQL_NODE_RULE,OSQLParser::RuleID(OSQLParseNode::boolean_primary));
|
|
pNewRule->append(new OSQLParseNode(::rtl::OUString::createFromAscii("("),SQL_NODE_PUNCTUATION));
|
|
pNewRule->append(pNode);
|
|
pNewRule->append(new OSQLParseNode(::rtl::OUString::createFromAscii(")"),SQL_NODE_PUNCTUATION));
|
|
|
|
OSQLParseNode::eraseBraces(pLeft);
|
|
OSQLParseNode::eraseBraces(pRight);
|
|
|
|
pNode = MakeANDNode(pSearchCondition->getChild(0)->removeAt(1),pNewRule);
|
|
replaceAndReset(pSearchCondition,pNode);
|
|
}
|
|
}
|
|
}
|
|
#if OSL_DEBUG_LEVEL > 0
|
|
// -----------------------------------------------------------------------------
|
|
void OSQLParseNode::showParseTree( ::rtl::OUString& rString ) const
|
|
{
|
|
::rtl::OUStringBuffer aBuf;
|
|
showParseTree( aBuf, 0 );
|
|
rString = aBuf.makeStringAndClear();
|
|
}
|
|
|
|
// -----------------------------------------------------------------------------
|
|
void OSQLParseNode::showParseTree( ::rtl::OUStringBuffer& _inout_rBuffer, sal_uInt32 nLevel ) const
|
|
{
|
|
RTL_LOGFILE_CONTEXT_AUTHOR( aLogger, "parse", "Ocke.Janssen@sun.com", "OSQLParseNode::showParseTree" );
|
|
|
|
for ( sal_uInt32 j=0; j<nLevel; ++j)
|
|
_inout_rBuffer.appendAscii( " " );
|
|
|
|
if ( !isToken() )
|
|
{
|
|
// Regelnamen als rule: ...
|
|
_inout_rBuffer.appendAscii( "RULE_ID: " );
|
|
_inout_rBuffer.append( (sal_Int32)getRuleID() );
|
|
_inout_rBuffer.append( sal_Unicode( '(' ) );
|
|
_inout_rBuffer.append( OSQLParser::RuleIDToStr( getRuleID() ) );
|
|
_inout_rBuffer.append( sal_Unicode( ')' ) );
|
|
_inout_rBuffer.append( sal_Unicode( '\n' ) );
|
|
|
|
// hol dir den ersten Subtree
|
|
for ( OSQLParseNodes::const_iterator i = m_aChildren.begin();
|
|
i != m_aChildren.end();
|
|
++i
|
|
)
|
|
(*i)->showParseTree( _inout_rBuffer, nLevel+1 );
|
|
}
|
|
else
|
|
{
|
|
// ein Token gefunden
|
|
switch (m_eNodeType)
|
|
{
|
|
|
|
case SQL_NODE_KEYWORD:
|
|
_inout_rBuffer.appendAscii( "SQL_KEYWORD: " );
|
|
_inout_rBuffer.append( ::rtl::OStringToOUString( OSQLParser::TokenIDToStr( getTokenID() ), RTL_TEXTENCODING_UTF8 ) );
|
|
_inout_rBuffer.append( sal_Unicode( '\n' ) );
|
|
break;
|
|
|
|
case SQL_NODE_COMPARISON:
|
|
_inout_rBuffer.appendAscii( "SQL_COMPARISON: " );
|
|
_inout_rBuffer.append( m_aNodeValue );
|
|
_inout_rBuffer.append( sal_Unicode( '\n' ) );
|
|
break;
|
|
|
|
case SQL_NODE_NAME:
|
|
_inout_rBuffer.appendAscii( "SQL_NAME: " );
|
|
_inout_rBuffer.append( sal_Unicode( '"' ) );
|
|
_inout_rBuffer.append( m_aNodeValue );
|
|
_inout_rBuffer.append( sal_Unicode( '"' ) );
|
|
_inout_rBuffer.append( sal_Unicode( '\n' ) );
|
|
break;
|
|
|
|
case SQL_NODE_STRING:
|
|
_inout_rBuffer.appendAscii( "SQL_STRING: " );
|
|
_inout_rBuffer.append( sal_Unicode( '\'' ) );
|
|
_inout_rBuffer.append( m_aNodeValue );
|
|
_inout_rBuffer.append( sal_Unicode( '\'' ) );
|
|
_inout_rBuffer.append( sal_Unicode( '\n' ) );
|
|
break;
|
|
|
|
case SQL_NODE_INTNUM:
|
|
_inout_rBuffer.appendAscii( "SQL_INTNUM: " );
|
|
_inout_rBuffer.append( m_aNodeValue );
|
|
_inout_rBuffer.append( sal_Unicode( '\n' ) );
|
|
break;
|
|
|
|
case SQL_NODE_APPROXNUM:
|
|
_inout_rBuffer.appendAscii( "SQL_APPROXNUM: " );
|
|
_inout_rBuffer.append( m_aNodeValue );
|
|
_inout_rBuffer.append( sal_Unicode( '\n' ) );
|
|
break;
|
|
|
|
case SQL_NODE_PUNCTUATION:
|
|
_inout_rBuffer.appendAscii( "SQL_PUNCTUATION: " );
|
|
_inout_rBuffer.append( m_aNodeValue );
|
|
_inout_rBuffer.append( sal_Unicode( '\n' ) );
|
|
break;
|
|
|
|
case SQL_NODE_AMMSC:
|
|
_inout_rBuffer.appendAscii( "SQL_AMMSC: " );
|
|
_inout_rBuffer.append( m_aNodeValue );
|
|
_inout_rBuffer.append( sal_Unicode( '\n' ) );
|
|
break;
|
|
|
|
case SQL_NODE_EQUAL:
|
|
case SQL_NODE_LESS:
|
|
case SQL_NODE_GREAT:
|
|
case SQL_NODE_LESSEQ:
|
|
case SQL_NODE_GREATEQ:
|
|
case SQL_NODE_NOTEQUAL:
|
|
_inout_rBuffer.append( m_aNodeValue );
|
|
_inout_rBuffer.append( sal_Unicode( '\n' ) );
|
|
break;
|
|
|
|
case SQL_NODE_ACCESS_DATE:
|
|
_inout_rBuffer.appendAscii( "SQL_ACCESS_DATE: " );
|
|
_inout_rBuffer.append( m_aNodeValue );
|
|
_inout_rBuffer.append( sal_Unicode( '\n' ) );
|
|
break;
|
|
|
|
case SQL_NODE_DATE:
|
|
_inout_rBuffer.appendAscii( "SQL_DATE: " );
|
|
_inout_rBuffer.append( m_aNodeValue );
|
|
_inout_rBuffer.append( sal_Unicode( '\n' ) );
|
|
break;
|
|
|
|
case SQL_NODE_CONCAT:
|
|
_inout_rBuffer.appendAscii( "||" );
|
|
_inout_rBuffer.append( sal_Unicode( '\n' ) );
|
|
break;
|
|
|
|
default:
|
|
OSL_TRACE( "-- %i", int( m_eNodeType ) );
|
|
OSL_ENSURE( false, "OSQLParser::ShowParseTree: unzulaessiger NodeType" );
|
|
}
|
|
}
|
|
}
|
|
#endif // OSL_DEBUG_LEVEL > 0
|
|
// -----------------------------------------------------------------------------
|
|
// Insert-Methoden
|
|
//-----------------------------------------------------------------------------
|
|
void OSQLParseNode::insert(sal_uInt32 nPos, OSQLParseNode* pNewSubTree)
|
|
{
|
|
RTL_LOGFILE_CONTEXT_AUTHOR( aLogger, "parse", "Ocke.Janssen@sun.com", "OSQLParseNode::insert" );
|
|
OSL_ENSURE(pNewSubTree != NULL, "OSQLParseNode: ungueltiger NewSubTree");
|
|
OSL_ENSURE(pNewSubTree->getParent() == NULL, "OSQLParseNode: Knoten ist kein Waise");
|
|
|
|
// stelle Verbindung zum getParent her:
|
|
pNewSubTree->setParent( this );
|
|
m_aChildren.insert(m_aChildren.begin() + nPos, pNewSubTree);
|
|
}
|
|
|
|
// removeAt-Methoden
|
|
//-----------------------------------------------------------------------------
|
|
OSQLParseNode* OSQLParseNode::removeAt(sal_uInt32 nPos)
|
|
{
|
|
RTL_LOGFILE_CONTEXT_AUTHOR( aLogger, "parse", "Ocke.Janssen@sun.com", "OSQLParseNode::removeAt" );
|
|
OSL_ENSURE(nPos < m_aChildren.size(),"Illegal position for removeAt");
|
|
OSQLParseNodes::iterator aPos(m_aChildren.begin() + nPos);
|
|
OSQLParseNode* pNode = *aPos;
|
|
|
|
// setze den getParent des removeten auf NULL
|
|
pNode->setParent( NULL );
|
|
|
|
m_aChildren.erase(aPos);
|
|
return pNode;
|
|
}
|
|
//-----------------------------------------------------------------------------
|
|
OSQLParseNode* OSQLParseNode::remove(OSQLParseNode* pSubTree)
|
|
{
|
|
RTL_LOGFILE_CONTEXT_AUTHOR( aLogger, "parse", "Ocke.Janssen@sun.com", "OSQLParseNode::remove" );
|
|
OSL_ENSURE(pSubTree != NULL, "OSQLParseNode: ungueltiger SubTree");
|
|
OSQLParseNodes::iterator aPos = ::std::find(m_aChildren.begin(), m_aChildren.end(), pSubTree);
|
|
if (aPos != m_aChildren.end())
|
|
{
|
|
// setze den getParent des removeten auf NULL
|
|
pSubTree->setParent( NULL );
|
|
m_aChildren.erase(aPos);
|
|
return pSubTree;
|
|
}
|
|
else
|
|
return NULL;
|
|
}
|
|
|
|
// Replace-Methoden
|
|
//-----------------------------------------------------------------------------
|
|
OSQLParseNode* OSQLParseNode::replaceAt(sal_uInt32 nPos, OSQLParseNode* pNewSubNode)
|
|
{
|
|
RTL_LOGFILE_CONTEXT_AUTHOR( aLogger, "parse", "Ocke.Janssen@sun.com", "OSQLParseNode::replaceAt" );
|
|
OSL_ENSURE(pNewSubNode != NULL, "OSQLParseNode: invalid nodes");
|
|
OSL_ENSURE(pNewSubNode->getParent() == NULL, "OSQLParseNode: node already has getParent");
|
|
OSL_ENSURE(nPos < m_aChildren.size(), "OSQLParseNode: invalid position");
|
|
OSL_ENSURE(::std::find(m_aChildren.begin(), m_aChildren.end(), pNewSubNode) == m_aChildren.end(),
|
|
"OSQLParseNode::Replace() Node already element of parent");
|
|
|
|
OSQLParseNode* pOldSubNode = m_aChildren[nPos];
|
|
|
|
// stelle Verbindung zum getParent her:
|
|
pNewSubNode->setParent( this );
|
|
pOldSubNode->setParent( NULL );
|
|
|
|
m_aChildren[nPos] = pNewSubNode;
|
|
return pOldSubNode;
|
|
}
|
|
|
|
//-----------------------------------------------------------------------------
|
|
OSQLParseNode* OSQLParseNode::replace (OSQLParseNode* pOldSubNode, OSQLParseNode* pNewSubNode )
|
|
{
|
|
RTL_LOGFILE_CONTEXT_AUTHOR( aLogger, "parse", "Ocke.Janssen@sun.com", "OSQLParseNode::replace " );
|
|
OSL_ENSURE(pOldSubNode != NULL && pNewSubNode != NULL, "OSQLParseNode: invalid nodes");
|
|
OSL_ENSURE(pNewSubNode->getParent() == NULL, "OSQLParseNode: node already has getParent");
|
|
OSL_ENSURE(::std::find(m_aChildren.begin(), m_aChildren.end(), pOldSubNode) != m_aChildren.end(),
|
|
"OSQLParseNode::Replace() Node not element of parent");
|
|
OSL_ENSURE(::std::find(m_aChildren.begin(), m_aChildren.end(), pNewSubNode) == m_aChildren.end(),
|
|
"OSQLParseNode::Replace() Node already element of parent");
|
|
|
|
pOldSubNode->setParent( NULL );
|
|
pNewSubNode->setParent( this );
|
|
::std::replace(m_aChildren.begin(), m_aChildren.end(), pOldSubNode, pNewSubNode);
|
|
return pOldSubNode;
|
|
}
|
|
// -----------------------------------------------------------------------------
|
|
void OSQLParseNode::parseLeaf(::rtl::OUStringBuffer& rString, const SQLParseNodeParameter& rParam) const
|
|
{
|
|
RTL_LOGFILE_CONTEXT_AUTHOR( aLogger, "parse", "Ocke.Janssen@sun.com", "OSQLParseNode::parseLeaf" );
|
|
// ein Blatt ist gefunden
|
|
// Inhalt dem Ausgabestring anfuegen
|
|
switch (m_eNodeType)
|
|
{
|
|
case SQL_NODE_KEYWORD:
|
|
{
|
|
if (rString.getLength())
|
|
rString.appendAscii(" ");
|
|
|
|
const ::rtl::OString sT = OSQLParser::TokenIDToStr(m_nNodeID, &rParam.m_rContext);
|
|
rString.append(::rtl::OUString(sT,sT.getLength(),RTL_TEXTENCODING_UTF8));
|
|
} break;
|
|
case SQL_NODE_STRING:
|
|
if (rString.getLength())
|
|
rString.appendAscii(" ");
|
|
rString.append(SetQuotation(m_aNodeValue,::rtl::OUString::createFromAscii("\'"),::rtl::OUString::createFromAscii("\'\'")));
|
|
break;
|
|
case SQL_NODE_NAME:
|
|
if (rString.getLength())
|
|
{
|
|
switch(rString.charAt(rString.getLength()-1) )
|
|
{
|
|
case ' ' :
|
|
case '.' : break;
|
|
default :
|
|
if ( !rParam.aMetaData.getCatalogSeparator().getLength()
|
|
|| rString.charAt( rString.getLength()-1 ) != rParam.aMetaData.getCatalogSeparator().toChar()
|
|
)
|
|
rString.appendAscii(" "); break;
|
|
}
|
|
}
|
|
if (rParam.bQuote)
|
|
{
|
|
if (rParam.bPredicate)
|
|
{
|
|
rString.appendAscii("[");
|
|
rString.append(m_aNodeValue);
|
|
rString.appendAscii("]");
|
|
}
|
|
else
|
|
rString.append(SetQuotation(m_aNodeValue,
|
|
rParam.aMetaData.getIdentifierQuoteString(), rParam.aMetaData.getIdentifierQuoteString() ));
|
|
}
|
|
else
|
|
rString.append(m_aNodeValue);
|
|
break;
|
|
case SQL_NODE_ACCESS_DATE:
|
|
if (rString.getLength())
|
|
rString.appendAscii(" ");
|
|
rString.appendAscii("#");
|
|
rString.append(m_aNodeValue);
|
|
rString.appendAscii("#");
|
|
break;
|
|
case SQL_NODE_INTNUM:
|
|
case SQL_NODE_APPROXNUM:
|
|
{
|
|
::rtl::OUString aTmp = m_aNodeValue;
|
|
if (rParam.bInternational && rParam.bPredicate && rParam.cDecSep != '.')
|
|
aTmp = aTmp.replace('.', rParam.cDecSep);
|
|
|
|
if (rString.getLength())
|
|
rString.appendAscii(" ");
|
|
rString.append(aTmp);
|
|
|
|
} break;
|
|
// fall through
|
|
default:
|
|
if (rString.getLength() && m_aNodeValue.toChar() != '.' && m_aNodeValue.toChar() != ':' )
|
|
{
|
|
switch( rString.charAt(rString.getLength()-1) )
|
|
{
|
|
case ' ' :
|
|
case '.' : break;
|
|
default :
|
|
if ( !rParam.aMetaData.getCatalogSeparator().getLength()
|
|
|| rString.charAt( rString.getLength()-1 ) != rParam.aMetaData.getCatalogSeparator().toChar()
|
|
)
|
|
rString.appendAscii(" "); break;
|
|
}
|
|
}
|
|
rString.append(m_aNodeValue);
|
|
}
|
|
}
|
|
|
|
// -----------------------------------------------------------------------------
|
|
sal_Int32 OSQLParser::getFunctionReturnType(const ::rtl::OUString& _sFunctionName, const IParseContext* pContext)
|
|
{
|
|
sal_Int32 nType = DataType::VARCHAR;
|
|
::rtl::OString sFunctionName(_sFunctionName,_sFunctionName.getLength(),RTL_TEXTENCODING_UTF8);
|
|
|
|
if(sFunctionName.equalsIgnoreAsciiCase(TokenIDToStr(SQL_TOKEN_ASCII,pContext))) nType = DataType::INTEGER;
|
|
else if(sFunctionName.equalsIgnoreAsciiCase(TokenIDToStr(SQL_TOKEN_BIT_LENGTH,pContext))) nType = DataType::INTEGER;
|
|
else if(sFunctionName.equalsIgnoreAsciiCase(TokenIDToStr(SQL_TOKEN_CHAR,pContext))) nType = DataType::VARCHAR;
|
|
else if(sFunctionName.equalsIgnoreAsciiCase(TokenIDToStr(SQL_TOKEN_CHAR_LENGTH,pContext))) nType = DataType::INTEGER;
|
|
else if(sFunctionName.equalsIgnoreAsciiCase(TokenIDToStr(SQL_TOKEN_CHARACTER_LENGTH,pContext))) nType = DataType::INTEGER;
|
|
else if(sFunctionName.equalsIgnoreAsciiCase(TokenIDToStr(SQL_TOKEN_CONCAT,pContext))) nType = DataType::VARCHAR;
|
|
else if(sFunctionName.equalsIgnoreAsciiCase(TokenIDToStr(SQL_TOKEN_DIFFERENCE,pContext))) nType = DataType::VARCHAR;
|
|
else if(sFunctionName.equalsIgnoreAsciiCase(TokenIDToStr(SQL_TOKEN_INSERT,pContext))) nType = DataType::VARCHAR;
|
|
else if(sFunctionName.equalsIgnoreAsciiCase(TokenIDToStr(SQL_TOKEN_LCASE,pContext))) nType = DataType::VARCHAR;
|
|
else if(sFunctionName.equalsIgnoreAsciiCase(TokenIDToStr(SQL_TOKEN_LEFT,pContext))) nType = DataType::VARCHAR;
|
|
else if(sFunctionName.equalsIgnoreAsciiCase(TokenIDToStr(SQL_TOKEN_LENGTH,pContext))) nType = DataType::INTEGER;
|
|
else if(sFunctionName.equalsIgnoreAsciiCase(TokenIDToStr(SQL_TOKEN_LOCATE,pContext))) nType = DataType::VARCHAR;
|
|
else if(sFunctionName.equalsIgnoreAsciiCase(TokenIDToStr(SQL_TOKEN_LOCATE_2,pContext))) nType = DataType::VARCHAR;
|
|
else if(sFunctionName.equalsIgnoreAsciiCase(TokenIDToStr(SQL_TOKEN_LTRIM,pContext))) nType = DataType::VARCHAR;
|
|
else if(sFunctionName.equalsIgnoreAsciiCase(TokenIDToStr(SQL_TOKEN_OCTET_LENGTH,pContext))) nType = DataType::INTEGER;
|
|
else if(sFunctionName.equalsIgnoreAsciiCase(TokenIDToStr(SQL_TOKEN_POSITION,pContext))) nType = DataType::INTEGER;
|
|
else if(sFunctionName.equalsIgnoreAsciiCase(TokenIDToStr(SQL_TOKEN_REPEAT,pContext))) nType = DataType::VARCHAR;
|
|
else if(sFunctionName.equalsIgnoreAsciiCase(TokenIDToStr(SQL_TOKEN_REPLACE,pContext))) nType = DataType::VARCHAR;
|
|
else if(sFunctionName.equalsIgnoreAsciiCase(TokenIDToStr(SQL_TOKEN_RIGHT,pContext))) nType = DataType::VARCHAR;
|
|
else if(sFunctionName.equalsIgnoreAsciiCase(TokenIDToStr(SQL_TOKEN_RTRIM,pContext))) nType = DataType::VARCHAR;
|
|
else if(sFunctionName.equalsIgnoreAsciiCase(TokenIDToStr(SQL_TOKEN_SOUNDEX,pContext))) nType = DataType::VARCHAR;
|
|
else if(sFunctionName.equalsIgnoreAsciiCase(TokenIDToStr(SQL_TOKEN_SPACE,pContext))) nType = DataType::VARCHAR;
|
|
else if(sFunctionName.equalsIgnoreAsciiCase(TokenIDToStr(SQL_TOKEN_SUBSTRING,pContext))) nType = DataType::VARCHAR;
|
|
else if(sFunctionName.equalsIgnoreAsciiCase(TokenIDToStr(SQL_TOKEN_UCASE,pContext))) nType = DataType::VARCHAR;
|
|
else if(sFunctionName.equalsIgnoreAsciiCase(TokenIDToStr(SQL_TOKEN_CURRENT_DATE,pContext))) nType = DataType::DATE;
|
|
else if(sFunctionName.equalsIgnoreAsciiCase(TokenIDToStr(SQL_TOKEN_CURRENT_TIME,pContext))) nType = DataType::TIME;
|
|
else if(sFunctionName.equalsIgnoreAsciiCase(TokenIDToStr(SQL_TOKEN_CURRENT_TIMESTAMP,pContext))) nType = DataType::TIMESTAMP;
|
|
else if(sFunctionName.equalsIgnoreAsciiCase(TokenIDToStr(SQL_TOKEN_CURDATE,pContext))) nType = DataType::DATE;
|
|
else if(sFunctionName.equalsIgnoreAsciiCase(TokenIDToStr(SQL_TOKEN_DATEDIFF,pContext))) nType = DataType::INTEGER;
|
|
else if(sFunctionName.equalsIgnoreAsciiCase(TokenIDToStr(SQL_TOKEN_DATEVALUE,pContext))) nType = DataType::DATE;
|
|
else if(sFunctionName.equalsIgnoreAsciiCase(TokenIDToStr(SQL_TOKEN_CURTIME,pContext))) nType = DataType::TIME;
|
|
else if(sFunctionName.equalsIgnoreAsciiCase(TokenIDToStr(SQL_TOKEN_DAYNAME,pContext))) nType = DataType::VARCHAR;
|
|
else if(sFunctionName.equalsIgnoreAsciiCase(TokenIDToStr(SQL_TOKEN_DAYOFMONTH,pContext))) nType = DataType::INTEGER;
|
|
else if(sFunctionName.equalsIgnoreAsciiCase(TokenIDToStr(SQL_TOKEN_DAYOFWEEK,pContext))) nType = DataType::INTEGER;
|
|
else if(sFunctionName.equalsIgnoreAsciiCase(TokenIDToStr(SQL_TOKEN_DAYOFYEAR,pContext))) nType = DataType::INTEGER;
|
|
else if(sFunctionName.equalsIgnoreAsciiCase(TokenIDToStr(SQL_TOKEN_EXTRACT,pContext))) nType = DataType::VARCHAR;
|
|
else if(sFunctionName.equalsIgnoreAsciiCase(TokenIDToStr(SQL_TOKEN_HOUR,pContext))) nType = DataType::INTEGER;
|
|
else if(sFunctionName.equalsIgnoreAsciiCase(TokenIDToStr(SQL_TOKEN_MINUTE,pContext))) nType = DataType::INTEGER;
|
|
else if(sFunctionName.equalsIgnoreAsciiCase(TokenIDToStr(SQL_TOKEN_MONTH,pContext))) nType = DataType::INTEGER;
|
|
else if(sFunctionName.equalsIgnoreAsciiCase(TokenIDToStr(SQL_TOKEN_MONTHNAME,pContext))) nType = DataType::VARCHAR;
|
|
else if(sFunctionName.equalsIgnoreAsciiCase(TokenIDToStr(SQL_TOKEN_NOW,pContext))) nType = DataType::TIMESTAMP;
|
|
else if(sFunctionName.equalsIgnoreAsciiCase(TokenIDToStr(SQL_TOKEN_QUARTER,pContext))) nType = DataType::INTEGER;
|
|
else if(sFunctionName.equalsIgnoreAsciiCase(TokenIDToStr(SQL_TOKEN_SECOND,pContext))) nType = DataType::INTEGER;
|
|
else if(sFunctionName.equalsIgnoreAsciiCase(TokenIDToStr(SQL_TOKEN_TIMESTAMPADD,pContext))) nType = DataType::TIMESTAMP;
|
|
else if(sFunctionName.equalsIgnoreAsciiCase(TokenIDToStr(SQL_TOKEN_TIMESTAMPDIFF,pContext))) nType = DataType::TIMESTAMP;
|
|
else if(sFunctionName.equalsIgnoreAsciiCase(TokenIDToStr(SQL_TOKEN_TIMEVALUE,pContext))) nType = DataType::TIMESTAMP;
|
|
else if(sFunctionName.equalsIgnoreAsciiCase(TokenIDToStr(SQL_TOKEN_WEEK,pContext))) nType = DataType::INTEGER;
|
|
else if(sFunctionName.equalsIgnoreAsciiCase(TokenIDToStr(SQL_TOKEN_YEAR,pContext))) nType = DataType::INTEGER;
|
|
else if(sFunctionName.equalsIgnoreAsciiCase(TokenIDToStr(SQL_TOKEN_ABS,pContext))) nType = DataType::DOUBLE;
|
|
else if(sFunctionName.equalsIgnoreAsciiCase(TokenIDToStr(SQL_TOKEN_ACOS,pContext))) nType = DataType::DOUBLE;
|
|
else if(sFunctionName.equalsIgnoreAsciiCase(TokenIDToStr(SQL_TOKEN_ASIN,pContext))) nType = DataType::DOUBLE;
|
|
else if(sFunctionName.equalsIgnoreAsciiCase(TokenIDToStr(SQL_TOKEN_ATAN,pContext))) nType = DataType::DOUBLE;
|
|
else if(sFunctionName.equalsIgnoreAsciiCase(TokenIDToStr(SQL_TOKEN_ATAN2,pContext))) nType = DataType::DOUBLE;
|
|
else if(sFunctionName.equalsIgnoreAsciiCase(TokenIDToStr(SQL_TOKEN_CEILING,pContext))) nType = DataType::DOUBLE;
|
|
else if(sFunctionName.equalsIgnoreAsciiCase(TokenIDToStr(SQL_TOKEN_COS,pContext))) nType = DataType::DOUBLE;
|
|
else if(sFunctionName.equalsIgnoreAsciiCase(TokenIDToStr(SQL_TOKEN_COT,pContext))) nType = DataType::DOUBLE;
|
|
else if(sFunctionName.equalsIgnoreAsciiCase(TokenIDToStr(SQL_TOKEN_DEGREES,pContext))) nType = DataType::DOUBLE;
|
|
else if(sFunctionName.equalsIgnoreAsciiCase(TokenIDToStr(SQL_TOKEN_EXP,pContext))) nType = DataType::DOUBLE;
|
|
else if(sFunctionName.equalsIgnoreAsciiCase(TokenIDToStr(SQL_TOKEN_FLOOR,pContext))) nType = DataType::DOUBLE;
|
|
else if(sFunctionName.equalsIgnoreAsciiCase(TokenIDToStr(SQL_TOKEN_LOGF,pContext))) nType = DataType::DOUBLE;
|
|
else if(sFunctionName.equalsIgnoreAsciiCase(TokenIDToStr(SQL_TOKEN_LOG,pContext))) nType = DataType::DOUBLE;
|
|
else if(sFunctionName.equalsIgnoreAsciiCase(TokenIDToStr(SQL_TOKEN_LOG10,pContext))) nType = DataType::DOUBLE;
|
|
else if(sFunctionName.equalsIgnoreAsciiCase(TokenIDToStr(SQL_TOKEN_LN,pContext))) nType = DataType::DOUBLE;
|
|
else if(sFunctionName.equalsIgnoreAsciiCase(TokenIDToStr(SQL_TOKEN_MOD,pContext))) nType = DataType::DOUBLE;
|
|
else if(sFunctionName.equalsIgnoreAsciiCase(TokenIDToStr(SQL_TOKEN_PI,pContext))) nType = DataType::DOUBLE;
|
|
else if(sFunctionName.equalsIgnoreAsciiCase(TokenIDToStr(SQL_TOKEN_POWER,pContext))) nType = DataType::DOUBLE;
|
|
else if(sFunctionName.equalsIgnoreAsciiCase(TokenIDToStr(SQL_TOKEN_RADIANS,pContext))) nType = DataType::DOUBLE;
|
|
else if(sFunctionName.equalsIgnoreAsciiCase(TokenIDToStr(SQL_TOKEN_RAND,pContext))) nType = DataType::DOUBLE;
|
|
else if(sFunctionName.equalsIgnoreAsciiCase(TokenIDToStr(SQL_TOKEN_ROUND,pContext))) nType = DataType::DOUBLE;
|
|
else if(sFunctionName.equalsIgnoreAsciiCase(TokenIDToStr(SQL_TOKEN_ROUNDMAGIC,pContext))) nType = DataType::DOUBLE;
|
|
else if(sFunctionName.equalsIgnoreAsciiCase(TokenIDToStr(SQL_TOKEN_SIGN,pContext))) nType = DataType::DOUBLE;
|
|
else if(sFunctionName.equalsIgnoreAsciiCase(TokenIDToStr(SQL_TOKEN_SIN,pContext))) nType = DataType::DOUBLE;
|
|
else if(sFunctionName.equalsIgnoreAsciiCase(TokenIDToStr(SQL_TOKEN_SQRT,pContext))) nType = DataType::DOUBLE;
|
|
else if(sFunctionName.equalsIgnoreAsciiCase(TokenIDToStr(SQL_TOKEN_TAN,pContext))) nType = DataType::DOUBLE;
|
|
else if(sFunctionName.equalsIgnoreAsciiCase(TokenIDToStr(SQL_TOKEN_TRUNCATE,pContext))) nType = DataType::DOUBLE;
|
|
else if(sFunctionName.equalsIgnoreAsciiCase(TokenIDToStr(SQL_TOKEN_COUNT,pContext))) nType = DataType::INTEGER;
|
|
else if(sFunctionName.equalsIgnoreAsciiCase(TokenIDToStr(SQL_TOKEN_MAX,pContext))) nType = DataType::DOUBLE;
|
|
else if(sFunctionName.equalsIgnoreAsciiCase(TokenIDToStr(SQL_TOKEN_MIN,pContext))) nType = DataType::DOUBLE;
|
|
else if(sFunctionName.equalsIgnoreAsciiCase(TokenIDToStr(SQL_TOKEN_AVG,pContext))) nType = DataType::DOUBLE;
|
|
else if(sFunctionName.equalsIgnoreAsciiCase(TokenIDToStr(SQL_TOKEN_SUM,pContext))) nType = DataType::DOUBLE;
|
|
else if(sFunctionName.equalsIgnoreAsciiCase(TokenIDToStr(SQL_TOKEN_LOWER,pContext))) nType = DataType::VARCHAR;
|
|
else if(sFunctionName.equalsIgnoreAsciiCase(TokenIDToStr(SQL_TOKEN_UPPER,pContext))) nType = DataType::VARCHAR;
|
|
|
|
return nType;
|
|
}
|
|
// -----------------------------------------------------------------------------
|
|
sal_Int32 OSQLParser::getFunctionParameterType(sal_uInt32 _nTokenId, sal_uInt32 _nPos)
|
|
{
|
|
sal_Int32 nType = DataType::VARCHAR;
|
|
|
|
if(_nTokenId == SQL_TOKEN_CHAR) nType = DataType::INTEGER;
|
|
else if(_nTokenId == SQL_TOKEN_INSERT)
|
|
{
|
|
if ( _nPos == 2 || _nPos == 3 )
|
|
nType = DataType::INTEGER;
|
|
}
|
|
else if(_nTokenId == SQL_TOKEN_LEFT)
|
|
{
|
|
if ( _nPos == 2 )
|
|
nType = DataType::INTEGER;
|
|
}
|
|
else if(_nTokenId == SQL_TOKEN_LOCATE)
|
|
{
|
|
if ( _nPos == 3 )
|
|
nType = DataType::INTEGER;
|
|
}
|
|
else if(_nTokenId == SQL_TOKEN_LOCATE_2)
|
|
{
|
|
if ( _nPos == 3 )
|
|
nType = DataType::INTEGER;
|
|
}
|
|
else if( _nTokenId == SQL_TOKEN_REPEAT || _nTokenId == SQL_TOKEN_RIGHT )
|
|
{
|
|
if ( _nPos == 2 )
|
|
nType = DataType::INTEGER;
|
|
}
|
|
else if(_nTokenId == SQL_TOKEN_SPACE )
|
|
{
|
|
nType = DataType::INTEGER;
|
|
}
|
|
else if(_nTokenId == SQL_TOKEN_SUBSTRING)
|
|
{
|
|
if ( _nPos != 1 )
|
|
nType = DataType::INTEGER;
|
|
}
|
|
else if(_nTokenId == SQL_TOKEN_DATEDIFF)
|
|
{
|
|
if ( _nPos != 1 )
|
|
nType = DataType::TIMESTAMP;
|
|
}
|
|
else if(_nTokenId == SQL_TOKEN_DATEVALUE)
|
|
nType = DataType::DATE;
|
|
else if(_nTokenId == SQL_TOKEN_DAYNAME)
|
|
nType = DataType::DATE;
|
|
else if(_nTokenId == SQL_TOKEN_DAYOFMONTH)
|
|
nType = DataType::DATE;
|
|
else if(_nTokenId == SQL_TOKEN_DAYOFWEEK)
|
|
nType = DataType::DATE;
|
|
else if(_nTokenId == SQL_TOKEN_DAYOFYEAR)
|
|
nType = DataType::DATE;
|
|
else if(_nTokenId == SQL_TOKEN_EXTRACT) nType = DataType::VARCHAR;
|
|
else if(_nTokenId == SQL_TOKEN_HOUR) nType = DataType::TIME;
|
|
else if(_nTokenId == SQL_TOKEN_MINUTE) nType = DataType::TIME;
|
|
else if(_nTokenId == SQL_TOKEN_MONTH) nType = DataType::DATE;
|
|
else if(_nTokenId == SQL_TOKEN_MONTHNAME) nType = DataType::DATE;
|
|
else if(_nTokenId == SQL_TOKEN_NOW) nType = DataType::TIMESTAMP;
|
|
else if(_nTokenId == SQL_TOKEN_QUARTER) nType = DataType::DATE;
|
|
else if(_nTokenId == SQL_TOKEN_SECOND) nType = DataType::TIME;
|
|
else if(_nTokenId == SQL_TOKEN_TIMESTAMPADD) nType = DataType::TIMESTAMP;
|
|
else if(_nTokenId == SQL_TOKEN_TIMESTAMPDIFF) nType = DataType::TIMESTAMP;
|
|
else if(_nTokenId == SQL_TOKEN_TIMEVALUE) nType = DataType::TIMESTAMP;
|
|
else if(_nTokenId == SQL_TOKEN_WEEK) nType = DataType::DATE;
|
|
else if(_nTokenId == SQL_TOKEN_YEAR) nType = DataType::DATE;
|
|
|
|
else if(_nTokenId == SQL_TOKEN_ABS) nType = DataType::DOUBLE;
|
|
else if(_nTokenId == SQL_TOKEN_ACOS) nType = DataType::DOUBLE;
|
|
else if(_nTokenId == SQL_TOKEN_ASIN) nType = DataType::DOUBLE;
|
|
else if(_nTokenId == SQL_TOKEN_ATAN) nType = DataType::DOUBLE;
|
|
else if(_nTokenId == SQL_TOKEN_ATAN2) nType = DataType::DOUBLE;
|
|
else if(_nTokenId == SQL_TOKEN_CEILING) nType = DataType::DOUBLE;
|
|
else if(_nTokenId == SQL_TOKEN_COS) nType = DataType::DOUBLE;
|
|
else if(_nTokenId == SQL_TOKEN_COT) nType = DataType::DOUBLE;
|
|
else if(_nTokenId == SQL_TOKEN_DEGREES) nType = DataType::DOUBLE;
|
|
else if(_nTokenId == SQL_TOKEN_EXP) nType = DataType::DOUBLE;
|
|
else if(_nTokenId == SQL_TOKEN_FLOOR) nType = DataType::DOUBLE;
|
|
else if(_nTokenId == SQL_TOKEN_LOGF) nType = DataType::DOUBLE;
|
|
else if(_nTokenId == SQL_TOKEN_LOG) nType = DataType::DOUBLE;
|
|
else if(_nTokenId == SQL_TOKEN_LOG10) nType = DataType::DOUBLE;
|
|
else if(_nTokenId == SQL_TOKEN_LN) nType = DataType::DOUBLE;
|
|
else if(_nTokenId == SQL_TOKEN_MOD) nType = DataType::DOUBLE;
|
|
else if(_nTokenId == SQL_TOKEN_PI) nType = DataType::DOUBLE;
|
|
else if(_nTokenId == SQL_TOKEN_POWER) nType = DataType::DOUBLE;
|
|
else if(_nTokenId == SQL_TOKEN_RADIANS) nType = DataType::DOUBLE;
|
|
else if(_nTokenId == SQL_TOKEN_RAND) nType = DataType::DOUBLE;
|
|
else if(_nTokenId == SQL_TOKEN_ROUND) nType = DataType::DOUBLE;
|
|
else if(_nTokenId == SQL_TOKEN_ROUNDMAGIC) nType = DataType::DOUBLE;
|
|
else if(_nTokenId == SQL_TOKEN_SIGN) nType = DataType::DOUBLE;
|
|
else if(_nTokenId == SQL_TOKEN_SIN) nType = DataType::DOUBLE;
|
|
else if(_nTokenId == SQL_TOKEN_SQRT) nType = DataType::DOUBLE;
|
|
else if(_nTokenId == SQL_TOKEN_TAN) nType = DataType::DOUBLE;
|
|
else if(_nTokenId == SQL_TOKEN_TRUNCATE) nType = DataType::DOUBLE;
|
|
else if(_nTokenId == SQL_TOKEN_COUNT) nType = DataType::INTEGER;
|
|
else if(_nTokenId == SQL_TOKEN_MAX) nType = DataType::DOUBLE;
|
|
else if(_nTokenId == SQL_TOKEN_MIN) nType = DataType::DOUBLE;
|
|
else if(_nTokenId == SQL_TOKEN_AVG) nType = DataType::DOUBLE;
|
|
else if(_nTokenId == SQL_TOKEN_SUM) nType = DataType::DOUBLE;
|
|
|
|
else if(_nTokenId == SQL_TOKEN_LOWER) nType = DataType::VARCHAR;
|
|
else if(_nTokenId == SQL_TOKEN_UPPER) nType = DataType::VARCHAR;
|
|
|
|
return nType;
|
|
}
|
|
|
|
// -----------------------------------------------------------------------------
|
|
const SQLError& OSQLParser::getErrorHelper() const
|
|
{
|
|
return m_pData->aErrors;
|
|
}
|
|
|
|
// -----------------------------------------------------------------------------
|
|
OSQLParseNode::Rule OSQLParseNode::getKnownRuleID() const
|
|
{
|
|
if ( !isRule() )
|
|
return UNKNOWN_RULE;
|
|
return OSQLParser::RuleIDToRule( getRuleID() );
|
|
}
|
|
// -----------------------------------------------------------------------------
|
|
::rtl::OUString OSQLParseNode::getTableRange(const OSQLParseNode* _pTableRef)
|
|
{
|
|
RTL_LOGFILE_CONTEXT_AUTHOR( aLogger, "parse", "Ocke.Janssen@sun.com", "OSQLParseNode::getTableRange" );
|
|
OSL_ENSURE(_pTableRef && _pTableRef->count() > 1 && _pTableRef->getKnownRuleID() == OSQLParseNode::table_ref,"Invalid node give, only table ref is allowed!");
|
|
const sal_uInt32 nCount = _pTableRef->count();
|
|
::rtl::OUString sTableRange;
|
|
if ( nCount == 2 || (nCount == 3 && !_pTableRef->getChild(0)->isToken()) || nCount == 5 )
|
|
{
|
|
const OSQLParseNode* pNode = _pTableRef->getChild(nCount - (nCount == 2 ? 1 : 2));
|
|
OSL_ENSURE(pNode && (pNode->getKnownRuleID() == OSQLParseNode::table_primary_as_range_column
|
|
|| pNode->getKnownRuleID() == OSQLParseNode::range_variable)
|
|
,"SQL grammar changed!");
|
|
if ( !pNode->isLeaf() )
|
|
sTableRange = pNode->getChild(1)->getTokenValue();
|
|
} // if ( nCount == 2 || nCount == 3 || nCount == 5)
|
|
|
|
return sTableRange;
|
|
}
|
|
// -----------------------------------------------------------------------------
|
|
OSQLParseNodesContainer::OSQLParseNodesContainer()
|
|
{
|
|
}
|
|
// -----------------------------------------------------------------------------
|
|
OSQLParseNodesContainer::~OSQLParseNodesContainer()
|
|
{
|
|
}
|
|
// -----------------------------------------------------------------------------
|
|
void OSQLParseNodesContainer::push_back(OSQLParseNode* _pNode)
|
|
{
|
|
::osl::MutexGuard aGuard(m_aMutex);
|
|
m_aNodes.push_back(_pNode);
|
|
}
|
|
// -----------------------------------------------------------------------------
|
|
void OSQLParseNodesContainer::erase(OSQLParseNode* _pNode)
|
|
{
|
|
::osl::MutexGuard aGuard(m_aMutex);
|
|
if ( !m_aNodes.empty() )
|
|
{
|
|
::std::vector< OSQLParseNode* >::iterator aFind = ::std::find(m_aNodes.begin(), m_aNodes.end(),_pNode);
|
|
if ( aFind != m_aNodes.end() )
|
|
m_aNodes.erase(aFind);
|
|
}
|
|
}
|
|
// -----------------------------------------------------------------------------
|
|
bool OSQLParseNodesContainer::empty() const
|
|
{
|
|
return m_aNodes.empty();
|
|
}
|
|
// -----------------------------------------------------------------------------
|
|
void OSQLParseNodesContainer::clear()
|
|
{
|
|
::osl::MutexGuard aGuard(m_aMutex);
|
|
m_aNodes.clear();
|
|
}
|
|
// -----------------------------------------------------------------------------
|
|
void OSQLParseNodesContainer::clearAndDelete()
|
|
{
|
|
::osl::MutexGuard aGuard(m_aMutex);
|
|
// clear the garbage collector
|
|
while ( !m_aNodes.empty() )
|
|
{
|
|
OSQLParseNode* pNode = m_aNodes[0];
|
|
while ( pNode->getParent() )
|
|
{
|
|
pNode = pNode->getParent();
|
|
}
|
|
delete pNode;
|
|
}
|
|
}
|
|
} // namespace connectivity
|