sc/source/filter/rtf/rtfexp.cxx

   1 /*************************************************************************
   2  *
   3  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
   4  *
   5  * Copyright 2000, 2010 Oracle and/or its affiliates.
   6  *
   7  * OpenOffice.org - a multi-platform office productivity suite
   8  *
   9  * This file is part of OpenOffice.org.
  10  *
  11  * OpenOffice.org is free software: you can redistribute it and/or modify
  12  * it under the terms of the GNU Lesser General Public License version 3
  13  * only, as published by the Free Software Foundation.
  14  *
  15  * OpenOffice.org is distributed in the hope that it will be useful,
  16  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  17  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  18  * GNU Lesser General Public License version 3 for more details
  19  * (a copy is included in the LICENSE file that accompanied this code).
  20  *
  21  * You should have received a copy of the GNU Lesser General Public License
  22  * version 3 along with OpenOffice.org.  If not, see
  23  * <http://www.openoffice.org/license.html>
  24  * for a copy of the LGPLv3 License.
  25  *
  26  ************************************************************************/
  27
  28 // MARKER(update_precomp.py): autogen include statement, do not remove
  29 #include "precompiled_sc.hxx"
  30
  31
  32
  33 #include "scitems.hxx"
  34 #include <editeng/eeitem.hxx>
  35
  36
  37 #include <svx/algitem.hxx>
  38 #include <editeng/wghtitem.hxx>
  39 #include <editeng/postitem.hxx>
  40 #include <editeng/udlnitem.hxx>
  41 #include <editeng/fontitem.hxx>
  42 #include <editeng/fhgtitem.hxx>
  43 #include <svl/style.hxx>
  44 #include <svtools/rtfout.hxx>
  45 #include <svtools/rtfkeywd.hxx>
  46
  47 #include "rtfexp.hxx"
  48 #include "filter.hxx"
  49 #include "document.hxx"
  50 #include "patattr.hxx"
  51 #include "attrib.hxx"
  52 #include "cell.hxx"
  53 #include "cellform.hxx"
  54 #include "editutil.hxx"
  55 #include "stlpool.hxx"
  56 #include "ftools.hxx"
  57
  58 //------------------------------------------------------------------
  59
  60 FltError ScFormatFilterPluginImpl::ScExportRTF( SvStream& rStrm, ScDocument* pDoc,
  61         const ScRange& rRange, const CharSet /*eNach*/ )
  62 {
  63     ScRTFExport aEx( rStrm, pDoc, rRange );
  64     return aEx.Write();
  65 }
  66
  67
  68 ScRTFExport::ScRTFExport( SvStream& rStrmP, ScDocument* pDocP, const ScRange& rRangeP )
  69             :
  70             ScExportBase( rStrmP, pDocP, rRangeP ),
  71             pCellX( new ULONG[ MAXCOL+2 ] )
  72 {
  73 }
  74
  75
  76 ScRTFExport::~ScRTFExport()
  77 {
  78     delete [] pCellX;
  79 }
  80
  81
  82 ULONG ScRTFExport::Write()
  83 {
  84     rStrm << '{' << OOO_STRING_SVTOOLS_RTF_RTF;
  85     rStrm << OOO_STRING_SVTOOLS_RTF_ANSI << sNewLine;
  86
  87 #if 0
  88 // das ist noch nicht ausgegoren
  89 /*
  90     SfxStyleSheetBasePool*  pStylePool  = pDoc->GetStyleSheetPool();
  91     SfxStyleSheetBase*      pStyleSheet = NULL;
  92     DBG_ASSERT( pStylePool, "StylePool not found! :-(" );
  93     pStylePool->SetSearchMask( SFX_STYLE_FAMILY_PARA, SFXSTYLEBIT_ALL );
  94     pStyleSheet = pStylePool->Find( STRING_STANDARD, SFX_STYLE_FAMILY_PARA );
  95     DBG_ASSERT( pStyleSheet, "ParaStyle not found! :-(" );
  96     const SfxItemSet& rSetPara = pStyleSheet->GetItemSet();
  97
  98     // fonttbl
  99     String aFontFamilyName(
 100         ((const SvxFontItem&)(rSetPara.Get( ATTR_FONT ))).GetFamilyName() );
 101     rStrm << OOO_STRING_SVTOOLS_RTF_DEFF << '0'
 102         << '{' << OOO_STRING_SVTOOLS_RTF_FONTTBL
 103         << '{' << OOO_STRING_SVTOOLS_RTF_F << '0' << OOO_STRING_SVTOOLS_RTF_FNIL << ' ' << aFontFamilyName.GetStr() << ";}"
 104         << '}' << sNewLine;
 105
 106     // hier kaeme die colortbl
 107
 108     // stylesheet
 109     UINT32 nFontHeight =
 110         ((const SvxFontHeightItem&)(rSetPara.Get( ATTR_FONT_HEIGHT ))).GetHeight();
 111     rStrm << '{' << OOO_STRING_SVTOOLS_RTF_STYLESHEET
 112         << '{' << OOO_STRING_SVTOOLS_RTF_FS << String( UINT32(nFontHeight / TWIPS_PER_POINT) ).GetStr()
 113             << ' ' << pStyleSheet->GetName().GetStr() << ";}"
 114         << '}' << sNewLine;
 115 */
 116 #endif
 117
 118     // Daten
 119     for ( SCTAB nTab = aRange.aStart.Tab(); nTab <= aRange.aEnd.Tab(); nTab++ )
 120     {
 121         if ( nTab > aRange.aStart.Tab() )
 122             rStrm << OOO_STRING_SVTOOLS_RTF_PAR;
 123         WriteTab( nTab );
 124     }
 125
 126     rStrm << '}' << sNewLine;
 127     return rStrm.GetError();
 128 }
 129
 130
 131 void ScRTFExport::WriteTab( SCTAB nTab )
 132 {
 133     rStrm << '{' << sNewLine;
 134     if ( pDoc->HasTable( nTab ) )
 135     {
 136         memset( &pCellX[0], 0, (MAXCOL+2) * sizeof(ULONG) );
 137         SCCOL nCol;
 138         SCCOL nEndCol = aRange.aEnd.Col();
 139         for ( nCol = aRange.aStart.Col(); nCol <= nEndCol; nCol++ )
 140         {
 141             pCellX[nCol+1] = pCellX[nCol] + pDoc->GetColWidth( nCol, nTab );
 142         }
 143
 144         SCROW nEndRow = aRange.aEnd.Row();
 145         for ( SCROW nRow = aRange.aStart.Row(); nRow <= nEndRow; nRow++ )
 146         {
 147             WriteRow( nTab, nRow );
 148         }
 149     }
 150     rStrm << '}' << sNewLine;
 151 }
 152
 153
 154 void ScRTFExport::WriteRow( SCTAB nTab, SCROW nRow )
 155 {
 156     rStrm << OOO_STRING_SVTOOLS_RTF_TROWD << OOO_STRING_SVTOOLS_RTF_TRGAPH << "30" << OOO_STRING_SVTOOLS_RTF_TRLEFT << "-30";
 157     rStrm << OOO_STRING_SVTOOLS_RTF_TRRH << ByteString::CreateFromInt32( pDoc->GetRowHeight( nRow, nTab ) ).GetBuffer();
 158     SCCOL nCol;
 159     SCCOL nEndCol = aRange.aEnd.Col();
 160     for ( nCol = aRange.aStart.Col(); nCol <= nEndCol; nCol++ )
 161     {
 162         const ScPatternAttr* pAttr = pDoc->GetPattern( nCol, nRow, nTab );
 163         const ScMergeAttr&      rMergeAttr      = (const ScMergeAttr&)      pAttr->GetItem( ATTR_MERGE );
 164         const SvxVerJustifyItem& rVerJustifyItem= (const SvxVerJustifyItem&)pAttr->GetItem( ATTR_VER_JUSTIFY );
 165
 166         const sal_Char* pChar;
 167
 168         if ( rMergeAttr.GetColMerge() != 0 )
 169             rStrm << OOO_STRING_SVTOOLS_RTF_CLMGF;
 170         else
 171         {
 172             const ScMergeFlagAttr& rMergeFlagAttr = (const ScMergeFlagAttr&) pAttr->GetItem( ATTR_MERGE_FLAG );
 173             if ( rMergeFlagAttr.IsHorOverlapped() )
 174                 rStrm << OOO_STRING_SVTOOLS_RTF_CLMRG;
 175         }
 176
 177         switch( rVerJustifyItem.GetValue() )
 178         {
 179             case SVX_VER_JUSTIFY_TOP:       pChar = OOO_STRING_SVTOOLS_RTF_CLVERTALT;   break;
 180             case SVX_VER_JUSTIFY_CENTER:    pChar = OOO_STRING_SVTOOLS_RTF_CLVERTALC;   break;
 181             case SVX_VER_JUSTIFY_BOTTOM:    pChar = OOO_STRING_SVTOOLS_RTF_CLVERTALB;   break;
 182             case SVX_VER_JUSTIFY_STANDARD:  pChar = OOO_STRING_SVTOOLS_RTF_CLVERTALB;   break;  //! Bottom
 183             default:                        pChar = NULL;           break;
 184         }
 185         if ( pChar )
 186             rStrm << pChar;
 187
 188         rStrm << OOO_STRING_SVTOOLS_RTF_CELLX << ByteString::CreateFromInt32( pCellX[nCol+1] ).GetBuffer();
 189         if ( (nCol & 0x0F) == 0x0F )
 190             rStrm << sNewLine;      // Zeilen nicht zu lang werden lassen
 191     }
 192     rStrm << OOO_STRING_SVTOOLS_RTF_PARD << OOO_STRING_SVTOOLS_RTF_PLAIN << OOO_STRING_SVTOOLS_RTF_INTBL << sNewLine;
 193
 194     ULONG nStrmPos = rStrm.Tell();
 195     for ( nCol = aRange.aStart.Col(); nCol <= nEndCol; nCol++ )
 196     {
 197         WriteCell( nTab, nRow, nCol );
 198         if ( rStrm.Tell() - nStrmPos > 255 )
 199         {   // Zeilen nicht zu lang werden lassen
 200             rStrm << sNewLine;
 201             nStrmPos = rStrm.Tell();
 202         }
 203     }
 204     rStrm << OOO_STRING_SVTOOLS_RTF_ROW << sNewLine;
 205 }
 206
 207
 208 void ScRTFExport::WriteCell( SCTAB nTab, SCROW nRow, SCCOL nCol )
 209 {
 210     const ScPatternAttr* pAttr = pDoc->GetPattern( nCol, nRow, nTab );
 211
 212     const ScMergeFlagAttr& rMergeFlagAttr = (const ScMergeFlagAttr&) pAttr->GetItem( ATTR_MERGE_FLAG );
 213     if ( rMergeFlagAttr.IsHorOverlapped() )
 214     {
 215         rStrm << OOO_STRING_SVTOOLS_RTF_CELL;
 216         return ;
 217     }
 218
 219     ScBaseCell* pCell;
 220     pDoc->GetCell( nCol, nRow, nTab, pCell );
 221     BOOL bValueData;
 222     String aContent;
 223     if ( pCell )
 224     {
 225         switch ( pCell->GetCellType() )
 226         {
 227             case CELLTYPE_NOTE :
 228                 bValueData = FALSE;
 229             break;      // nix
 230             case CELLTYPE_EDIT :
 231             {
 232                 bValueData = FALSE;
 233                 EditEngine& rEngine = GetEditEngine();
 234                 const EditTextObject* pObj;
 235                 ((const ScEditCell*)pCell)->GetData( pObj );
 236                 if ( pObj )
 237                 {
 238                     rEngine.SetText( *pObj );
 239                     aContent = rEngine.GetText( LINEEND_LF );   // LineFeed zwischen Absaetzen!
 240                 }
 241             }
 242             break;
 243             default:
 244             {
 245                 bValueData = pCell->HasValueData();
 246                 ULONG nFormat = pAttr->GetNumberFormat( pFormatter );
 247                 Color* pColor;
 248                 ScCellFormat::GetString( pCell, nFormat, aContent, &pColor, *pFormatter );
 249             }
 250         }
 251     }
 252     else
 253         bValueData = FALSE;
 254
 255     BOOL bResetPar, bResetAttr;
 256     bResetPar = bResetAttr = FALSE;
 257
 258     const SvxHorJustifyItem&    rHorJustifyItem = (const SvxHorJustifyItem&)pAttr->GetItem( ATTR_HOR_JUSTIFY );
 259     const SvxWeightItem&        rWeightItem     = (const SvxWeightItem&)    pAttr->GetItem( ATTR_FONT_WEIGHT );
 260     const SvxPostureItem&       rPostureItem    = (const SvxPostureItem&)   pAttr->GetItem( ATTR_FONT_POSTURE );
 261     const SvxUnderlineItem&     rUnderlineItem  = (const SvxUnderlineItem&) pAttr->GetItem( ATTR_FONT_UNDERLINE );
 262
 263     const sal_Char* pChar;
 264
 265     switch( rHorJustifyItem.GetValue() )
 266     {
 267         case SVX_HOR_JUSTIFY_STANDARD:
 268             pChar = (bValueData ? OOO_STRING_SVTOOLS_RTF_QR : OOO_STRING_SVTOOLS_RTF_QL);
 269             break;
 270         case SVX_HOR_JUSTIFY_CENTER:    pChar = OOO_STRING_SVTOOLS_RTF_QC;  break;
 271         case SVX_HOR_JUSTIFY_BLOCK:     pChar = OOO_STRING_SVTOOLS_RTF_QJ;  break;
 272         case SVX_HOR_JUSTIFY_RIGHT:     pChar = OOO_STRING_SVTOOLS_RTF_QR;  break;
 273         case SVX_HOR_JUSTIFY_LEFT:
 274         case SVX_HOR_JUSTIFY_REPEAT:
 275         default:                        pChar = OOO_STRING_SVTOOLS_RTF_QL;  break;
 276     }
 277     rStrm << pChar;
 278
 279     if ( rWeightItem.GetWeight() >= WEIGHT_BOLD )
 280     {   // bold
 281         bResetAttr = TRUE;
 282         rStrm << OOO_STRING_SVTOOLS_RTF_B;
 283     }
 284     if ( rPostureItem.GetPosture() != ITALIC_NONE )
 285     {   // italic
 286         bResetAttr = TRUE;
 287         rStrm << OOO_STRING_SVTOOLS_RTF_I;
 288     }
 289     if ( rUnderlineItem.GetLineStyle() != UNDERLINE_NONE )
 290     {   // underline
 291         bResetAttr = TRUE;
 292         rStrm << OOO_STRING_SVTOOLS_RTF_UL;
 293     }
 294
 295     rStrm << ' ';
 296     RTFOutFuncs::Out_String( rStrm, aContent );
 297     rStrm << OOO_STRING_SVTOOLS_RTF_CELL;
 298
 299     if ( bResetPar )
 300         rStrm << OOO_STRING_SVTOOLS_RTF_PARD << OOO_STRING_SVTOOLS_RTF_INTBL;
 301     if ( bResetAttr )
 302         rStrm << OOO_STRING_SVTOOLS_RTF_PLAIN;
 303 }
 304
 305