sc/source/filter/lotus/lotread.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 //------------------------------------------------------------------------
  34
  35 #include "document.hxx"
  36
  37 #include "scerrors.hxx"
  38 #include "root.hxx"
  39 #include "lotimpop.hxx"
  40 #include "lotattr.hxx"
  41 #include "fprogressbar.hxx"
  42
  43
  44 class ScFormulaCell;
  45
  46
  47 FltError ImportLotus::Read()
  48 {
  49     enum STATE
  50     {
  51         S_START,        // analyse first BOF
  52         S_WK1,          // in WK1-Stream
  53         S_WK3,          // in WK3-Section
  54         S_WK4,          // ...
  55         S_FM3,          // ...
  56         S_END           // Import finished
  57     };
  58
  59     UINT16          nOp;
  60     UINT16          nSubType;
  61     UINT16          nRecLen;
  62     UINT32          nNextRec = 0UL;
  63     FltError        eRet = eERR_OK;
  64 //  ScFormulaCell   *pLastFormCell;
  65
  66     STATE           eAkt = S_START;
  67
  68     nTab = 0;
  69     nExtTab = -2;
  70
  71     pIn->Seek( nNextRec );
  72
  73     // Progressbar starten
  74     ScfStreamProgressBar aPrgrsBar( *pIn, pD->GetDocumentShell() );
  75
  76     while( eAkt != S_END )
  77     {
  78         *pIn >> nOp >> nRecLen;
  79
  80         if( pIn->IsEof() )
  81             eAkt = S_END;
  82
  83         nNextRec += nRecLen + 4;
  84
  85         switch( eAkt )
  86         {
  87             // -----------------------------------------------------------
  88             case S_START:                                           // S_START
  89             if( nOp )
  90             {
  91                 eRet = SCERR_IMPORT_UNKNOWN_WK;
  92                 eAkt = S_END;
  93             }
  94             else
  95             {
  96                 if( nRecLen > 2 )
  97                 {
  98                     Bof();
  99                     switch( pLotusRoot->eFirstType )
 100                     {
 101                         case Lotus_WK1: eAkt = S_WK1; break;
 102                         case Lotus_WK3: eAkt = S_WK3; break;
 103                         case Lotus_WK4: eAkt = S_WK4; break;
 104                         case Lotus_FM3: eAkt = S_FM3; break;
 105                         default:
 106                         eRet = SCERR_IMPORT_UNKNOWN_WK;
 107                         eAkt = S_END;
 108                     }
 109                 }
 110                 else
 111                 {
 112                     eAkt = S_END;   // hier kommt wat fuer <= WK1 hinne!
 113                     eRet = 0xFFFFFFFF;
 114                 }
 115             }
 116             break;
 117             // -----------------------------------------------------------
 118             case S_WK1:                                             // S_WK1
 119             break;
 120             // -----------------------------------------------------------
 121             case S_WK3:                                             // S_WK3
 122             case S_WK4:                                             // S_WK4
 123             switch( nOp )
 124             {
 125                 case 0x0001:                            // EOF
 126                 eAkt = S_FM3;
 127                 nTab++;
 128                 break;
 129
 130                 case 0x0002:                            // PASSWORD
 131                 eRet = eERR_FILEPASSWD;
 132                 eAkt = S_END;
 133                 break;
 134
 135                 case 0x0007:                            // COLUMNWIDTH
 136                 Columnwidth( nRecLen );
 137                 break;
 138
 139                 case 0x0008:                            // HIDDENCOLUMN
 140                 Hiddencolumn( nRecLen );
 141                 break;
 142
 143                 case 0x0009:                            // USERRANGE
 144                 Userrange();
 145                 break;
 146
 147                 case 0x0013:                            // FORMAT
 148
 149                 break;
 150                 case 0x0014:                            // ERRCELL
 151                 Errcell();
 152                 break;
 153
 154                 case 0x0015:                            // NACELL
 155                 Nacell();
 156                 break;
 157
 158                 case 0x0016:                            // LABELCELL
 159                 Labelcell();
 160                 break;
 161
 162                 case 0x0017:                            // NUMBERCELL
 163                 Numbercell();
 164                 break;
 165
 166                 case 0x0018:                            // SMALLNUMCELL
 167                 Smallnumcell();
 168                 break;
 169
 170                 case 0x0019:                            // FORMULACELL
 171                 Formulacell( nRecLen );
 172                 break;
 173
 174                 case 0x001b:                            // extended attributes
 175                 Read( nSubType );
 176                 nRecLen -= 2;
 177                 switch( nSubType )
 178                 {
 179                     case 2007:                              // ROW PRESENTATION
 180                     RowPresentation( nRecLen );
 181                     break;
 182
 183                     case 14000:                             // NAMED SHEET
 184                     NamedSheet();
 185                     break;
 186                 }
 187             }
 188
 189             break;
 190             // -----------------------------------------------------------
 191             case S_FM3:                                             // S_FM3
 192             break;
 193             // -----------------------------------------------------------
 194             case S_END:                                             // S_END
 195             break;
 196             // -----------------------------------------------------------
 197 #ifdef DBG_UTIL
 198             default:
 199             DBG_ERROR( "*ImportLotus::Read(): State unbekannt!" );
 200             eAkt = S_END;
 201 #endif
 202         }
 203
 204         DBG_ASSERT( nNextRec >= pIn->Tell(),
 205             "*ImportLotus::Read(): Etwas zu gierig..." );
 206
 207         pIn->Seek( nNextRec );
 208         aPrgrsBar.Progress();
 209     }
 210
 211     // duemmliche Namen eliminieren
 212     SCTAB       nTabs = pD->GetTableCount();
 213     SCTAB       nCnt;
 214     String      aTabName;
 215     String      aBaseName;
 216     String      aRef( RTL_CONSTASCII_USTRINGPARAM( "temp" ) );
 217     if( nTabs != 0 )
 218     {
 219         if( nTabs > 1 )
 220         {
 221             pD->GetName( 0, aBaseName );
 222             aBaseName.Erase( aBaseName.Len() - 1 );
 223         }
 224         for( nCnt = 1 ; nCnt < nTabs ; nCnt++ )
 225         {
 226             DBG_ASSERT( pD->HasTable( nCnt ),
 227                 "-ImportLotus::Read(): Wo ist meine Tabelle?!" );
 228             pD->GetName( nCnt, aTabName );
 229             if( aTabName == aRef )
 230             {
 231                 aTabName = aBaseName;
 232                 pD->CreateValidTabName( aTabName );
 233                 pD->RenameTab( nCnt, aTabName );
 234             }
 235         }
 236     }
 237
 238     pD->CalcAfterLoad();
 239
 240     return eRet;
 241 }
 242
 243
 244 FltError ImportLotus::Read( SvStream& rIn )
 245 {
 246     pIn = &rIn;
 247
 248     BOOL            bRead = TRUE;
 249     UINT16          nOp;
 250     UINT16          nRecLen;
 251     UINT32          nNextRec = 0UL;
 252     FltError        eRet = eERR_OK;
 253
 254     nTab = 0;
 255     nExtTab = -1;
 256
 257     pIn->Seek( nNextRec );
 258
 259     // Progressbar starten
 260     ScfStreamProgressBar aPrgrsBar( *pIn, pD->GetDocumentShell() );
 261
 262     while( bRead )
 263     {
 264         *pIn >> nOp >> nRecLen;
 265
 266         if( pIn->IsEof() )
 267             bRead = FALSE;
 268         else
 269         {
 270             nNextRec += nRecLen + 4;
 271
 272             switch( nOp )
 273             {
 274                 case 0x0000:                            // BOF
 275                 if( nRecLen != 26 || !BofFm3() )
 276                 {
 277                     bRead = FALSE;
 278                     eRet = eERR_FORMAT;
 279                 }
 280                 break;
 281
 282                 case 0x0001:                            // EOF
 283                     bRead = FALSE;
 284                     DBG_ASSERT( nTab == 0,
 285                         "-ImportLotus::Read( SvStream& ): Zweimal EOF nicht erlaubt" );
 286                     nTab++;
 287                 break;
 288
 289                 case 174:                               // FONT_FACE
 290                     Font_Face();
 291                 break;
 292
 293                 case 176:                               // FONT_TYPE
 294                     Font_Type();
 295                 break;
 296
 297                 case 177:                               // FONT_YSIZE
 298                     Font_Ysize();
 299                 break;
 300
 301                 case 195:
 302                     if( nExtTab >= 0 )
 303                         pLotusRoot->pAttrTable->Apply( ( SCTAB ) nExtTab );
 304                     nExtTab++;
 305                     break;
 306                 case 197:
 307                     _Row( nRecLen );
 308                 break;
 309             }
 310
 311             DBG_ASSERT( nNextRec >= pIn->Tell(),
 312                 "*ImportLotus::Read(): Etwas zu gierig..." );
 313             pIn->Seek( nNextRec );
 314             aPrgrsBar.Progress();
 315         }
 316     }
 317
 318     pLotusRoot->pAttrTable->Apply( ( SCTAB ) nExtTab );
 319
 320     return eRet;
 321 }
 322
 323
 324