filter/source/xmlfilterdetect/filterdetect.cxx

   1 /* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
   2 /*
   3  * This file is part of the LibreOffice project.
   4  *
   5  * This Source Code Form is subject to the terms of the Mozilla Public
   6  * License, v. 2.0. If a copy of the MPL was not distributed with this
   7  * file, You can obtain one at http://mozilla.org/MPL/2.0/.
   8  *
   9  * This file incorporates work covered by the following license notice:
  10  *
  11  *   Licensed to the Apache Software Foundation (ASF) under one or more
  12  *   contributor license agreements. See the NOTICE file distributed
  13  *   with this work for additional information regarding copyright
  14  *   ownership. The ASF licenses this file to you under the Apache
  15  *   License, Version 2.0 (the "License"); you may not use this file
  16  *   except in compliance with the License. You may obtain a copy of
  17  *   the License at http://www.apache.org/licenses/LICENSE-2.0 .
  18  */
  19
  20 #include <iostream>
  21 #include <stdlib.h>
  22 #include <ctype.h>
  23 #include <stdio.h>
  24 #include <cstring>
  25 #include "filterdetect.hxx"
  26 #include <osl/diagnose.h>
  27 #include <com/sun/star/io/XActiveDataSource.hpp>
  28 #include <com/sun/star/io/XOutputStream.hpp>
  29 #include <com/sun/star/io/XInputStream.hpp>
  30 #include <com/sun/star/xml/sax/XDocumentHandler.hpp>
  31 #include <com/sun/star/xml/sax/InputSource.hpp>
  32 #include <com/sun/star/xml/sax/XParser.hpp>
  33 #include <com/sun/star/xml/XImportFilter.hpp>
  34 #include <com/sun/star/xml/XExportFilter.hpp>
  35 #include <com/sun/star/frame/XController.hpp>
  36 #include <com/sun/star/task/XStatusIndicator.hpp>
  37 #include <com/sun/star/task/XStatusIndicatorFactory.hpp>
  38 #include <com/sun/star/style/XStyleFamiliesSupplier.hpp>
  39 #include <com/sun/star/style/XStyleLoader.hpp>
  40 #include <com/sun/star/uno/XComponentContext.hpp>
  41 #include <com/sun/star/document/XExtendedFilterDetection.hpp>
  42 #include <com/sun/star/container/XNameAccess.hpp>
  43 #include <com/sun/star/beans/PropertyState.hpp>
  44 #include <ucbhelper/content.hxx>
  45
  46 using com::sun::star::uno::Sequence;
  47 using com::sun::star::uno::Reference;
  48 using com::sun::star::uno::Any;
  49 using com::sun::star::uno::UNO_QUERY;
  50 using com::sun::star::uno::XComponentContext;
  51 using com::sun::star::uno::XInterface;
  52 using com::sun::star::uno::Exception;
  53 using com::sun::star::uno::RuntimeException;
  54 using com::sun::star::io::XActiveDataSource;
  55 using com::sun::star::io::XOutputStream;
  56 using com::sun::star::beans::PropertyValue;
  57 using com::sun::star::document::XExporter;
  58 using com::sun::star::document::XFilter;
  59 using com::sun::star::document::XExtendedFilterDetection;
  60
  61 using com::sun::star::io::XInputStream;
  62 using com::sun::star::document::XImporter;
  63 using com::sun::star::xml::sax::InputSource;
  64 using com::sun::star::xml::sax::XDocumentHandler;
  65 using com::sun::star::xml::sax::XParser;
  66
  67 using namespace ::com::sun::star::frame;
  68 using namespace ::com::sun::star;
  69 using namespace com::sun::star::container;
  70 using namespace com::sun::star::uno;
  71 using namespace com::sun::star::beans;
  72
  73 namespace {
  74
  75 bool isXMLStream(const OString& aHeaderStrm)
  76 {
  77     const char* p = aHeaderStrm.getStr();
  78     size_t n = aHeaderStrm.getLength();
  79     size_t i = 0;
  80
  81     // Skip all preceding blank characters.
  82     for (i = 0; i < n; ++i, ++p)
  83     {
  84         sal_Char c = *p;
  85         if (c == ' ' || c == '\n' || c == '\t')
  86             continue;
  87         break;
  88     }
  89
  90     n -= i;
  91
  92     // First text must be '<?xml', else it's not a valid XML file stream.
  93     const char* sInitChars = "<?xml";
  94     const size_t nInitCharLen = std::strlen(sInitChars);
  95     for (i = 0; i < n; ++i, ++p)
  96     {
  97         if (i < nInitCharLen)
  98         {
  99             if (*p != sInitChars[i])
 100                 return false;
 101         }
 102     }
 103     return true;
 104 }
 105
 106 OUString supportedByType( const OUString clipBoardFormat ,  const OString resultString, const OUString checkType)
 107 {
 108     OUString sTypeName;
 109     if ( clipBoardFormat.match(OUString("doctype:")) )
 110     {
 111         OString tryStr = OUStringToOString(clipBoardFormat.copy(8),RTL_TEXTENCODING_ASCII_US).getStr();
 112         if (resultString.indexOf(tryStr) >= 0)
 113         {
 114             sTypeName = checkType;
 115         }
 116     }
 117     return sTypeName;
 118 }
 119
 120 }
 121
 122 OUString SAL_CALL FilterDetect::detect( com::sun::star::uno::Sequence< com::sun::star::beans::PropertyValue >& aArguments ) throw( com::sun::star::uno::RuntimeException )
 123 {
 124     OUString sTypeName;
 125     OUString sUrl;
 126     Sequence<PropertyValue > lProps ;
 127
 128     com::sun::star::uno::Reference< com::sun::star::io::XInputStream > xInStream;
 129     const PropertyValue * pValue = aArguments.getConstArray();
 130     sal_Int32 nLength;
 131     OString resultString;
 132
 133     nLength = aArguments.getLength();
 134     sal_Int32 location=nLength;
 135     for (sal_Int32 i = 0 ; i < nLength; i++)
 136     {
 137         if ( pValue[i].Name == "TypeName" )
 138         {
 139             location=i;
 140         }
 141         else if ( pValue[i].Name == "URL" )
 142         {
 143             pValue[i].Value >>= sUrl;
 144         }
 145         else if ( pValue[i].Name == "InputStream" )
 146         {
 147             pValue[i].Value >>= xInStream ;
 148         }
 149     }
 150     try
 151     {
 152         if (!xInStream.is())
 153         {
 154             ::ucbhelper::Content aContent(
 155                 sUrl, Reference< com::sun::star::ucb::XCommandEnvironment >(),
 156                 mxCtx);
 157             xInStream = aContent.openStream();
 158             if (!xInStream.is())
 159             {
 160                 return sTypeName;
 161             }
 162         }
 163         com::sun::star::uno::Sequence< sal_Int8 > aData;
 164         /* long nBytesToRead= */ xInStream->available();
 165         xInStream->skipBytes (0);
 166         long bytestRead =xInStream->readBytes (aData,  4000);
 167         resultString=OString((const sal_Char *)aData.getConstArray(),bytestRead) ;
 168
 169         if (!isXMLStream(resultString))
 170             // This is not an XML stream.  It makes no sense to try to detect
 171             // a non-XML file type here.
 172             return OUString();
 173
 174         // test typedetect code
 175         Reference <XNameAccess> xTypeCont(mxCtx->getServiceManager()->createInstanceWithContext("com.sun.star.document.TypeDetection", mxCtx), UNO_QUERY);
 176         Sequence < OUString > myTypes= xTypeCont->getElementNames();
 177         nLength = myTypes.getLength();
 178
 179         sal_Int32 new_nlength=0;
 180         sal_Int32 i = 0 ;
 181         while ((i < nLength) && (sTypeName.isEmpty()))
 182         {
 183             Any elem = xTypeCont->getByName(myTypes[i]);
 184             elem >>=lProps;
 185             new_nlength = lProps.getLength();
 186             sal_Int32 j =0;
 187             while (j < new_nlength && (sTypeName.isEmpty()))
 188             {
 189                 OUString tmpStr;
 190                 lProps[j].Value >>=tmpStr;
 191                 if ( lProps[j].Name == "ClipboardFormat" && !tmpStr.isEmpty() )
 192                 {
 193                     sTypeName = supportedByType(tmpStr,resultString, myTypes[i]);
 194                 }
 195                 j++;
 196             }
 197             i++;
 198         }
 199     }
 200     catch (const Exception &)
 201     {
 202         OSL_FAIL( "An Exception occurred while opening File stream" );
 203     }
 204
 205     if (!sTypeName.isEmpty())
 206     {
 207         if (location == aArguments.getLength())
 208         {
 209             aArguments.realloc(nLength+1);
 210             aArguments[location].Name = OUString( "TypeName" );
 211         }
 212         aArguments[location].Value <<=sTypeName;
 213     }
 214
 215     return sTypeName;
 216 }
 217
 218 // XInitialization
 219
 220 void SAL_CALL FilterDetect::initialize( const Sequence< Any >& aArguments )
 221     throw (Exception, RuntimeException)
 222 {
 223     Sequence < PropertyValue > aAnySeq;
 224     sal_Int32 nLength = aArguments.getLength();
 225     if ( nLength && ( aArguments[0] >>= aAnySeq ) )
 226     {
 227         const PropertyValue * pValue = aAnySeq.getConstArray();
 228         nLength = aAnySeq.getLength();
 229         for ( sal_Int32 i = 0 ; i < nLength; i++)
 230         {
 231
 232             if ( pValue[i].Name == "Type" )
 233             {
 234                  pValue[i].Value >>= msFilterName;
 235
 236             }
 237             else if ( pValue[i].Name == "UserData" )
 238             {
 239
 240                 pValue[i].Value >>= msUserData;
 241
 242             }
 243             else if ( pValue[i].Name == "TemplateName" )
 244             {
 245
 246               pValue[i].Value>>=msTemplateName;
 247             }
 248
 249         }
 250     }
 251 }
 252
 253
 254
 255 OUString FilterDetect_getImplementationName ()
 256 {
 257     return OUString( "com.sun.star.comp.filters.XMLFilterDetect" );
 258 }
 259 #define SERVICE_NAME1 "com.sun.star.document.ExtendedTypeDetection"
 260
 261 Sequence< OUString > FilterDetect_getSupportedServiceNames()
 262 {
 263     Sequence < OUString > aRet(1);
 264     aRet[0] = SERVICE_NAME1;
 265     return aRet;
 266 }
 267
 268 Reference< XInterface > FilterDetect_createInstance( const Reference< XComponentContext > & context)
 269 {
 270     return static_cast< cppu::OWeakObject * >( new FilterDetect( context ) );
 271 }
 272
 273 // XServiceInfo
 274 OUString SAL_CALL FilterDetect::getImplementationName(  )
 275     throw (RuntimeException)
 276 {
 277     return FilterDetect_getImplementationName();
 278 }
 279 sal_Bool SAL_CALL FilterDetect::supportsService( const OUString& rServiceName )
 280     throw (RuntimeException)
 281 {
 282     return rServiceName == SERVICE_NAME1;
 283 }
 284 Sequence< OUString > SAL_CALL FilterDetect::getSupportedServiceNames(  )
 285     throw (RuntimeException)
 286 {
 287     return FilterDetect_getSupportedServiceNames();
 288 }
 289
 290 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */