/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */ /* * This file is part of the LibreOffice project. * * This Source Code Form is subject to the terms of the Mozilla Public * License, v. 2.0. If a copy of the MPL was not distributed with this * file, You can obtain one at http://mozilla.org/MPL/2.0/. * * This file incorporates work covered by the following license notice: * * Licensed to the Apache Software Foundation (ASF) under one or more * contributor license agreements. See the NOTICE file distributed * with this work for additional information regarding copyright * ownership. The ASF licenses this file to you under the Apache * License, Version 2.0 (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.apache.org/licenses/LICENSE-2.0 . */ #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include class FilterConfigItem; /************************************************************************* |* |* ImpSearchEntry() |* |* Description Checks if there is a string(pDest) of length nSize |* inside the memory area pSource which is nComp bytes long. |* Check is NON-CASE-SENSITIVE. The return value is the |* address where the string is found or NULL |* *************************************************************************/ static sal_uInt8* ImplSearchEntry( sal_uInt8* pSource, sal_uInt8* pDest, sal_uLong nComp, sal_uLong nSize ) { while ( nComp-- >= nSize ) { sal_uLong i; for ( i = 0; i < nSize; i++ ) { if ( ( pSource[i]&~0x20 ) != ( pDest[i]&~0x20 ) ) break; } if ( i == nSize ) return pSource; pSource++; } return NULL; } // SecurityCount is the buffersize of the buffer in which we will parse for a number static long ImplGetNumber( sal_uInt8 **pBuf, int& nSecurityCount ) { bool bValid = true; bool bNegative = false; long nRetValue = 0; while ( ( --nSecurityCount ) && ( ( **pBuf == ' ' ) || ( **pBuf == 0x9 ) ) ) (*pBuf)++; sal_uInt8 nByte = **pBuf; while ( nSecurityCount && ( nByte != ' ' ) && ( nByte != 0x9 ) && ( nByte != 0xd ) && ( nByte != 0xa ) ) { switch ( nByte ) { case '.' : // we'll only use the integer format bValid = false; break; case '-' : bNegative = true; break; default : if ( ( nByte < '0' ) || ( nByte > '9' ) ) nSecurityCount = 1; // error parsing the bounding box values else if ( bValid ) { nRetValue *= 10; nRetValue += nByte - '0'; } break; } nSecurityCount--; nByte = *(++(*pBuf)); } if ( bNegative ) nRetValue = -nRetValue; return nRetValue; } static int ImplGetLen( sal_uInt8* pBuf, int nMax ) { int nLen = 0; while( nLen != nMax ) { sal_uInt8 nDat = *pBuf++; if ( nDat == 0x0a || nDat == 0x25 ) break; nLen++; } return nLen; } static void MakeAsMeta(Graphic &rGraphic) { VirtualDevice aVDev; GDIMetaFile aMtf; Bitmap aBmp( rGraphic.GetBitmap() ); Size aSize = aBmp.GetPrefSize(); if( !aSize.Width() || !aSize.Height() ) aSize = Application::GetDefaultDevice()->PixelToLogic( aBmp.GetSizePixel(), MAP_100TH_MM ); else aSize = Application::GetDefaultDevice()->LogicToLogic( aSize, aBmp.GetPrefMapMode(), MAP_100TH_MM ); aVDev.EnableOutput( false ); aMtf.Record( &aVDev ); aVDev.DrawBitmap( Point(), aSize, rGraphic.GetBitmap() ); aMtf.Stop(); aMtf.WindStart(); aMtf.SetPrefMapMode( MAP_100TH_MM ); aMtf.SetPrefSize( aSize ); rGraphic = aMtf; } static oslProcessError runProcessWithPathSearch(const OUString &rProgName, rtl_uString* pArgs[], sal_uInt32 nArgs, oslProcess *pProcess, oslFileHandle *pIn, oslFileHandle *pOut, oslFileHandle *pErr) { oslProcessError result; oslSecurity pSecurity = osl_getCurrentSecurity(); #ifdef WNT /* * ooo#72096 * On Window the underlying SearchPath searches in order of... * The directory from which the application loaded. * The current directory. * The Windows system directory. * The Windows directory. * The directories that are listed in the PATH environment variable. * * Because one of our programs is called "convert" and there is a convert * in the windows system directory, we want to explicitly search the PATH * to avoid picking up on that one if ImageMagick's convert precedes it in * PATH. * */ OUString url; OUString path(reinterpret_cast(_wgetenv(L"PATH"))); oslFileError err = osl_searchFileURL(rProgName.pData, path.pData, &url.pData); if (err != osl_File_E_None) return osl_Process_E_NotFound; result = osl_executeProcess_WithRedirectedIO(url.pData, pArgs, nArgs, osl_Process_HIDDEN, pSecurity, 0, 0, 0, pProcess, pIn, pOut, pErr); #else result = osl_executeProcess_WithRedirectedIO(rProgName.pData, pArgs, nArgs, osl_Process_SEARCHPATH | osl_Process_HIDDEN, pSecurity, 0, 0, 0, pProcess, pIn, pOut, pErr); #endif osl_freeSecurityHandle( pSecurity ); return result; } #if defined(WNT) # define EXESUFFIX ".exe" #else # define EXESUFFIX "" #endif static bool RenderAsEMF(const sal_uInt8* pBuf, sal_uInt32 nBytesRead, Graphic &rGraphic) { utl::TempFile aTemp; aTemp.EnableKillingFile(); OUString fileName("pstoedit" EXESUFFIX); OUString arg1("-f"); OUString arg2("emf:-OO"); OUString arg3("-"); OUString output; osl::FileBase::getSystemPathFromFileURL(aTemp.GetURL(), output); rtl_uString *args[] = { arg1.pData, arg2.pData, arg3.pData, output.pData }; oslProcess aProcess; oslFileHandle pIn = NULL; oslFileHandle pOut = NULL; oslFileHandle pErr = NULL; oslProcessError eErr = runProcessWithPathSearch(fileName, args, sizeof(args)/sizeof(rtl_uString *), &aProcess, &pIn, &pOut, &pErr); if (eErr!=osl_Process_E_None) return false; bool bRet = false; sal_uInt64 nCount; osl_writeFile(pIn, pBuf, nBytesRead, &nCount); if (pIn) osl_closeFile(pIn); bool bEMFSupported=true; if (pOut) { rtl::ByteSequence seq; if (osl_File_E_None == osl_readLine(pOut, (sal_Sequence **)&seq)) { OString line( (const sal_Char *) seq.getConstArray(), seq.getLength() ); if (line.startsWith("Unsupported output format")) bEMFSupported=false; } osl_closeFile(pOut); } if (pErr) osl_closeFile(pErr); osl_joinProcess(aProcess); osl_freeProcessHandle(aProcess); if (nCount == nBytesRead && bEMFSupported) { SvFileStream aFile(output, STREAM_READ); if (GraphicConverter::Import(aFile, rGraphic, CVT_EMF) == ERRCODE_NONE) bRet = true; } return bRet; } static bool RenderAsBMPThroughHelper(const sal_uInt8* pBuf, sal_uInt32 nBytesRead, Graphic &rGraphic, OUString &rProgName, rtl_uString *pArgs[], size_t nArgs) { oslProcess aProcess; oslFileHandle pIn = NULL; oslFileHandle pOut = NULL; oslFileHandle pErr = NULL; oslProcessError eErr = runProcessWithPathSearch(rProgName, pArgs, nArgs, &aProcess, &pIn, &pOut, &pErr); if (eErr!=osl_Process_E_None) return false; bool bRet = false; sal_uInt64 nCount; osl_writeFile(pIn, pBuf, nBytesRead, &nCount); if (pIn) osl_closeFile(pIn); if (nCount == nBytesRead) { SvMemoryStream aMemStm; sal_uInt8 aBuf[32000]; oslFileError eFileErr = osl_readFile(pOut, aBuf, 32000, &nCount); while (eFileErr == osl_File_E_None && nCount) { aMemStm.Write(aBuf, sal::static_int_cast< sal_Size >(nCount)); eFileErr = osl_readFile(pOut, aBuf, 32000, &nCount); } aMemStm.Seek(0); if ( aMemStm.GetEndOfData() && GraphicConverter::Import(aMemStm, rGraphic, CVT_BMP) == ERRCODE_NONE ) { MakeAsMeta(rGraphic); bRet = true; } } if (pOut) osl_closeFile(pOut); if (pErr) osl_closeFile(pErr); osl_joinProcess(aProcess); osl_freeProcessHandle(aProcess); return bRet; } static bool RenderAsBMPThroughConvert(const sal_uInt8* pBuf, sal_uInt32 nBytesRead, Graphic &rGraphic) { OUString fileName("convert" EXESUFFIX); // density in pixel/inch OUString arg1("-density"); // since the preview is also used for PDF-Export & printing on non-PS-printers, // use some better quality - 300x300 should allow some resizing as well OUString arg2("300x300"); // read eps from STDIN OUString arg3("eps:-"); // write bmp to STDOUT OUString arg4("bmp:-"); rtl_uString *args[] = { arg1.pData, arg2.pData, arg3.pData, arg4.pData }; return RenderAsBMPThroughHelper(pBuf, nBytesRead, rGraphic, fileName, args, sizeof(args)/sizeof(rtl_uString *)); } static bool RenderAsBMPThroughGS(const sal_uInt8* pBuf, sal_uInt32 nBytesRead, Graphic &rGraphic) { #ifdef WNT OUString fileName("gswin32c" EXESUFFIX); #else OUString fileName("gs" EXESUFFIX); #endif OUString arg1("-q"); OUString arg2("-dBATCH"); OUString arg3("-dNOPAUSE"); OUString arg4("-dPARANOIDSAFER"); OUString arg5("-dEPSCrop"); OUString arg6("-dTextAlphaBits=4"); OUString arg7("-dGraphicsAlphaBits=4"); OUString arg8("-r300x300"); OUString arg9("-sDEVICE=bmp256"); OUString arg10("-sOutputFile=-"); OUString arg11("-"); rtl_uString *args[] = { arg1.pData, arg2.pData, arg3.pData, arg4.pData, arg5.pData, arg6.pData, arg7.pData, arg8.pData, arg9.pData, arg10.pData, arg11.pData }; return RenderAsBMPThroughHelper(pBuf, nBytesRead, rGraphic, fileName, args, sizeof(args)/sizeof(rtl_uString *)); } static bool RenderAsBMP(const sal_uInt8* pBuf, sal_uInt32 nBytesRead, Graphic &rGraphic) { if (RenderAsBMPThroughGS(pBuf, nBytesRead, rGraphic)) return true; else return RenderAsBMPThroughConvert(pBuf, nBytesRead, rGraphic); } // this method adds a replacement action containing the original wmf or tiff replacement, // so the original eps can be written when storing to ODF. void CreateMtfReplacementAction( GDIMetaFile& rMtf, SvStream& rStrm, sal_uInt32 nOrigPos, sal_uInt32 nPSSize, sal_uInt32 nPosWMF, sal_uInt32 nSizeWMF, sal_uInt32 nPosTIFF, sal_uInt32 nSizeTIFF ) { OString aComment("EPSReplacementGraphic"); if ( nSizeWMF || nSizeTIFF ) { SvMemoryStream aReplacement( nSizeWMF + nSizeTIFF + 28 ); sal_uInt32 nMagic = 0xc6d3d0c5; sal_uInt32 nPPos = 28 + nSizeWMF + nSizeTIFF; sal_uInt32 nWPos = nSizeWMF ? 28 : 0; sal_uInt32 nTPos = nSizeTIFF ? 28 + nSizeWMF : 0; aReplacement.WriteUInt32( nMagic ).WriteUInt32( nPPos ).WriteUInt32( nPSSize ) .WriteUInt32( nWPos ).WriteUInt32( nSizeWMF ) .WriteUInt32( nTPos ).WriteUInt32( nSizeTIFF ); if ( nSizeWMF ) { boost::scoped_array pBuf(new sal_uInt8[ nSizeWMF ]); rStrm.Seek( nOrigPos + nPosWMF ); rStrm.Read( pBuf.get(), nSizeWMF ); aReplacement.Write( pBuf.get(), nSizeWMF ); } if ( nSizeTIFF ) { boost::scoped_array pBuf(new sal_uInt8[ nSizeTIFF ]); rStrm.Seek( nOrigPos + nPosTIFF ); rStrm.Read( pBuf.get(), nSizeTIFF ); aReplacement.Write( pBuf.get(), nSizeTIFF ); } rMtf.AddAction( (MetaAction*)( new MetaCommentAction( aComment, 0, (const sal_uInt8*)aReplacement.GetData(), aReplacement.Tell() ) ) ); } else rMtf.AddAction( (MetaAction*)( new MetaCommentAction( aComment, 0, NULL, 0 ) ) ); } //there is no preview -> make a red box void MakePreview(sal_uInt8* pBuf, sal_uInt32 nBytesRead, long nWidth, long nHeight, Graphic &rGraphic) { GDIMetaFile aMtf; VirtualDevice aVDev; Font aFont; aVDev.EnableOutput( false ); aMtf.Record( &aVDev ); aVDev.SetLineColor( Color( COL_RED ) ); aVDev.SetFillColor(); aFont.SetColor( COL_LIGHTRED ); // aFont.SetSize( Size( 0, 32 ) ); aVDev.Push( PUSH_FONT ); aVDev.SetFont( aFont ); Rectangle aRect( Point( 1, 1 ), Size( nWidth - 2, nHeight - 2 ) ); aVDev.DrawRect( aRect ); OUString aString; int nLen; sal_uInt8* pDest = ImplSearchEntry( pBuf, (sal_uInt8*)"%%Title:", nBytesRead - 32, 8 ); if ( pDest ) { pDest += 8; if ( *pDest == ' ' ) pDest++; nLen = ImplGetLen( pDest, 32 ); sal_uInt8 aOldValue(pDest[ nLen ]); pDest[ nLen ] = 0; if ( strcmp( (const char*)pDest, "none" ) != 0 ) { aString += " Title:" + OUString::createFromAscii( (char*)pDest ) + "\n"; } pDest[ nLen ] = aOldValue; } pDest = ImplSearchEntry( pBuf, (sal_uInt8*)"%%Creator:", nBytesRead - 32, 10 ); if ( pDest ) { pDest += 10; if ( *pDest == ' ' ) pDest++; nLen = ImplGetLen( pDest, 32 ); sal_uInt8 aOldValue(pDest[ nLen ]); pDest[ nLen ] = 0; aString += " Creator:" + OUString::createFromAscii( (char*)pDest ) + "\n"; pDest[ nLen ] = aOldValue; } pDest = ImplSearchEntry( pBuf, (sal_uInt8*)"%%CreationDate:", nBytesRead - 32, 15 ); if ( pDest ) { pDest += 15; if ( *pDest == ' ' ) pDest++; nLen = ImplGetLen( pDest, 32 ); sal_uInt8 aOldValue(pDest[ nLen ]); pDest[ nLen ] = 0; if ( strcmp( (const char*)pDest, "none" ) != 0 ) { aString += " CreationDate:" + OUString::createFromAscii( (char*)pDest ) + "\n"; } pDest[ nLen ] = aOldValue; } pDest = ImplSearchEntry( pBuf, (sal_uInt8*)"%%LanguageLevel:", nBytesRead - 4, 16 ); if ( pDest ) { pDest += 16; int nCount = 4; long nNumber = ImplGetNumber( &pDest, nCount ); if ( nCount && ( (sal_uInt32)nNumber < 10 ) ) { aString += " LanguageLevel:" + OUString::number( nNumber ); } } aVDev.DrawText( aRect, aString, TEXT_DRAW_CLIP | TEXT_DRAW_MULTILINE ); aVDev.Pop(); aMtf.Stop(); aMtf.WindStart(); aMtf.SetPrefMapMode( MAP_POINT ); aMtf.SetPrefSize( Size( nWidth, nHeight ) ); rGraphic = aMtf; } //================== GraphicImport - the exported function ================ // this needs to be kept in sync with // ImpFilterLibCacheEntry::GetImportFunction() from // vcl/source/filter/graphicfilter.cxx #if defined(DISABLE_DYNLOADING) #define GraphicImport ipsGraphicImport #endif extern "C" SAL_DLLPUBLIC_EXPORT bool SAL_CALL GraphicImport( SvStream & rStream, Graphic & rGraphic, FilterConfigItem* ) { if ( rStream.GetError() ) return false; Graphic aGraphic; bool bRetValue = false; bool bHasPreview = false; bool bGraphicLinkCreated = false; sal_uInt32 nSignature, nPSStreamPos, nPSSize; sal_uInt32 nSizeWMF = 0; sal_uInt32 nPosWMF = 0; sal_uInt32 nSizeTIFF = 0; sal_uInt32 nPosTIFF = 0; sal_uInt32 nOrigPos = nPSStreamPos = rStream.Tell(); sal_uInt16 nOldFormat = rStream.GetNumberFormatInt(); rStream.SetNumberFormatInt( NUMBERFORMAT_INT_LITTLEENDIAN ); rStream.ReadUInt32( nSignature ); if ( nSignature == 0xc6d3d0c5 ) { rStream.ReadUInt32( nPSStreamPos ).ReadUInt32( nPSSize ).ReadUInt32( nPosWMF ).ReadUInt32( nSizeWMF ); // first we try to get the metafile grafix if ( nSizeWMF ) { if ( nPosWMF != 0 ) { rStream.Seek( nOrigPos + nPosWMF ); if ( GraphicConverter::Import( rStream, aGraphic, CVT_WMF ) == ERRCODE_NONE ) bHasPreview = bRetValue = true; } } else { rStream.ReadUInt32( nPosTIFF ).ReadUInt32( nSizeTIFF ); // else we have to get the tiff grafix if ( nPosTIFF && nSizeTIFF ) { rStream.Seek( nOrigPos + nPosTIFF ); if ( GraphicConverter::Import( rStream, aGraphic, CVT_TIF ) == ERRCODE_NONE ) { MakeAsMeta(aGraphic); rStream.Seek( nOrigPos + nPosTIFF ); bHasPreview = bRetValue = true; } } } } else { nPSStreamPos = nOrigPos; // no preview available _>so we must get the size manually nPSSize = rStream.Seek( STREAM_SEEK_TO_END ) - nOrigPos; } sal_uInt8* pHeader = new sal_uInt8[ 22 ]; rStream.Seek( nPSStreamPos ); rStream.Read( pHeader, 22 ); // check PostScript header if ( ImplSearchEntry( pHeader, (sal_uInt8*)"%!PS-Adobe", 10, 10 ) && ImplSearchEntry( &pHeader[ 15 ], (sal_uInt8*)"EPS", 3, 3 ) ) { rStream.Seek( nPSStreamPos ); sal_uInt8* pBuf = new sal_uInt8[ nPSSize ]; if ( pBuf ) { sal_uInt32 nBufStartPos = rStream.Tell(); sal_uInt32 nBytesRead = rStream.Read( pBuf, nPSSize ); if ( nBytesRead == nPSSize ) { int nSecurityCount = 32; if ( !bHasPreview ) // if there is no tiff/wmf preview, we will parse for an preview in the eps prolog { sal_uInt8* pDest = ImplSearchEntry( pBuf, (sal_uInt8*)"%%BeginPreview:", nBytesRead - 32, 15 ); if ( pDest ) { pDest += 15; long nWidth = ImplGetNumber( &pDest, nSecurityCount ); long nHeight = ImplGetNumber( &pDest, nSecurityCount ); long nBitDepth = ImplGetNumber( &pDest, nSecurityCount ); long nScanLines = ImplGetNumber( &pDest, nSecurityCount ); pDest = ImplSearchEntry( pDest, (sal_uInt8*)"%", 16, 1 ); // go to the first Scanline if ( nSecurityCount && pDest && nWidth && nHeight && ( ( nBitDepth == 1 ) || ( nBitDepth == 8 ) ) && nScanLines ) { rStream.Seek( nBufStartPos + ( pDest - pBuf ) ); Bitmap aBitmap( Size( nWidth, nHeight ), 1 ); BitmapWriteAccess* pAcc = aBitmap.AcquireWriteAccess(); if ( pAcc ) { int nBitsLeft; bool bIsValid = true; sal_uInt8 nDat = 0; char nByte; for ( long y = 0; bIsValid && ( y < nHeight ); y++ ) { nBitsLeft = 0; for ( long x = 0; x < nWidth; x++ ) { if ( --nBitsLeft < 0 ) { while ( bIsValid && ( nBitsLeft != 7 ) ) { rStream.ReadChar( nByte ); switch ( nByte ) { case 0x0a : if ( --nScanLines < 0 ) bIsValid = false; case 0x09 : case 0x0d : case 0x20 : case 0x25 : break; default: { if ( nByte >= '0' ) { if ( nByte > '9' ) { nByte &=~0x20; // case none sensitive for hexadecimal values nByte -= ( 'A' - 10 ); if ( nByte > 15 ) bIsValid = false; } else nByte -= '0'; nBitsLeft += 4; nDat <<= 4; nDat |= ( nByte ^ 0xf ); // in epsi a zero bit represents white color } else bIsValid = false; } break; } } } if ( nBitDepth == 1 ) pAcc->SetPixelIndex( y, x, static_cast(nDat >> nBitsLeft) & 1 ); else { pAcc->SetPixelIndex( y, x, nDat ? 1 : 0 ); // nBitDepth == 8 nBitsLeft = 0; } } } if ( bIsValid ) { VirtualDevice aVDev; GDIMetaFile aMtf; Size aSize; aVDev.EnableOutput( false ); aMtf.Record( &aVDev ); aSize = aBitmap.GetPrefSize(); if( !aSize.Width() || !aSize.Height() ) aSize = Application::GetDefaultDevice()->PixelToLogic( aBitmap.GetSizePixel(), MAP_100TH_MM ); else aSize = Application::GetDefaultDevice()->LogicToLogic( aSize, aBitmap.GetPrefMapMode(), MAP_100TH_MM ); aVDev.DrawBitmap( Point(), aSize, aBitmap ); aMtf.Stop(); aMtf.WindStart(); aMtf.SetPrefMapMode( MAP_100TH_MM ); aMtf.SetPrefSize( aSize ); aGraphic = aMtf; bHasPreview = bRetValue = true; } aBitmap.ReleaseAccess( pAcc ); } } } } sal_uInt8* pDest = ImplSearchEntry( pBuf, (sal_uInt8*)"%%BoundingBox:", nBytesRead, 14 ); if ( pDest ) { nSecurityCount = 100; long nNumb[4]; nNumb[0] = nNumb[1] = nNumb[2] = nNumb[3] = 0; pDest += 14; for ( int i = 0; ( i < 4 ) && nSecurityCount; i++ ) { nNumb[ i ] = ImplGetNumber( &pDest, nSecurityCount ); } if ( nSecurityCount) { bGraphicLinkCreated = true; GfxLink aGfxLink( pBuf, nPSSize, GFX_LINK_TYPE_EPS_BUFFER, true ) ; GDIMetaFile aMtf; long nWidth = nNumb[2] - nNumb[0] + 1; long nHeight = nNumb[3] - nNumb[1] + 1; // if there is no preview -> try with gs to make one if( !bHasPreview ) { bHasPreview = RenderAsEMF(pBuf, nBytesRead, aGraphic); if (!bHasPreview) bHasPreview = RenderAsBMP(pBuf, nBytesRead, aGraphic); } // if there is no preview -> make a red box if( !bHasPreview ) { MakePreview(pBuf, nBytesRead, nWidth, nHeight, aGraphic); } aMtf.AddAction( (MetaAction*)( new MetaEPSAction( Point(), Size( nWidth, nHeight ), aGfxLink, aGraphic.GetGDIMetaFile() ) ) ); CreateMtfReplacementAction( aMtf, rStream, nOrigPos, nPSSize, nPosWMF, nSizeWMF, nPosTIFF, nSizeTIFF ); aMtf.WindStart(); aMtf.SetPrefMapMode( MAP_POINT ); aMtf.SetPrefSize( Size( nWidth, nHeight ) ); rGraphic = aMtf; bRetValue = true; } } } } if ( !bGraphicLinkCreated ) delete[] pBuf; } delete[] pHeader; rStream.SetNumberFormatInt(nOldFormat); rStream.Seek( nOrigPos ); return ( bRetValue ); } /* vim:set shiftwidth=4 softtabstop=4 expandtab: */