office-gobmx/connectivity/source/drivers/file/fanalyzer.cxx

363 lines
14 KiB
C++
Raw Normal View History

2000-10-05 02:39:29 -05:00
/*************************************************************************
*
* $RCSfile: fanalyzer.cxx,v $
*
* $Revision: 1.20 $
2000-10-05 02:39:29 -05:00
*
* last change: $Author: obo $ $Date: 2003-09-04 08:26:11 $
2000-10-05 02:39:29 -05:00
*
* The Contents of this file are made available subject to the terms of
* either of the following licenses
*
* - GNU Lesser General Public License Version 2.1
* - Sun Industry Standards Source License Version 1.1
*
* Sun Microsystems Inc., October, 2000
*
* GNU Lesser General Public License Version 2.1
* =============================================
* Copyright 2000 by Sun Microsystems, Inc.
* 901 San Antonio Road, Palo Alto, CA 94303, USA
*
* This library is free software; you can redistribute it and/or
* modify it under the terms of the GNU Lesser General Public
* License version 2.1, as published by the Free Software Foundation.
*
* This library 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 for more details.
*
* You should have received a copy of the GNU Lesser General Public
* License along with this library; if not, write to the Free Software
* Foundation, Inc., 59 Temple Place, Suite 330, Boston,
* MA 02111-1307 USA
*
*
* Sun Industry Standards Source License Version 1.1
* =================================================
* The contents of this file are subject to the Sun Industry Standards
* Source License Version 1.1 (the "License"); You may not use this file
* except in compliance with the License. You may obtain a copy of the
* License at http://www.openoffice.org/license.html.
*
* Software provided under this License is provided on an "AS IS" basis,
2000-10-05 02:48:24 -05:00
* WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING,
* WITHOUT LIMITATION, WARRANTIES THAT THE SOFTWARE IS FREE OF DEFECTS,
2000-10-05 02:39:29 -05:00
* MERCHANTABLE, FIT FOR A PARTICULAR PURPOSE, OR NON-INFRINGING.
* See the License for the specific provisions governing your rights and
* obligations concerning the Software.
*
2000-10-05 02:48:24 -05:00
* The Initial Developer of the Original Code is: Sun Microsystems, Inc.
2000-10-05 02:39:29 -05:00
*
* Copyright: 2000 by Sun Microsystems, Inc.
*
* All Rights Reserved.
*
* Contributor(s): _______________________________________
*
*
************************************************************************/
#ifndef _CONNECTIVITY_FILE_FANALYZER_HXX_
#include "file/fanalyzer.hxx"
#endif
#ifndef _CONNECTIVITY_SQLPARSE_HXX
#include "connectivity/sqlparse.hxx"
#endif
#ifndef _OSL_DIAGNOSE_H_
#include <osl/diagnose.h>
#endif
2000-10-19 05:56:36 -05:00
#ifndef _TOOLS_DEBUG_HXX
#include <tools/debug.hxx>
#endif
#ifndef _COMPHELPER_EXTRACT_HXX_
#include <comphelper/extract.hxx>
2001-02-14 00:22:50 -06:00
#endif
#ifndef _CONNECTIVITY_SQLNODE_HXX
#include "connectivity/sqlnode.hxx"
#endif
#ifndef _DBHELPER_DBEXCEPTION_HXX_
#include "connectivity/dbexception.hxx"
#endif
2000-10-19 05:56:36 -05:00
2000-10-05 02:39:29 -05:00
using namespace ::connectivity;
using namespace ::connectivity::file;
2000-10-05 02:39:29 -05:00
using namespace ::com::sun::star::uno;
using namespace ::com::sun::star::beans;
2000-10-05 02:39:29 -05:00
using namespace ::com::sun::star::sdbc;
using namespace ::com::sun::star::container;
2002-01-16 01:44:56 -06:00
DBG_NAME( file_OSQLAnalyzer )
2000-10-05 02:39:29 -05:00
//------------------------------------------------------------------
OSQLAnalyzer::OSQLAnalyzer()
: m_bSelectionFirstTime(sal_True)
, m_bHasSelectionCode(sal_False)
{
2002-01-16 01:44:56 -06:00
DBG_CTOR( file_OSQLAnalyzer, NULL );
m_aCompiler = new OPredicateCompiler(this);
m_aInterpreter = new OPredicateInterpreter(m_aCompiler);
}
// -----------------------------------------------------------------------------
OSQLAnalyzer::~OSQLAnalyzer()
{
2002-01-16 01:44:56 -06:00
DBG_DTOR( file_OSQLAnalyzer, NULL );
}
// -----------------------------------------------------------------------------
void OSQLAnalyzer::setIndexes(const Reference< XNameAccess>& _xIndexes)
{
m_aCompiler->m_xIndexes = _xIndexes;
}
2000-10-05 02:39:29 -05:00
//------------------------------------------------------------------
void OSQLAnalyzer::start(OSQLParseNode* pSQLParseNode)
{
if (SQL_ISRULE(pSQLParseNode,select_statement))
{
DBG_ASSERT(pSQLParseNode->count() >= 4,"OFILECursor: Fehler im Parse Tree");
// check that we don't use anything other than count(*) as function
OSQLParseNode* pSelection = pSQLParseNode->getChild(2);
if ( SQL_ISRULE(pSelection,scalar_exp_commalist) )
{
for (sal_uInt32 i = 0; i < pSelection->count(); i++)
{
OSQLParseNode *pColumnRef = pSelection->getChild(i)->getChild(0);
if ( ( SQL_ISRULE(pColumnRef,set_fct_spec) && pColumnRef->count() == 4 )
|| SQL_ISRULE(pColumnRef,char_value_fct)
|| SQL_ISRULE(pColumnRef,char_substring_fct)
|| SQL_ISRULE(pColumnRef,position_exp)
|| SQL_ISRULE(pColumnRef,fold)
|| SQL_ISRULE(pColumnRef,length_exp)
|| SQL_ISRULE(pColumnRef,set_fct_spec) )
{
::vos::ORef<OPredicateCompiler> pCompiler = new OPredicateCompiler(this);
pCompiler->setOrigColumns(m_aCompiler->getOrigColumns());
::vos::ORef<OPredicateInterpreter> pInterpreter = new OPredicateInterpreter(pCompiler);
pCompiler->execute( pColumnRef );
m_aSelectionEvaluations.push_back( TPredicates(pCompiler,pInterpreter) );
}
else if ( ( SQL_ISRULE(pColumnRef,general_set_fct) && pColumnRef->count() != 4 ) )
{
::dbtools::throwGenericSQLException(::rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("Statement to complex. Only \"COUNT(*)\" is supported.")),NULL);
}
else
m_aSelectionEvaluations.push_back( TPredicates() );
}
}
}
m_aCompiler->start(pSQLParseNode);
2000-10-05 02:39:29 -05:00
}
//------------------------------------------------------------------
void OSQLAnalyzer::bindRow(OCodeList& rCodeList,const OValueRefRow& _pRow,OEvaluateSetList& _rEvaluateSetList)
2000-10-05 02:39:29 -05:00
{
// Zaehlen, wieviele Kriterien
// wenn nur ein Kriterium, und das entsprechende Feld ist indiziert
// dann wird der Index verwendet
OEvaluateSet* pEvaluateSet = NULL;
for (OCodeList::iterator aIter = rCodeList.begin(); aIter != rCodeList.end(); ++aIter)
{
OOperandAttr* pAttr = PTR_CAST(OOperandAttr,(*aIter));
if (pAttr)
{
if (pAttr->isIndexed() && !m_aCompiler->hasORCondition())
2000-10-05 02:39:29 -05:00
{
OCode* pCode1 = *(aIter + 1);
OCode* pCode2 = *(aIter + 2);
if (PTR_CAST(OOperand,pCode1))
pEvaluateSet = pAttr->preProcess(PTR_CAST(OBoolOperator,pCode2), PTR_CAST(OOperand,pCode1));
else
pEvaluateSet = pAttr->preProcess(PTR_CAST(OBoolOperator,pCode1));
}
if (pEvaluateSet)
{
_rEvaluateSetList.push_back(pEvaluateSet);
2000-10-05 02:39:29 -05:00
pEvaluateSet = NULL;
}
2001-05-08 07:26:37 -05:00
pAttr->bindValue(_pRow);
2000-10-05 02:39:29 -05:00
}
}
}
//------------------------------------------------------------------
void OSQLAnalyzer::bindSelectRow(const OValueRefRow& _pRow)
{
// first the select part
OEvaluateSetList aEvaluateSetList;
for ( ::std::vector< TPredicates >::iterator aIter = m_aSelectionEvaluations.begin(); aIter != m_aSelectionEvaluations.end();++aIter)
{
if ( aIter->first.isValid() )
bindRow( aIter->first->m_aCodeList,_pRow,aEvaluateSetList);
}
}
//------------------------------------------------------------------
::std::vector<sal_Int32>* OSQLAnalyzer::bindEvaluationRow(OValueRefRow& _pRow)
{
OEvaluateSetList aEvaluateSetList;
bindRow( m_aCompiler->m_aCodeList,_pRow,aEvaluateSetList);
::std::vector<sal_Int32>* pKeySet = NULL;
OEvaluateSet* pEvaluateSet = NULL;
2000-10-05 02:39:29 -05:00
// Keyset erzeugen mit kleinster Liste
2001-10-01 05:24:29 -05:00
if(!aEvaluateSetList.empty())
2000-10-05 02:39:29 -05:00
{
// welche Liste hat den kleinsten count ?
OEvaluateSetList::iterator i = aEvaluateSetList.begin();
pEvaluateSet = *(i);
for(++i; i != aEvaluateSetList.end();++i)
{
OEvaluateSet* pEvaluateSetComp = (*i);
for(OEvaluateSet::reverse_iterator j = pEvaluateSet->rbegin(); j != pEvaluateSet->rend(); ++j)
{
if (pEvaluateSetComp->find(j->second) != pEvaluateSetComp->end())
pEvaluateSet->erase(j->second);
}
}
pKeySet = new ::std::vector<sal_Int32>(pEvaluateSet->size());
sal_Int32 k=0;
for(OEvaluateSet::iterator j = pEvaluateSet->begin(); j != pEvaluateSet->end(); ++j,++k)
{
(*pKeySet)[k] = j->second;
}
// alle loeschen
for(i = aEvaluateSetList.begin(); i != aEvaluateSetList.end();++i)
delete (*i);
}
return pKeySet;
}
//------------------------------------------------------------------
void OSQLAnalyzer::describeParam(::vos::ORef<OSQLColumns> rParameterColumns)
{
OCodeList& rCodeList = m_aCompiler->m_aCodeList;
2000-10-05 02:39:29 -05:00
OCodeStack aCodeStack;
if (!rCodeList.size())
return; // kein Pr<50>dikat
if (!rParameterColumns->size())
return; // keine Parameter
// Anlegen von Columns, die eine genauere Beschreibung f<>r die enthalten
::vos::ORef<OSQLColumns> aNewParamColumns = new OSQLColumns(*rParameterColumns);
2001-05-08 07:26:37 -05:00
// Anlegen einer Testzeile, wird ben<65>tigt um die Parameter zu beschreiben
OValueRefRow aParameterRow = new OValueRefVector(rParameterColumns->size());
2000-10-05 02:39:29 -05:00
bindParameterRow(aParameterRow);
OValueRefRow aTestRow = new OValueRefVector(Reference< XIndexAccess>(m_aCompiler->getOrigColumns(),UNO_QUERY)->getCount());
delete bindEvaluationRow(aTestRow); // Binden der Attribute an die Values
2001-05-08 07:26:37 -05:00
2000-10-05 02:39:29 -05:00
for(OCodeList::iterator aIter = rCodeList.begin(); aIter != rCodeList.end(); ++aIter)
{
OOperand* pOperand = PTR_CAST(OOperand,(*aIter));
OOperator* pOperator = PTR_CAST(OOperator,(*aIter));
if (pOperand)
aCodeStack.push(pOperand);
else
{
if (pOperator->getRequestedOperands() == 2) // bei zwei Operatoren ist es m<>glich
{ // einen Parameter weiter zu spezifizieren
OOperandParam *pParam = PTR_CAST(OOperandParam,aCodeStack.top());
if (pParam) // Anpassen des ParameterTyps, wenn der linke Operand ein Attribut ist
{
OOperandAttr *pLeft = PTR_CAST(OOperandAttr,*(rCodeList.end() - 2));
if (pLeft)
{
Reference< XPropertySet> xCol;
Reference< XIndexAccess>(m_aCompiler->getOrigColumns(),UNO_QUERY)->getByIndex(pLeft->getRowPos()) >>= xCol;
2001-03-20 09:49:26 -06:00
OSL_ENSURE(xCol.is(), "Ung<EFBFBD>ltige Struktur");
2000-10-05 02:39:29 -05:00
pParam->describe(xCol, aNewParamColumns);
}
}
}
pOperator->Exec(aCodeStack);
}
}
OOperand* pOperand = aCodeStack.top();
aCodeStack.pop();
2001-03-20 09:49:26 -06:00
OSL_ENSURE(aCodeStack.size() == 0, "StackFehler");
OSL_ENSURE(pOperand, "StackFehler");
2000-10-05 02:39:29 -05:00
if (IS_TYPE(OOperandResult,pOperand))
delete pOperand;
else
OSL_ENSURE(0,"Illegal here!");
2000-10-05 02:39:29 -05:00
rParameterColumns = aNewParamColumns;
// m_aCompiler->setParameterColumns(rParameterColumns);
2000-10-05 02:39:29 -05:00
}
2001-04-30 04:16:19 -05:00
// -----------------------------------------------------------------------------
OOperandAttr* OSQLAnalyzer::createOperandAttr(sal_Int32 _nPos,
const Reference< XPropertySet>& _xCol,
const Reference< XNameAccess>& _xIndexes)
2001-04-30 04:16:19 -05:00
{
return new OOperandAttr(static_cast<sal_uInt16>(_nPos),_xCol);
2001-04-30 04:16:19 -05:00
}
// -----------------------------------------------------------------------------
2001-06-27 04:02:11 -05:00
BOOL OSQLAnalyzer::hasRestriction() const
{
return m_aCompiler->hasCode();
2001-06-27 04:02:11 -05:00
}
// -----------------------------------------------------------------------------
BOOL OSQLAnalyzer::hasFunctions() const
{
if ( m_bSelectionFirstTime )
{
m_bSelectionFirstTime = sal_False;
for ( ::std::vector< TPredicates >::const_iterator aIter = m_aSelectionEvaluations.begin(); aIter != m_aSelectionEvaluations.end() && !m_bHasSelectionCode ;++aIter)
{
if ( aIter->first.isValid() )
m_bHasSelectionCode = aIter->first->hasCode();
}
}
return m_bHasSelectionCode;;
}
// -----------------------------------------------------------------------------
void OSQLAnalyzer::setSelectionEvaluationResult(OValueRefRow& _pRow,const ::std::vector<sal_Int32>& _rColumnMapping)
{
sal_Int32 nPos = 1;
for ( ::std::vector< TPredicates >::iterator aIter = m_aSelectionEvaluations.begin(); aIter != m_aSelectionEvaluations.end();++aIter,++nPos)
{
if ( aIter->second.isValid() )
{
sal_Int32 map = nPos;
// the first column (index 0) is for convenience only. The first real select column is no 1.
if ( (nPos > 0) && (nPos < static_cast<sal_Int32>(_rColumnMapping.size())) )
map = _rColumnMapping[nPos];
aIter->second->startSelection((*_pRow)[map]);
}
}
}
// -----------------------------------------------------------------------------
void OSQLAnalyzer::dispose()
{
m_aCompiler->dispose();
for ( ::std::vector< TPredicates >::iterator aIter = m_aSelectionEvaluations.begin(); aIter != m_aSelectionEvaluations.end();++aIter)
{
if ( aIter->first.isValid() )
aIter->first->dispose();
}
}
// -----------------------------------------------------------------------------
void OSQLAnalyzer::setOrigColumns(const OFileColumns& rCols)
{
m_aCompiler->setOrigColumns(rCols);
for ( ::std::vector< TPredicates >::iterator aIter = m_aSelectionEvaluations.begin(); aIter != m_aSelectionEvaluations.end();++aIter)
{
if ( aIter->first.isValid() )
aIter->first->setOrigColumns(rCols);
}
}
// -----------------------------------------------------------------------------