xref: /AOO41X/main/starmath/source/smdetect.cxx (revision 8809db7a87f97847b57a57f4cd2b0104b2b83182)
1 /**************************************************************
2  *
3  * Licensed to the Apache Software Foundation (ASF) under one
4  * or more contributor license agreements.  See the NOTICE file
5  * distributed with this work for additional information
6  * regarding copyright ownership.  The ASF licenses this file
7  * to you under the Apache License, Version 2.0 (the
8  * "License"); you may not use this file except in compliance
9  * with the License.  You may obtain a copy of the License at
10  *
11  *   http://www.apache.org/licenses/LICENSE-2.0
12  *
13  * Unless required by applicable law or agreed to in writing,
14  * software distributed under the License is distributed on an
15  * "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
16  * KIND, either express or implied.  See the License for the
17  * specific language governing permissions and limitations
18  * under the License.
19  *
20  *************************************************************/
21 
22 
23 
24 // MARKER(update_precomp.py): autogen include statement, do not remove
25 #include "precompiled_starmath.hxx"
26 
27 #include "smdetect.hxx"
28 
29 //#include <framework/interaction.hxx>
30 #include <com/sun/star/lang/XMultiServiceFactory.hpp>
31 #include <com/sun/star/beans/PropertyValue.hpp>
32 #include <com/sun/star/frame/XFrame.hpp>
33 #include <com/sun/star/frame/XModel.hpp>
34 #include <com/sun/star/awt/XWindow.hpp>
35 #include <com/sun/star/lang/XUnoTunnel.hpp>
36 #ifndef _UNOTOOLS_PROCESSFACTORY_HXX
37 #include <comphelper/processfactory.hxx>
38 #endif
39 #include <com/sun/star/beans/PropertyValue.hpp>
40 #include <com/sun/star/io/XInputStream.hpp>
41 #include <com/sun/star/task/XInteractionHandler.hpp>
42 #include <com/sun/star/lang/WrappedTargetRuntimeException.hpp>
43 #include <com/sun/star/ucb/CommandAbortedException.hpp>
44 #include <com/sun/star/ucb/InteractiveAppException.hpp>
45 #include <com/sun/star/ucb/XContent.hpp>
46 #include <com/sun/star/packages/zip/ZipIOException.hpp>
47 #include <framework/interaction.hxx>
48 
49 #ifndef _TOOLKIT_UNOHLP_HXX
50 #include <toolkit/helper/vclunohelper.hxx>
51 #endif
52 #include <ucbhelper/simpleinteractionrequest.hxx>
53 
54 #include <rtl/ustring.h>
55 #include <rtl/logfile.hxx>
56 #include <svl/itemset.hxx>
57 #include <vcl/window.hxx>
58 #include <svl/eitem.hxx>
59 #include <svl/stritem.hxx>
60 #include <tools/urlobj.hxx>
61 #include <vos/mutex.hxx>
62 #include <svtools/sfxecode.hxx>
63 #include <svtools/ehdl.hxx>
64 #include <sot/storinfo.hxx>
65 #include <vcl/svapp.hxx>
66 #include <sfx2/app.hxx>
67 #include <sfx2/sfxsids.hrc>
68 #include <sfx2/request.hxx>
69 #include <sfx2/docfile.hxx>
70 #include <sfx2/docfilt.hxx>
71 #include <sfx2/fcontnr.hxx>
72 #include <sfx2/brokenpackageint.hxx>
73 
74 #include "document.hxx"
75 #include "eqnolefilehdr.hxx"
76 
77 
78 using namespace ::com::sun::star;
79 using namespace ::com::sun::star::uno;
80 using namespace ::com::sun::star::io;
81 using namespace ::com::sun::star::frame;
82 using namespace ::com::sun::star::task;
83 using namespace ::com::sun::star::beans;
84 using namespace ::com::sun::star::lang;
85 using namespace ::com::sun::star::ucb;
86 using namespace ::rtl;
87 
88 SmFilterDetect::SmFilterDetect( const REFERENCE < ::com::sun::star::lang::XMultiServiceFactory >& /*xFactory*/ )
89 {
90 }
91 
92 SmFilterDetect::~SmFilterDetect()
93 {
94 }
95 
96 ::rtl::OUString SAL_CALL SmFilterDetect::detect( ::com::sun::star::uno::Sequence< ::com::sun::star::beans::PropertyValue >& lDescriptor ) throw( ::com::sun::star::uno::RuntimeException )
97 {
98     REFERENCE< XInputStream > xStream;
99     REFERENCE< XContent > xContent;
100     REFERENCE< XInteractionHandler > xInteraction;
101     String aURL;
102     ::rtl::OUString sTemp;
103     String aTypeName;            // a name describing the type (from MediaDescriptor, usually from flat detection)
104     String aPreselectedFilterName;      // a name describing the filter to use (from MediaDescriptor, usually from UI action)
105 
106     ::rtl::OUString aDocumentTitle; // interesting only if set in this method
107 
108     // opening as template is done when a parameter tells to do so and a template filter can be detected
109     // (otherwise no valid filter would be found) or if the detected filter is a template filter and
110     // there is no parameter that forbids to open as template
111     sal_Bool bOpenAsTemplate = sal_False;
112     sal_Bool bWasReadOnly = sal_False, bReadOnly = sal_False;
113 
114     sal_Bool bRepairPackage = sal_False;
115     sal_Bool bRepairAllowed = sal_False;
116 
117     // now some parameters that can already be in the array, but may be overwritten or new inserted here
118     // remember their indices in the case new values must be added to the array
119     sal_Int32 nPropertyCount = lDescriptor.getLength();
120     sal_Int32 nIndexOfFilterName = -1;
121     sal_Int32 nIndexOfInputStream = -1;
122     sal_Int32 nIndexOfContent = -1;
123     sal_Int32 nIndexOfReadOnlyFlag = -1;
124     sal_Int32 nIndexOfTemplateFlag = -1;
125     sal_Int32 nIndexOfDocumentTitle = -1;
126 
127     for( sal_Int32 nProperty=0; nProperty<nPropertyCount; ++nProperty )
128     {
129         // extract properties
130         if( lDescriptor[nProperty].Name == OUString(RTL_CONSTASCII_USTRINGPARAM("URL")) )
131         {
132             lDescriptor[nProperty].Value >>= sTemp;
133             aURL = sTemp;
134         }
135         else if( !aURL.Len() && lDescriptor[nProperty].Name == OUString(RTL_CONSTASCII_USTRINGPARAM("FileName")) )
136         {
137             lDescriptor[nProperty].Value >>= sTemp;
138             aURL = sTemp;
139         }
140         else if( lDescriptor[nProperty].Name == OUString(RTL_CONSTASCII_USTRINGPARAM("TypeName")) )
141         {
142             lDescriptor[nProperty].Value >>= sTemp;
143             aTypeName = sTemp;
144         }
145         else if( lDescriptor[nProperty].Name == OUString(RTL_CONSTASCII_USTRINGPARAM("FilterName")) )
146         {
147             lDescriptor[nProperty].Value >>= sTemp;
148             aPreselectedFilterName = sTemp;
149 
150             // if the preselected filter name is not correct, it must be erased after detection
151             // remember index of property to get access to it later
152             nIndexOfFilterName = nProperty;
153         }
154         else if( lDescriptor[nProperty].Name == OUString(RTL_CONSTASCII_USTRINGPARAM("InputStream")) )
155             nIndexOfInputStream = nProperty;
156         else if( lDescriptor[nProperty].Name == OUString(RTL_CONSTASCII_USTRINGPARAM("ReadOnly")) )
157             nIndexOfReadOnlyFlag = nProperty;
158         else if( lDescriptor[nProperty].Name == OUString(RTL_CONSTASCII_USTRINGPARAM("UCBContent")) )
159             nIndexOfContent = nProperty;
160         else if( lDescriptor[nProperty].Name == OUString(RTL_CONSTASCII_USTRINGPARAM("AsTemplate")) )
161         {
162             lDescriptor[nProperty].Value >>= bOpenAsTemplate;
163             nIndexOfTemplateFlag = nProperty;
164         }
165         else if( lDescriptor[nProperty].Name == OUString(RTL_CONSTASCII_USTRINGPARAM("InteractionHandler")) )
166             lDescriptor[nProperty].Value >>= xInteraction;
167         else if( lDescriptor[nProperty].Name == OUString(RTL_CONSTASCII_USTRINGPARAM("RepairPackage")) )
168             lDescriptor[nProperty].Value >>= bRepairPackage;
169         else if( lDescriptor[nProperty].Name == OUString(RTL_CONSTASCII_USTRINGPARAM("DocumentTitle")) )
170             nIndexOfDocumentTitle = nProperty;
171     }
172 
173     // can't check the type for external filters, so set the "dont" flag accordingly
174     ::vos::OGuard aGuard( Application::GetSolarMutex() );
175     //SfxFilterFlags nMust = SFX_FILTER_IMPORT, nDont = SFX_FILTER_NOTINSTALLED;
176 
177     SfxApplication* pApp = SFX_APP();
178     SfxAllItemSet *pSet = new SfxAllItemSet( pApp->GetPool() );
179     TransformParameters( SID_OPENDOC, lDescriptor, *pSet );
180     SFX_ITEMSET_ARG( pSet, pItem, SfxBoolItem, SID_DOC_READONLY, sal_False );
181 
182     bWasReadOnly = pItem && pItem->GetValue();
183 
184     String aFilterName;
185     String aPrefix = String::CreateFromAscii( "private:factory/" );
186     if( aURL.Match( aPrefix ) == aPrefix.Len() )
187     {
188         const SfxFilter* pFilter = 0;
189         String aPattern( aPrefix );
190         aPattern += String::CreateFromAscii("smath");
191         if ( aURL.Match( aPattern ) >= aPattern.Len() )
192         {
193             pFilter = SfxFilter::GetDefaultFilterFromFactory( aURL );
194             aTypeName = pFilter->GetTypeName();
195             aFilterName = pFilter->GetName();
196         }
197     }
198     else
199     {
200         // ctor of SfxMedium uses owner transition of ItemSet
201         SfxMedium aMedium( aURL, bWasReadOnly ? STREAM_STD_READ : STREAM_STD_READWRITE, sal_False, NULL, pSet );
202         aMedium.UseInteractionHandler( sal_True );
203 
204         sal_Bool bIsStorage = aMedium.IsStorage();
205         if ( aMedium.GetErrorCode() == ERRCODE_NONE )
206         {
207             // remember input stream and content and put them into the descriptor later
208             // should be done here since later the medium can switch to a version
209             xStream = aMedium.GetInputStream();
210             xContent = aMedium.GetContent();
211             bReadOnly = aMedium.IsReadOnly();
212 
213             if ( bIsStorage )
214             {
215                 //TODO/LATER: factor this out!
216                 uno::Reference < embed::XStorage > xStorage = aMedium.GetStorage( sal_False );
217                 if ( aMedium.GetLastStorageCreationState() != ERRCODE_NONE )
218                 {
219                     // error during storage creation means _here_ that the medium
220                     // is broken, but we can not handle it in medium since unpossibility
221                     // to create a storage does not _always_ means that the medium is broken
222                     aMedium.SetError( aMedium.GetLastStorageCreationState(), ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( OSL_LOG_PREFIX ) ) );
223                     if ( xInteraction.is() )
224                     {
225                         OUString empty;
226                         try
227                         {
228                             InteractiveAppException xException( empty,
229                                                             REFERENCE< XInterface >(),
230                                                             InteractionClassification_ERROR,
231                                                             aMedium.GetError() );
232 
233                             REFERENCE< XInteractionRequest > xRequest(
234                                 new ucbhelper::SimpleInteractionRequest( makeAny( xException ),
235                                                                      ucbhelper::CONTINUATION_APPROVE ) );
236                             xInteraction->handle( xRequest );
237                         }
238                         catch ( Exception & ) {};
239                     }
240                 }
241                 else
242                 {
243                     aFilterName.Erase();
244 
245                     try
246                     {
247                         const SfxFilter* pFilter = aPreselectedFilterName.Len() ?
248                                 SfxFilterMatcher().GetFilter4FilterName( aPreselectedFilterName ) : aTypeName.Len() ?
249                                 SfxFilterMatcher(String::CreateFromAscii("smath")).GetFilter4EA( aTypeName ) : 0;
250                         String aTmpFilterName;
251                         if ( pFilter )
252                             aTmpFilterName = pFilter->GetName();
253                         aTypeName = SfxFilter::GetTypeFromStorage( xStorage, pFilter ? pFilter->IsAllowedAsTemplate() : sal_False, &aTmpFilterName );
254                     }
255                     catch( lang::WrappedTargetException& aWrap )
256                     {
257                         packages::zip::ZipIOException aZipException;
258 
259                         // repairing is done only if this type is requested from outside
260                         if ( ( aWrap.TargetException >>= aZipException ) && aTypeName.Len() )
261                         {
262                             if ( xInteraction.is() )
263                             {
264                                 // the package is broken one
265                                 aDocumentTitle = aMedium.GetURLObject().getName(
266                                                             INetURLObject::LAST_SEGMENT,
267                                                             true,
268                                                             INetURLObject::DECODE_WITH_CHARSET );
269 
270                                 if ( !bRepairPackage )
271                                 {
272                                     // ask the user whether he wants to try to repair
273                                     RequestPackageReparation aRequest( aDocumentTitle );
274                                     xInteraction->handle( aRequest.GetRequest() );
275                                     bRepairAllowed = aRequest.isApproved();
276                                 }
277 
278                                 if ( !bRepairAllowed )
279                                 {
280                                     // repair either not allowed or not successful
281                                     NotifyBrokenPackage aNotifyRequest( aDocumentTitle );
282                                     xInteraction->handle( aNotifyRequest.GetRequest() );
283                                 }
284                             }
285 
286                             if ( !bRepairAllowed )
287                                 aTypeName.Erase();
288                         }
289                     }
290                     catch( uno::RuntimeException& )
291                     {
292                         throw;
293                     }
294                     catch( uno::Exception& )
295                     {
296                         aTypeName.Erase();
297                     }
298 
299                     if ( aTypeName.Len() )
300                     {
301                         const SfxFilter* pFilter =
302                                     SfxFilterMatcher( String::CreateFromAscii("smath") ).GetFilter4EA( aTypeName );
303                         if ( pFilter )
304                             aFilterName = pFilter->GetName();
305                     }
306                 }
307             }
308             else
309             {
310                 //Test to see if this begins with xml and if so run it through
311                 //the MathML filter. There are all sorts of things wrong with
312                 //this approach, to be fixed at a better level than here
313                 SvStream *pStrm = aMedium.GetInStream();
314                 aTypeName.Erase();
315                 if (pStrm && !pStrm->GetError())
316                 {
317                     SotStorageRef aStorage = new SotStorage ( pStrm, sal_False );
318                     if ( !aStorage->GetError() )
319                     {
320                         if ( aStorage->IsStream( String::CreateFromAscii( RTL_CONSTASCII_STRINGPARAM( "Equation Native" ) ) ) )
321                         {
322                             sal_uInt8 nVersion;
323                             if (GetMathTypeVersion( aStorage, nVersion ) && nVersion <=3)
324                                 aTypeName.AssignAscii( "math_MathType_3x" );
325                         }
326                     }
327                     else
328                     {
329                         const sal_uInt16 nSize = 5;
330                         sal_Char aBuffer[nSize+1];
331                         aBuffer[nSize] = 0;
332                         pStrm->Seek( STREAM_SEEK_TO_BEGIN );
333                         sal_uLong nBytesRead = pStrm->Read( aBuffer, nSize );
334                         if (nBytesRead == nSize)
335                         {
336                             if (0 == strncmp( "<?xml",aBuffer,nSize))
337                             {
338                                 static const sal_Char sFltrNm_2[] = MATHML_XML;
339                                 static const sal_Char sTypeNm_2[] = "math_MathML_XML_Math";
340                                 aFilterName.AssignAscii( sFltrNm_2 );
341                                 aTypeName.AssignAscii( sTypeNm_2 );
342                             }
343                         }
344                     }
345 
346                     if ( aTypeName.Len() )
347                     {
348                         const SfxFilter* pFilt = SfxFilterMatcher( String::CreateFromAscii("smath") ).GetFilter4EA( aTypeName );
349                         if ( pFilt )
350                             aFilterName = pFilt->GetName();
351                     }
352                 }
353             }
354         }
355     }
356 
357     if ( nIndexOfInputStream == -1 && xStream.is() )
358     {
359         // if input stream wasn't part of the descriptor, now it should be, otherwise the content would be opend twice
360         lDescriptor.realloc( nPropertyCount + 1 );
361         lDescriptor[nPropertyCount].Name = ::rtl::OUString::createFromAscii("InputStream");
362         lDescriptor[nPropertyCount].Value <<= xStream;
363         nPropertyCount++;
364     }
365 
366     if ( nIndexOfContent == -1 && xContent.is() )
367     {
368         // if input stream wasn't part of the descriptor, now it should be, otherwise the content would be opend twice
369         lDescriptor.realloc( nPropertyCount + 1 );
370         lDescriptor[nPropertyCount].Name = ::rtl::OUString::createFromAscii("UCBContent");
371         lDescriptor[nPropertyCount].Value <<= xContent;
372         nPropertyCount++;
373     }
374 
375     if ( bReadOnly != bWasReadOnly )
376     {
377         if ( nIndexOfReadOnlyFlag == -1 )
378         {
379             lDescriptor.realloc( nPropertyCount + 1 );
380             lDescriptor[nPropertyCount].Name = ::rtl::OUString::createFromAscii("ReadOnly");
381             lDescriptor[nPropertyCount].Value <<= bReadOnly;
382             nPropertyCount++;
383         }
384         else
385             lDescriptor[nIndexOfReadOnlyFlag].Value <<= bReadOnly;
386     }
387 
388     if ( !bRepairPackage && bRepairAllowed )
389     {
390         lDescriptor.realloc( nPropertyCount + 1 );
391         lDescriptor[nPropertyCount].Name = ::rtl::OUString::createFromAscii("RepairPackage");
392         lDescriptor[nPropertyCount].Value <<= bRepairAllowed;
393         nPropertyCount++;
394 
395         bOpenAsTemplate = sal_True;
396 
397         // TODO/LATER: set progress bar that should be used
398     }
399 
400     if ( bOpenAsTemplate )
401     {
402         if ( nIndexOfTemplateFlag == -1 )
403         {
404             lDescriptor.realloc( nPropertyCount + 1 );
405             lDescriptor[nPropertyCount].Name = ::rtl::OUString::createFromAscii("AsTemplate");
406             lDescriptor[nPropertyCount].Value <<= bOpenAsTemplate;
407             nPropertyCount++;
408         }
409         else
410             lDescriptor[nIndexOfTemplateFlag].Value <<= bOpenAsTemplate;
411     }
412 
413     if ( aDocumentTitle.getLength() )
414     {
415         // the title was set here
416         if ( nIndexOfDocumentTitle == -1 )
417         {
418             lDescriptor.realloc( nPropertyCount + 1 );
419             lDescriptor[nPropertyCount].Name = ::rtl::OUString::createFromAscii("DocumentTitle");
420             lDescriptor[nPropertyCount].Value <<= aDocumentTitle;
421             nPropertyCount++;
422         }
423         else
424             lDescriptor[nIndexOfDocumentTitle].Value <<= aDocumentTitle;
425     }
426 
427     if ( !aFilterName.Len() )
428         aTypeName.Erase();
429 
430     return aTypeName;
431 }
432 
433 SFX_IMPL_SINGLEFACTORY( SmFilterDetect )
434 
435 /* XServiceInfo */
436 UNOOUSTRING SAL_CALL SmFilterDetect::getImplementationName() throw( UNORUNTIMEEXCEPTION )
437 {
438     return impl_getStaticImplementationName();
439 }
440                                                                                                                                 \
441 /* XServiceInfo */
442 sal_Bool SAL_CALL SmFilterDetect::supportsService( const UNOOUSTRING& sServiceName ) throw( UNORUNTIMEEXCEPTION )
443 {
444     UNOSEQUENCE< UNOOUSTRING >  seqServiceNames =   getSupportedServiceNames();
445     const UNOOUSTRING*          pArray          =   seqServiceNames.getConstArray();
446     for ( sal_Int32 nCounter=0; nCounter<seqServiceNames.getLength(); nCounter++ )
447     {
448         if ( pArray[nCounter] == sServiceName )
449         {
450             return sal_True ;
451         }
452     }
453     return sal_False ;
454 }
455 
456 /* XServiceInfo */
457 UNOSEQUENCE< UNOOUSTRING > SAL_CALL SmFilterDetect::getSupportedServiceNames() throw( UNORUNTIMEEXCEPTION )
458 {
459     return impl_getStaticSupportedServiceNames();
460 }
461 
462 /* Helper for XServiceInfo */
463 UNOSEQUENCE< UNOOUSTRING > SmFilterDetect::impl_getStaticSupportedServiceNames()
464 {
465     UNOMUTEXGUARD aGuard( UNOMUTEX::getGlobalMutex() );
466     UNOSEQUENCE< UNOOUSTRING > seqServiceNames( 1 );
467     seqServiceNames.getArray() [0] = UNOOUSTRING::createFromAscii( "com.sun.star.frame.ExtendedTypeDetection"  );
468     return seqServiceNames ;
469 }
470 
471 /* Helper for XServiceInfo */
472 UNOOUSTRING SmFilterDetect::impl_getStaticImplementationName()
473 {
474     return UNOOUSTRING::createFromAscii( "com.sun.star.comp.math.FormatDetector" );
475 }
476 
477 /* Helper for registry */
478 UNOREFERENCE< UNOXINTERFACE > SAL_CALL SmFilterDetect::impl_createInstance( const UNOREFERENCE< UNOXMULTISERVICEFACTORY >& xServiceManager ) throw( UNOEXCEPTION )
479 {
480     return UNOREFERENCE< UNOXINTERFACE >( *new SmFilterDetect( xServiceManager ) );
481 }
482 
483