connectivity/source/drivers/calc/CDatabaseMetaData.cxx

   1 /*************************************************************************
   2  *
   3  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
   4  *
   5  * Copyright 2008 by Sun Microsystems, Inc.
   6  *
   7  * OpenOffice.org - a multi-platform office productivity suite
   8  *
   9  * $RCSfile: CDatabaseMetaData.cxx,v $
  10  * $Revision: 1.20 $
  11  *
  12  * This file is part of OpenOffice.org.
  13  *
  14  * OpenOffice.org is free software: you can redistribute it and/or modify
  15  * it under the terms of the GNU Lesser General Public License version 3
  16  * only, as published by the Free Software Foundation.
  17  *
  18  * OpenOffice.org is distributed in the hope that it will be useful,
  19  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  20  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  21  * GNU Lesser General Public License version 3 for more details
  22  * (a copy is included in the LICENSE file that accompanied this code).
  23  *
  24  * You should have received a copy of the GNU Lesser General Public License
  25  * version 3 along with OpenOffice.org.  If not, see
  26  * <http://www.openoffice.org/license.html>
  27  * for a copy of the LGPLv3 License.
  28  *
  29  ************************************************************************/
  30
  31 // MARKER(update_precomp.py): autogen include statement, do not remove
  32 #include "precompiled_connectivity.hxx"
  33
  34
  35 #include "calc/CDatabaseMetaData.hxx"
  36 #include "calc/CConnection.hxx"
  37 #include <com/sun/star/sdbc/DataType.hpp>
  38 #include <com/sun/star/sdbc/ResultSetType.hpp>
  39 #include <com/sun/star/sdbc/ColumnValue.hpp>
  40 #include <com/sun/star/beans/XPropertySet.hpp>
  41 #include <com/sun/star/sdbc/ResultSetConcurrency.hpp>
  42 #include <com/sun/star/sdbcx/XColumnsSupplier.hpp>
  43 #include <com/sun/star/sdbcx/XIndexesSupplier.hpp>
  44 #include <com/sun/star/sheet/XSpreadsheetDocument.hpp>
  45 #include <com/sun/star/sheet/XSpreadsheet.hpp>
  46 #include <com/sun/star/sheet/XCellRangesQuery.hpp>
  47 #include <com/sun/star/sheet/XCellRangeAddressable.hpp>
  48 #include <com/sun/star/sheet/XDatabaseRanges.hpp>
  49 #include <com/sun/star/sheet/XDatabaseRange.hpp>
  50 #include <tools/urlobj.hxx>
  51 #include "FDatabaseMetaDataResultSet.hxx"
  52 #include <com/sun/star/lang/XUnoTunnel.hpp>
  53 #include <comphelper/types.hxx>
  54 #include <rtl/logfile.hxx>
  55
  56 using namespace connectivity::calc;
  57 using namespace connectivity::file;
  58 using namespace ::com::sun::star::uno;
  59 using namespace ::com::sun::star::beans;
  60 using namespace ::com::sun::star::sdbcx;
  61 using namespace ::com::sun::star::sdbc;
  62 using namespace ::com::sun::star::container;
  63 using namespace ::com::sun::star::table;
  64 using namespace ::com::sun::star::sheet;
  65
  66 // -------------------------------------------------------------------------
  67
  68 OCalcDatabaseMetaData::OCalcDatabaseMetaData(OConnection* _pCon)        :ODatabaseMetaData(_pCon)
  69 {
  70     RTL_LOGFILE_CONTEXT_AUTHOR( aLogger, "calc", "Ocke.Janssen@sun.com", "OCalcDatabaseMetaData::OCalcDatabaseMetaData" );
  71 }
  72
  73 // -------------------------------------------------------------------------
  74
  75 OCalcDatabaseMetaData::~OCalcDatabaseMetaData()
  76 {
  77 }
  78
  79 // -------------------------------------------------------------------------
  80 Reference< XResultSet > OCalcDatabaseMetaData::impl_getTypeInfo_throw(  )
  81 {
  82     RTL_LOGFILE_CONTEXT_AUTHOR( aLogger, "calc", "Ocke.Janssen@sun.com", "OCalcDatabaseMetaData::impl_getTypeInfo_throw" );
  83     ::osl::MutexGuard aGuard( m_aMutex );
  84
  85     ODatabaseMetaDataResultSet* pResult = new ODatabaseMetaDataResultSet(::connectivity::ODatabaseMetaDataResultSet::eTypeInfo);
  86     Reference< XResultSet > xRef = pResult;
  87
  88     static ODatabaseMetaDataResultSet::ORows aRows;
  89     if(aRows.empty())
  90     {
  91         ODatabaseMetaDataResultSet::ORow aRow;
  92
  93         aRows.reserve(6);
  94         aRow.reserve(18);
  95
  96         aRow.push_back(ODatabaseMetaDataResultSet::getEmptyValue());
  97         aRow.push_back(new ORowSetValueDecorator(::rtl::OUString::createFromAscii("VARCHAR")));
  98         aRow.push_back(new ORowSetValueDecorator(DataType::VARCHAR));
  99         aRow.push_back(new ORowSetValueDecorator((sal_Int32)65535));
 100         aRow.push_back(ODatabaseMetaDataResultSet::getQuoteValue());
 101         aRow.push_back(ODatabaseMetaDataResultSet::getQuoteValue());
 102         aRow.push_back(ODatabaseMetaDataResultSet::getEmptyValue());
 103         aRow.push_back(ODatabaseMetaDataResultSet::get1Value()); // ORowSetValue((sal_Int32)ColumnValue::NULLABLE)
 104         aRow.push_back(ODatabaseMetaDataResultSet::get1Value());
 105         aRow.push_back(new ORowSetValueDecorator((sal_Int32)ColumnSearch::CHAR));
 106         aRow.push_back(ODatabaseMetaDataResultSet::get1Value());
 107         aRow.push_back(ODatabaseMetaDataResultSet::get0Value());
 108         aRow.push_back(ODatabaseMetaDataResultSet::get0Value());
 109         aRow.push_back(ODatabaseMetaDataResultSet::getEmptyValue());
 110         aRow.push_back(ODatabaseMetaDataResultSet::get0Value());
 111         aRow.push_back(ODatabaseMetaDataResultSet::get0Value());
 112         aRow.push_back(ODatabaseMetaDataResultSet::getEmptyValue());
 113         aRow.push_back(ODatabaseMetaDataResultSet::getEmptyValue());
 114         aRow.push_back(new ORowSetValueDecorator((sal_Int32)10));
 115
 116
 117         aRows.push_back(aRow);
 118
 119         aRow[1] = new ORowSetValueDecorator(::rtl::OUString::createFromAscii("DECIMAL"));
 120         aRow[2] = new ORowSetValueDecorator(DataType::DECIMAL);
 121         aRow[3] = ODatabaseMetaDataResultSet::get0Value();
 122         aRow[9] = ODatabaseMetaDataResultSet::getBasicValue();
 123         aRow[15] = ODatabaseMetaDataResultSet::get0Value();
 124         aRows.push_back(aRow);
 125
 126         aRow[1] = new ORowSetValueDecorator(::rtl::OUString::createFromAscii("BOOL"));
 127         aRow[2] = new ORowSetValueDecorator(DataType::BIT);
 128         aRow[3] = new ORowSetValueDecorator((sal_Int32)20);
 129         aRow[9] = ODatabaseMetaDataResultSet::getBasicValue();
 130         aRow[15] = new ORowSetValueDecorator((sal_Int32)15);
 131         aRows.push_back(aRow);
 132
 133         aRow[1] = new ORowSetValueDecorator(::rtl::OUString::createFromAscii("DATE"));
 134         aRow[2] = new ORowSetValueDecorator(DataType::DATE);
 135         aRow[3] = ODatabaseMetaDataResultSet::get0Value();
 136         aRow[9] = ODatabaseMetaDataResultSet::getBasicValue();
 137         aRow[15] = ODatabaseMetaDataResultSet::get0Value();
 138         aRows.push_back(aRow);
 139
 140         aRow[1] = new ORowSetValueDecorator(::rtl::OUString::createFromAscii("TIME"));
 141         aRow[2] = new ORowSetValueDecorator(DataType::TIME);
 142         aRow[3] = ODatabaseMetaDataResultSet::get0Value();
 143         aRow[9] = ODatabaseMetaDataResultSet::getBasicValue();
 144         aRow[15] = ODatabaseMetaDataResultSet::get0Value();
 145         aRows.push_back(aRow);
 146
 147         aRow[1] = new ORowSetValueDecorator(::rtl::OUString::createFromAscii("TIMESTAMP"));
 148         aRow[2] = new ORowSetValueDecorator(DataType::TIMESTAMP);
 149         aRow[3] = ODatabaseMetaDataResultSet::get0Value();
 150         aRow[9] = ODatabaseMetaDataResultSet::getBasicValue();
 151         aRow[15] = ODatabaseMetaDataResultSet::get0Value();
 152         aRows.push_back(aRow);
 153     }
 154
 155     pResult->setRows(aRows);
 156     return xRef;
 157 }
 158
 159 // -------------------------------------------------------------------------
 160
 161 Reference< XResultSet > SAL_CALL OCalcDatabaseMetaData::getColumns(
 162     const Any& /*catalog*/, const ::rtl::OUString& /*schemaPattern*/, const ::rtl::OUString& tableNamePattern,
 163         const ::rtl::OUString& columnNamePattern ) throw(SQLException, RuntimeException)
 164 {
 165     RTL_LOGFILE_CONTEXT_AUTHOR( aLogger, "calc", "Ocke.Janssen@sun.com", "OCalcDatabaseMetaData::getColumns" );
 166     ::osl::MutexGuard aGuard( m_aMutex );
 167
 168
 169     Reference< XTablesSupplier > xTables = m_pConnection->createCatalog();
 170     if(!xTables.is())
 171         throw SQLException();
 172
 173     Reference< XNameAccess> xNames = xTables->getTables();
 174     if(!xNames.is())
 175         throw SQLException();
 176
 177     ODatabaseMetaDataResultSet::ORows aRows;
 178     ODatabaseMetaDataResultSet::ORow  aRow(19);
 179
 180     aRow[10] = new ORowSetValueDecorator((sal_Int32)10);
 181
 182     Sequence< ::rtl::OUString> aTabNames(xNames->getElementNames());
 183     const ::rtl::OUString* pTabIter     = aTabNames.getConstArray();
 184     const ::rtl::OUString* pTabEnd              = pTabIter + aTabNames.getLength();
 185     for(;pTabIter != pTabEnd;++pTabIter)
 186     {
 187         if(match(tableNamePattern,*pTabIter,'\0'))
 188         {
 189             const Reference< XColumnsSupplier> xTable(xNames->getByName(*pTabIter),UNO_QUERY_THROW);
 190             OSL_ENSURE(xTable.is(),"Table not found! Normallya exception had to be thrown here!");
 191             aRow[3] = new ORowSetValueDecorator(*pTabIter);
 192
 193             const Reference< XNameAccess> xColumns = xTable->getColumns();
 194             if(!xColumns.is())
 195                 throw SQLException();
 196
 197             const Sequence< ::rtl::OUString> aColNames(xColumns->getElementNames());
 198
 199             const ::rtl::OUString* pColumnIter = aColNames.getConstArray();
 200             const ::rtl::OUString* pEnd = pColumnIter + aColNames.getLength();
 201             Reference< XPropertySet> xColumn;
 202             for(sal_Int32 i=1;pColumnIter != pEnd;++pColumnIter,++i)
 203             {
 204                 if(match(columnNamePattern,*pColumnIter,'\0'))
 205                 {
 206                     aRow[4]  = new ORowSetValueDecorator( *pColumnIter);
 207
 208                     xColumns->getByName(*pColumnIter) >>= xColumn;
 209                     OSL_ENSURE(xColumn.is(),"Columns contains a column who isn't a fastpropertyset!");
 210                     aRow[5] = new ORowSetValueDecorator(::comphelper::getINT32(xColumn->getPropertyValue(OMetaConnection::getPropMap().getNameByIndex(PROPERTY_ID_TYPE))));
 211                     aRow[6] = new ORowSetValueDecorator(::comphelper::getString(xColumn->getPropertyValue(OMetaConnection::getPropMap().getNameByIndex(PROPERTY_ID_TYPENAME))));
 212                     aRow[7] = new ORowSetValueDecorator(::comphelper::getINT32(xColumn->getPropertyValue(OMetaConnection::getPropMap().getNameByIndex(PROPERTY_ID_PRECISION))));
 213                     //  aRow[8] = xColumn->getPropertyValue(OMetaConnection::getPropMap().getNameByIndex(PROPERTY_ID_TYPENAME));
 214                     aRow[9] = new ORowSetValueDecorator(::comphelper::getINT32(xColumn->getPropertyValue(OMetaConnection::getPropMap().getNameByIndex(PROPERTY_ID_SCALE))));
 215                     aRow[11] = new ORowSetValueDecorator(::comphelper::getINT32(xColumn->getPropertyValue(OMetaConnection::getPropMap().getNameByIndex(PROPERTY_ID_ISNULLABLE))));
 216                     //  aRow[12] = xColumn->getPropertyValue(OMetaConnection::getPropMap().getNameByIndex(PROPERTY_ID_TYPENAME));
 217                     aRow[13] = new ORowSetValueDecorator(::comphelper::getString(xColumn->getPropertyValue(OMetaConnection::getPropMap().getNameByIndex(PROPERTY_ID_DEFAULTVALUE))));
 218                     //  aRow[14] = xColumn->getPropertyValue(OMetaConnection::getPropMap().getNameByIndex(PROPERTY_ID_TYPENAME));
 219                     //  aRow[15] = xColumn->getPropertyValue(OMetaConnection::getPropMap().getNameByIndex(PROPERTY_ID_TYPENAME));
 220                     switch(sal_Int32(aRow[5]->getValue()))
 221                     {
 222                     case DataType::CHAR:
 223                     case DataType::VARCHAR:
 224                         aRow[16] = new ORowSetValueDecorator((sal_Int32)254);
 225                         break;
 226                     case DataType::LONGVARCHAR:
 227                         aRow[16] = new ORowSetValueDecorator((sal_Int32)65535);
 228                         break;
 229                     default:
 230                         aRow[16] = new ORowSetValueDecorator((sal_Int32)0);
 231                     }
 232                     aRow[17] = new ORowSetValueDecorator(i);
 233                     switch(sal_Int32(aRow[11]->getValue()))
 234                     {
 235                     case ColumnValue::NO_NULLS:
 236                         aRow[18]  = new ORowSetValueDecorator(::rtl::OUString::createFromAscii("NO"));
 237                         break;
 238                     case ColumnValue::NULLABLE:
 239                         aRow[18]  = new ORowSetValueDecorator(::rtl::OUString::createFromAscii("YES"));
 240                         break;
 241                     default:
 242                         aRow[18]  = new ORowSetValueDecorator(::rtl::OUString());
 243                     }
 244                     aRows.push_back(aRow);
 245                 }
 246             }
 247         }
 248     }
 249
 250     ODatabaseMetaDataResultSet* pResult = new ODatabaseMetaDataResultSet(::connectivity::ODatabaseMetaDataResultSet::eColumns);
 251     Reference< XResultSet > xRef = pResult;
 252     pResult->setRows(aRows);
 253
 254     return xRef;
 255 }
 256
 257 // -------------------------------------------------------------------------
 258
 259 ::rtl::OUString SAL_CALL OCalcDatabaseMetaData::getURL(  ) throw(SQLException, RuntimeException)
 260 {
 261     RTL_LOGFILE_CONTEXT_AUTHOR( aLogger, "calc", "Ocke.Janssen@sun.com", "OCalcDatabaseMetaData::getURL" );
 262     ::osl::MutexGuard aGuard( m_aMutex );
 263
 264     return ::rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("sdbc:calc:")) + m_pConnection->getURL();
 265 }
 266
 267 // -------------------------------------------------------------------------
 268
 269 sal_Int32 SAL_CALL OCalcDatabaseMetaData::getMaxBinaryLiteralLength(  ) throw(SQLException, RuntimeException)
 270 {
 271     RTL_LOGFILE_CONTEXT_AUTHOR( aLogger, "calc", "Ocke.Janssen@sun.com", "OCalcDatabaseMetaData::getMaxBinaryLiteralLength" );
 272     return STRING_MAXLEN;
 273 }
 274
 275 // -------------------------------------------------------------------------
 276
 277 sal_Int32 SAL_CALL OCalcDatabaseMetaData::getMaxCharLiteralLength(  ) throw(SQLException, RuntimeException)
 278 {
 279     RTL_LOGFILE_CONTEXT_AUTHOR( aLogger, "calc", "Ocke.Janssen@sun.com", "OCalcDatabaseMetaData::getMaxCharLiteralLength" );
 280     return STRING_MAXLEN;
 281 }
 282 // -------------------------------------------------------------------------
 283 sal_Int32 SAL_CALL OCalcDatabaseMetaData::getMaxColumnNameLength(  ) throw(SQLException, RuntimeException)
 284 {
 285     RTL_LOGFILE_CONTEXT_AUTHOR( aLogger, "calc", "Ocke.Janssen@sun.com", "OCalcDatabaseMetaData::getMaxColumnNameLength" );
 286     return STRING_MAXLEN;
 287 }
 288 // -------------------------------------------------------------------------
 289 sal_Int32 SAL_CALL OCalcDatabaseMetaData::getMaxColumnsInIndex(  ) throw(SQLException, RuntimeException)
 290 {
 291     RTL_LOGFILE_CONTEXT_AUTHOR( aLogger, "calc", "Ocke.Janssen@sun.com", "OCalcDatabaseMetaData::getMaxColumnsInIndex" );
 292     return 1;
 293 }
 294 // -------------------------------------------------------------------------
 295 sal_Int32 SAL_CALL OCalcDatabaseMetaData::getMaxColumnsInTable(  ) throw(SQLException, RuntimeException)
 296 {
 297     RTL_LOGFILE_CONTEXT_AUTHOR( aLogger, "calc", "Ocke.Janssen@sun.com", "OCalcDatabaseMetaData::getMaxColumnsInTable" );
 298     return 256;
 299 }
 300
 301 // -------------------------------------------------------------------------
 302
 303 sal_Bool lcl_IsEmptyOrHidden( const Reference<XSpreadsheets>& xSheets, const ::rtl::OUString& rName )
 304 {
 305     Any aAny = xSheets->getByName( rName );
 306     Reference<XSpreadsheet> xSheet;
 307     if ( aAny >>= xSheet )
 308     {
 309         //      test if sheet is hidden
 310
 311         Reference<XPropertySet> xProp( xSheet, UNO_QUERY );
 312         if (xProp.is())
 313         {
 314             sal_Bool bVisible = sal_Bool();
 315             Any aVisAny = xProp->getPropertyValue( ::rtl::OUString::createFromAscii("IsVisible") );
 316             if ( aVisAny >>= bVisible )
 317                 if (!bVisible)
 318                     return sal_True;                            // hidden
 319         }
 320
 321 #if 0
 322         //      test if whole sheet is empty
 323
 324         Reference<XCellRangeAddressable> xAddr( xSheet, UNO_QUERY );
 325         Reference<XCellRangesQuery> xQuery( xSheet, UNO_QUERY );
 326         if ( xAddr.is() && xQuery.is() )
 327         {
 328             CellRangeAddress aTotalRange = xAddr->getRangeAddress();
 329             // queryIntersection to get a ranges object
 330             Reference<XSheetCellRanges> xRanges = xQuery->queryIntersection( aTotalRange );
 331             if (xRanges.is())
 332             {
 333                 Reference<XEnumerationAccess> xCells = xRanges->getCells();
 334                 if (xCells.is())
 335                 {
 336                     if ( !xCells->hasElements() )
 337                         return sal_True;                        // empty
 338                 }
 339             }
 340         }
 341 #endif
 342
 343         //      use the same data area as in OCalcTable to test for empty table
 344
 345         Reference<XSheetCellCursor> xCursor = xSheet->createCursor();
 346         Reference<XCellRangeAddressable> xRange( xCursor, UNO_QUERY );
 347         if ( xRange.is() )
 348         {
 349             xCursor->collapseToSize( 1, 1 );            // single (first) cell
 350             xCursor->collapseToCurrentRegion();         // contiguous data area
 351
 352             CellRangeAddress aRangeAddr = xRange->getRangeAddress();
 353             if ( aRangeAddr.StartColumn == aRangeAddr.EndColumn &&
 354                  aRangeAddr.StartRow == aRangeAddr.EndRow )
 355             {
 356                 //      single cell -> check content
 357                 Reference<XCell> xCell = xCursor->getCellByPosition( 0, 0 );
 358                 if ( xCell.is() && xCell->getType() == CellContentType_EMPTY )
 359                     return sal_True;
 360             }
 361         }
 362     }
 363
 364     return sal_False;
 365 }
 366
 367 sal_Bool lcl_IsUnnamed( const Reference<XDatabaseRanges>& xRanges, const ::rtl::OUString& rName )
 368 {
 369     sal_Bool bUnnamed = sal_False;
 370
 371     Any aAny = xRanges->getByName( rName );
 372     Reference<XDatabaseRange> xRange;
 373     if ( aAny >>= xRange )
 374     {
 375         Reference<XPropertySet> xRangeProp( xRange, UNO_QUERY );
 376         if ( xRangeProp.is() )
 377         {
 378             try
 379             {
 380                 Any aUserAny = xRangeProp->getPropertyValue( ::rtl::OUString::createFromAscii("IsUserDefined") );
 381                 sal_Bool bUserDefined = sal_Bool();
 382                 if ( aUserAny >>= bUserDefined )
 383                     bUnnamed = !bUserDefined;
 384             }
 385             catch ( UnknownPropertyException& )
 386             {
 387                 // optional property
 388             }
 389         }
 390     }
 391
 392     return bUnnamed;
 393 }
 394
 395 // -------------------------------------------------------------------------
 396
 397 Reference< XResultSet > SAL_CALL OCalcDatabaseMetaData::getTables(
 398         const Any& /*catalog*/, const ::rtl::OUString& /*schemaPattern*/,
 399         const ::rtl::OUString& tableNamePattern, const Sequence< ::rtl::OUString >& types )
 400         throw(SQLException, RuntimeException)
 401 {
 402     RTL_LOGFILE_CONTEXT_AUTHOR( aLogger, "calc", "Ocke.Janssen@sun.com", "OCalcDatabaseMetaData::getTables" );
 403     ::osl::MutexGuard aGuard( m_aMutex );
 404
 405     ODatabaseMetaDataResultSet* pResult = new ODatabaseMetaDataResultSet(ODatabaseMetaDataResultSet::eTables);
 406     Reference< XResultSet > xRef = pResult;
 407
 408     // check if ORowSetValue type is given
 409     // when no types are given then we have to return all tables e.g. TABLE
 410
 411     ::rtl::OUString aTable(::rtl::OUString::createFromAscii("TABLE"));
 412
 413     sal_Bool bTableFound = sal_True;
 414     sal_Int32 nLength = types.getLength();
 415     if(nLength)
 416     {
 417         bTableFound = sal_False;
 418
 419         const ::rtl::OUString* pIter = types.getConstArray();
 420         const ::rtl::OUString* pEnd     = pIter + nLength;
 421         for(;pIter != pEnd;++pIter)
 422         {
 423             if(*pIter == aTable)
 424             {
 425                 bTableFound = sal_True;
 426                 break;
 427             }
 428         }
 429     }
 430     if(!bTableFound)
 431         return xRef;
 432
 433     // get the sheet names from the document
 434
 435     OCalcConnection::ODocHolder aDocHodler(((OCalcConnection*)m_pConnection));
 436     Reference<XSpreadsheetDocument> xDoc = aDocHodler.getDoc();
 437     if ( !xDoc.is() )
 438         throw SQLException();
 439     Reference<XSpreadsheets> xSheets = xDoc->getSheets();
 440     if ( !xSheets.is() )
 441         throw SQLException();
 442     Sequence< ::rtl::OUString > aSheetNames = xSheets->getElementNames();
 443
 444     ODatabaseMetaDataResultSet::ORows aRows;
 445     sal_Int32 nSheetCount = aSheetNames.getLength();
 446     for (sal_Int32 nSheet=0; nSheet<nSheetCount; nSheet++)
 447     {
 448         ::rtl::OUString aName = aSheetNames[nSheet];
 449         if ( !lcl_IsEmptyOrHidden( xSheets, aName ) && match(tableNamePattern,aName,'\0') )
 450         {
 451             ODatabaseMetaDataResultSet::ORow aRow(3);
 452             aRow.reserve(6);
 453             aRow.push_back(new ORowSetValueDecorator(aName));
 454             aRow.push_back(new ORowSetValueDecorator(aTable));
 455             aRow.push_back(ODatabaseMetaDataResultSet::getEmptyValue());
 456             aRows.push_back(aRow);
 457         }
 458     }
 459
 460     // also use database ranges
 461
 462     Reference<XPropertySet> xDocProp( xDoc, UNO_QUERY );
 463     if ( xDocProp.is() )
 464     {
 465         Any aRangesAny = xDocProp->getPropertyValue( ::rtl::OUString::createFromAscii("DatabaseRanges") );
 466         Reference<XDatabaseRanges> xRanges;
 467         if ( aRangesAny >>= xRanges )
 468         {
 469             Sequence< ::rtl::OUString > aDBNames = xRanges->getElementNames();
 470             sal_Int32 nDBCount = aDBNames.getLength();
 471             for (sal_Int32 nRange=0; nRange<nDBCount; nRange++)
 472             {
 473                 ::rtl::OUString aName = aDBNames[nRange];
 474                 if ( !lcl_IsUnnamed( xRanges, aName ) && match(tableNamePattern,aName,'\0') )
 475                 {
 476                     ODatabaseMetaDataResultSet::ORow aRow(3);
 477                     aRow.reserve(6);
 478                     aRow.push_back(new ORowSetValueDecorator(aName));
 479                     aRow.push_back(new ORowSetValueDecorator(aTable));
 480                     aRow.push_back(ODatabaseMetaDataResultSet::getEmptyValue());
 481                     aRows.push_back(aRow);
 482                 }
 483             }
 484         }
 485     }
 486
 487     pResult->setRows(aRows);
 488
 489     return xRef;
 490 }
 491 // -----------------------------------------------------------------------------
 492
 493