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_sc.hxx"
26
27
28
29 // INCLUDE ---------------------------------------------------------------
30
31 #include "scitems.hxx"
32 #include <editeng/eeitem.hxx>
33
34 #include <svx/algitem.hxx>
35 #include <editeng/boxitem.hxx>
36 #include <editeng/brshitem.hxx>
37 #include <editeng/colritem.hxx>
38 #include <editeng/crsditem.hxx>
39 #include <editeng/editdata.hxx>
40 #include <editeng/editeng.hxx>
41 #include <editeng/editobj.hxx>
42 #include <editeng/fhgtitem.hxx>
43 #include <editeng/fontitem.hxx>
44 #include <editeng/lrspitem.hxx>
45 #include <svx/pageitem.hxx>
46 #include <editeng/postitem.hxx>
47 #include <editeng/sizeitem.hxx>
48 #include <editeng/udlnitem.hxx>
49 #include <editeng/ulspitem.hxx>
50 #include <editeng/wghtitem.hxx>
51 #include <svl/zforlist.hxx>
52 #include <svl/PasswordHelper.hxx>
53 #include <stdio.h>
54 #include <math.h>
55 #include <string.h>
56
57 #include "global.hxx"
58 #include "sc.hrc"
59 #include "attrib.hxx"
60 #include "patattr.hxx"
61 #include "docpool.hxx"
62 #include "document.hxx"
63 #include "collect.hxx"
64 #include "rangenam.hxx"
65 #include "dbcolect.hxx"
66 #include "stlsheet.hxx"
67 #include "stlpool.hxx"
68 #include "filter.hxx"
69 #include "scflt.hxx"
70 #include "cell.hxx"
71 #include "scfobj.hxx"
72 #include "docoptio.hxx"
73 #include "viewopti.hxx"
74 #include "postit.hxx"
75 #include "globstr.hrc"
76 #include "ftools.hxx"
77 #include "tabprotection.hxx"
78
79 #include "fprogressbar.hxx"
80
81 using namespace com::sun::star;
82
83 #define DEFCHARSET RTL_TEXTENCODING_MS_1252
84
85 #define SC10TOSTRING(p) String((p),DEFCHARSET)
86
87 const SCCOL SC10MAXCOL = 255; // #i85906# don't try to load more columns than there are in the file
88
89
90 /** Those strings are used with SC10TOSTRING() and strcmp() and such, hence
91 need to be 0-terminated. */
lcl_ReadFixedString(SvStream & rStream,void * pData,size_t nLen)92 static void lcl_ReadFixedString( SvStream& rStream, void* pData, size_t nLen )
93 {
94 sal_Char* pBuf = static_cast<sal_Char*>(pData);
95 if (!nLen)
96 pBuf[0] = 0;
97 else
98 {
99 rStream.Read( pBuf, nLen);
100 pBuf[nLen-1] = 0;
101 }
102 }
103
104
lcl_ReadFileHeader(SvStream & rStream,Sc10FileHeader & rFileHeader)105 static void lcl_ReadFileHeader(SvStream& rStream, Sc10FileHeader& rFileHeader)
106 {
107 lcl_ReadFixedString( rStream, &rFileHeader.CopyRight, sizeof(rFileHeader.CopyRight));
108 rStream >> rFileHeader.Version;
109 rStream.Read(&rFileHeader.Reserved, sizeof(rFileHeader.Reserved));
110 }
111
112
lcl_ReadTabProtect(SvStream & rStream,Sc10TableProtect & rProtect)113 static void lcl_ReadTabProtect(SvStream& rStream, Sc10TableProtect& rProtect)
114 {
115 lcl_ReadFixedString( rStream, &rProtect.PassWord, sizeof(rProtect.PassWord));
116 rStream >> rProtect.Flags;
117 rStream >> rProtect.Protect;
118 }
119
120
lcl_ReadSheetProtect(SvStream & rStream,Sc10SheetProtect & rProtect)121 static void lcl_ReadSheetProtect(SvStream& rStream, Sc10SheetProtect& rProtect)
122 {
123 lcl_ReadFixedString( rStream, &rProtect.PassWord, sizeof(rProtect.PassWord));
124 rStream >> rProtect.Flags;
125 rStream >> rProtect.Protect;
126 }
127
128
lcl_ReadRGB(SvStream & rStream,Sc10Color & rColor)129 static void lcl_ReadRGB(SvStream& rStream, Sc10Color& rColor)
130 {
131 rStream >> rColor.Dummy;
132 rStream >> rColor.Blue;
133 rStream >> rColor.Green;
134 rStream >> rColor.Red;
135 }
136
137
lcl_ReadPalette(SvStream & rStream,Sc10Color * pPalette)138 static void lcl_ReadPalette(SvStream& rStream, Sc10Color* pPalette)
139 {
140 for (sal_uInt16 i = 0; i < 16; i++)
141 lcl_ReadRGB(rStream, pPalette[i]);
142 }
143
144
lcl_ReadValueFormat(SvStream & rStream,Sc10ValueFormat & rFormat)145 static void lcl_ReadValueFormat(SvStream& rStream, Sc10ValueFormat& rFormat)
146 {
147 rStream >> rFormat.Format;
148 rStream >> rFormat.Info;
149 }
150
151
lcl_ReadLogFont(SvStream & rStream,Sc10LogFont & rFont)152 static void lcl_ReadLogFont(SvStream& rStream, Sc10LogFont& rFont)
153 {
154 rStream >> rFont.lfHeight;
155 rStream >> rFont.lfWidth;
156 rStream >> rFont.lfEscapement;
157 rStream >> rFont.lfOrientation;
158 rStream >> rFont.lfWeight;
159 rStream >> rFont.lfItalic;
160 rStream >> rFont.lfUnderline;
161 rStream >> rFont.lfStrikeOut;
162 rStream >> rFont.lfCharSet;
163 rStream >> rFont.lfOutPrecision;
164 rStream >> rFont.lfClipPrecision;
165 rStream >> rFont.lfQuality;
166 rStream >> rFont.lfPitchAndFamily;
167 lcl_ReadFixedString( rStream, &rFont.lfFaceName, sizeof(rFont.lfFaceName));
168 }
169
170
lcl_ReadBlockRect(SvStream & rStream,Sc10BlockRect & rBlock)171 static void lcl_ReadBlockRect(SvStream& rStream, Sc10BlockRect& rBlock)
172 {
173 rStream >> rBlock.x1;
174 rStream >> rBlock.y1;
175 rStream >> rBlock.x2;
176 rStream >> rBlock.y2;
177 }
178
179
lcl_ReadHeadFootLine(SvStream & rStream,Sc10HeadFootLine & rLine)180 static void lcl_ReadHeadFootLine(SvStream& rStream, Sc10HeadFootLine& rLine)
181 {
182 lcl_ReadFixedString( rStream, &rLine.Title, sizeof(rLine.Title));
183 lcl_ReadLogFont(rStream, rLine.LogFont);
184 rStream >> rLine.HorJustify;
185 rStream >> rLine.VerJustify;
186 rStream >> rLine.Raster;
187 rStream >> rLine.Frame;
188 lcl_ReadRGB(rStream, rLine.TextColor);
189 lcl_ReadRGB(rStream, rLine.BackColor);
190 lcl_ReadRGB(rStream, rLine.RasterColor);
191 rStream >> rLine.FrameColor;
192 rStream >> rLine.Reserved;
193 }
194
195
lcl_ReadPageFormat(SvStream & rStream,Sc10PageFormat & rFormat)196 static void lcl_ReadPageFormat(SvStream& rStream, Sc10PageFormat& rFormat)
197 {
198 lcl_ReadHeadFootLine(rStream, rFormat.HeadLine);
199 lcl_ReadHeadFootLine(rStream, rFormat.FootLine);
200 rStream >> rFormat.Orientation;
201 rStream >> rFormat.Width;
202 rStream >> rFormat.Height;
203 rStream >> rFormat.NonPrintableX;
204 rStream >> rFormat.NonPrintableY;
205 rStream >> rFormat.Left;
206 rStream >> rFormat.Top;
207 rStream >> rFormat.Right;
208 rStream >> rFormat.Bottom;
209 rStream >> rFormat.Head;
210 rStream >> rFormat.Foot;
211 rStream >> rFormat.HorCenter;
212 rStream >> rFormat.VerCenter;
213 rStream >> rFormat.PrintGrid;
214 rStream >> rFormat.PrintColRow;
215 rStream >> rFormat.PrintNote;
216 rStream >> rFormat.TopBottomDir;
217 lcl_ReadFixedString( rStream, &rFormat.PrintAreaName, sizeof(rFormat.PrintAreaName));
218 lcl_ReadBlockRect(rStream, rFormat.PrintArea);
219 rStream.Read(&rFormat.PrnZoom, sizeof(rFormat.PrnZoom));
220 rStream >> rFormat.FirstPageNo;
221 rStream >> rFormat.RowRepeatStart;
222 rStream >> rFormat.RowRepeatEnd;
223 rStream >> rFormat.ColRepeatStart;
224 rStream >> rFormat.ColRepeatEnd;
225 rStream.Read(&rFormat.Reserved, sizeof(rFormat.Reserved));
226 }
227
228
lcl_ReadGraphHeader(SvStream & rStream,Sc10GraphHeader & rHeader)229 static void lcl_ReadGraphHeader(SvStream& rStream, Sc10GraphHeader& rHeader)
230 {
231 rStream >> rHeader.Typ;
232 rStream >> rHeader.CarretX;
233 rStream >> rHeader.CarretY;
234 rStream >> rHeader.CarretZ;
235 rStream >> rHeader.x;
236 rStream >> rHeader.y;
237 rStream >> rHeader.w;
238 rStream >> rHeader.h;
239 rStream >> rHeader.IsRelPos;
240 rStream >> rHeader.DoPrint;
241 rStream >> rHeader.FrameType;
242 rStream >> rHeader.IsTransparent;
243 lcl_ReadRGB(rStream, rHeader.FrameColor);
244 lcl_ReadRGB(rStream, rHeader.BackColor);
245 rStream.Read(&rHeader.Reserved, sizeof(rHeader.Reserved));
246 }
247
248
lcl_ReadImageHeaer(SvStream & rStream,Sc10ImageHeader & rHeader)249 static void lcl_ReadImageHeaer(SvStream& rStream, Sc10ImageHeader& rHeader)
250 {
251 lcl_ReadFixedString( rStream, &rHeader.FileName, sizeof(rHeader.FileName));
252 rStream >> rHeader.Typ;
253 rStream >> rHeader.Linked;
254 rStream >> rHeader.x1;
255 rStream >> rHeader.y1;
256 rStream >> rHeader.x2;
257 rStream >> rHeader.y2;
258 rStream >> rHeader.Size;
259 }
260
261
lcl_ReadChartHeader(SvStream & rStream,Sc10ChartHeader & rHeader)262 static void lcl_ReadChartHeader(SvStream& rStream, Sc10ChartHeader& rHeader)
263 {
264 rStream >> rHeader.MM;
265 rStream >> rHeader.xExt;
266 rStream >> rHeader.yExt;
267 rStream >> rHeader.Size;
268 }
269
270
lcl_ReadChartSheetData(SvStream & rStream,Sc10ChartSheetData & rSheetData)271 static void lcl_ReadChartSheetData(SvStream& rStream, Sc10ChartSheetData& rSheetData)
272 {
273 rStream >> rSheetData.HasTitle;
274 rStream >> rSheetData.TitleX;
275 rStream >> rSheetData.TitleY;
276 rStream >> rSheetData.HasSubTitle;
277 rStream >> rSheetData.SubTitleX;
278 rStream >> rSheetData.SubTitleY;
279 rStream >> rSheetData.HasLeftTitle;
280 rStream >> rSheetData.LeftTitleX;
281 rStream >> rSheetData.LeftTitleY;
282 rStream >> rSheetData.HasLegend;
283 rStream >> rSheetData.LegendX1;
284 rStream >> rSheetData.LegendY1;
285 rStream >> rSheetData.LegendX2;
286 rStream >> rSheetData.LegendY2;
287 rStream >> rSheetData.HasLabel;
288 rStream >> rSheetData.LabelX1;
289 rStream >> rSheetData.LabelY1;
290 rStream >> rSheetData.LabelX2;
291 rStream >> rSheetData.LabelY2;
292 rStream >> rSheetData.DataX1;
293 rStream >> rSheetData.DataY1;
294 rStream >> rSheetData.DataX2;
295 rStream >> rSheetData.DataY2;
296 rStream.Read(&rSheetData.Reserved, sizeof(rSheetData.Reserved));
297 }
298
299
lcl_ReadChartTypeData(SvStream & rStream,Sc10ChartTypeData & rTypeData)300 static void lcl_ReadChartTypeData(SvStream& rStream, Sc10ChartTypeData& rTypeData)
301 {
302 rStream >> rTypeData.NumSets;
303 rStream >> rTypeData.NumPoints;
304 rStream >> rTypeData.DrawMode;
305 rStream >> rTypeData.GraphType;
306 rStream >> rTypeData.GraphStyle;
307 lcl_ReadFixedString( rStream, &rTypeData.GraphTitle, sizeof(rTypeData.GraphTitle));
308 lcl_ReadFixedString( rStream, &rTypeData.BottomTitle, sizeof(rTypeData.BottomTitle));
309 sal_uInt16 i;
310 for (i = 0; i < 256; i++)
311 rStream >> rTypeData.SymbolData[i];
312 for (i = 0; i < 256; i++)
313 rStream >> rTypeData.ColorData[i];
314 for (i = 0; i < 256; i++)
315 rStream >> rTypeData.ThickLines[i];
316 for (i = 0; i < 256; i++)
317 rStream >> rTypeData.PatternData[i];
318 for (i = 0; i < 256; i++)
319 rStream >> rTypeData.LinePatternData[i];
320 for (i = 0; i < 11; i++)
321 rStream >> rTypeData.NumGraphStyles[i];
322 rStream >> rTypeData.ShowLegend;
323 for (i = 0; i < 256; i++)
324 lcl_ReadFixedString( rStream, &rTypeData.LegendText[i], sizeof(Sc10ChartText));
325 rStream >> rTypeData.ExplodePie;
326 rStream >> rTypeData.FontUse;
327 for (i = 0; i < 5; i++)
328 rStream >> rTypeData.FontFamily[i];
329 for (i = 0; i < 5; i++)
330 rStream >> rTypeData.FontStyle[i];
331 for (i = 0; i < 5; i++)
332 rStream >> rTypeData.FontSize[i];
333 rStream >> rTypeData.GridStyle;
334 rStream >> rTypeData.Labels;
335 rStream >> rTypeData.LabelEvery;
336 for (i = 0; i < 50; i++)
337 lcl_ReadFixedString( rStream, &rTypeData.LabelText[i], sizeof(Sc10ChartText));
338 lcl_ReadFixedString( rStream, &rTypeData.LeftTitle, sizeof(rTypeData.LeftTitle));
339 rStream.Read(&rTypeData.Reserved, sizeof(rTypeData.Reserved));
340 }
341
lcl_PascalToDouble(sal_Char * tp6)342 double lcl_PascalToDouble(sal_Char* tp6)
343 {
344 sal_uInt8* pnUnsigned = reinterpret_cast< sal_uInt8* >( tp6 );
345 // biased exponent
346 sal_uInt8 be = pnUnsigned[ 0 ];
347 // lower 16 bits of mantissa
348 sal_uInt16 v1 = static_cast< sal_uInt16 >( pnUnsigned[ 2 ] * 256 + pnUnsigned[ 1 ] );
349 // next 16 bits of mantissa
350 sal_uInt16 v2 = static_cast< sal_uInt16 >( pnUnsigned[ 4 ] * 256 + pnUnsigned[ 3 ] );
351 // upper 7 bits of mantissa
352 sal_uInt8 v3 = static_cast< sal_uInt8 >( pnUnsigned[ 5 ] & 0x7F );
353 // sign bit
354 bool s = (pnUnsigned[ 5 ] & 0x80) != 0;
355
356 if (be == 0)
357 return 0.0;
358 return (((((128 + v3) * 65536.0) + v2) * 65536.0 + v1) *
359 ldexp ((s ? -1.0 : 1.0), be - (129+39)));
360 }
361
362
lcl_ChangeColor(sal_uInt16 nIndex,Color & rColor)363 static void lcl_ChangeColor( sal_uInt16 nIndex, Color& rColor )
364 {
365 ColorData aCol;
366
367 switch( nIndex )
368 {
369 case 1: aCol = COL_RED; break;
370 case 2: aCol = COL_GREEN; break;
371 case 3: aCol = COL_BROWN; break;
372 case 4: aCol = COL_BLUE; break;
373 case 5: aCol = COL_MAGENTA; break;
374 case 6: aCol = COL_CYAN; break;
375 case 7: aCol = COL_GRAY; break;
376 case 8: aCol = COL_LIGHTGRAY; break;
377 case 9: aCol = COL_LIGHTRED; break;
378 case 10: aCol = COL_LIGHTGREEN; break;
379 case 11: aCol = COL_YELLOW; break;
380 case 12: aCol = COL_LIGHTBLUE; break;
381 case 13: aCol = COL_LIGHTMAGENTA; break;
382 case 14: aCol = COL_LIGHTCYAN; break;
383 case 15: aCol = COL_WHITE; break;
384 default: aCol = COL_BLACK;
385 }
386
387 rColor.SetColor( aCol );
388 }
389
lcl_MakeOldPageStyleFormatName(sal_uInt16 i)390 String lcl_MakeOldPageStyleFormatName( sal_uInt16 i )
391 {
392 String aName = ScGlobal::GetRscString( STR_PAGESTYLE );
393 aName.AppendAscii( " " );
394 aName += String::CreateFromInt32( i + 1 );
395
396 return aName;
397 }
398
399
insert_new(ScCollection * pCollection,SvStream & rStream)400 template < typename T > sal_uLong insert_new( ScCollection* pCollection, SvStream& rStream )
401 {
402 T* pData = new (::std::nothrow) T( rStream);
403 sal_uLong nError = rStream.GetError();
404 if (pData)
405 {
406 if (nError)
407 delete pData;
408 else
409 pCollection->Insert( pData);
410 }
411 else
412 nError = errOutOfMemory;
413 return nError;
414 }
415
416 //--------------------------------------------
417 // Font
418 //--------------------------------------------
419
420
Sc10FontData(SvStream & rStream)421 Sc10FontData::Sc10FontData(SvStream& rStream)
422 {
423 rStream >> Height;
424 rStream >> CharSet;
425 rStream >> PitchAndFamily;
426 sal_uInt16 nLen;
427 rStream >> nLen;
428 if (nLen < sizeof(FaceName))
429 rStream.Read(FaceName, nLen);
430 else
431 rStream.SetError(ERRCODE_IO_WRONGFORMAT);
432 }
433
434
Sc10FontCollection(SvStream & rStream)435 Sc10FontCollection::Sc10FontCollection(SvStream& rStream) :
436 ScCollection (4, 4),
437 nError (0)
438 {
439 sal_uInt16 ID;
440 rStream >> ID;
441 if (ID == FontID)
442 {
443 sal_uInt16 nAnz;
444 rStream >> nAnz;
445 for (sal_uInt16 i=0; (i < nAnz) && (nError == 0); i++)
446 {
447 nError = insert_new<Sc10FontData>( this, rStream);
448 }
449 }
450 else
451 {
452 DBG_ERROR( "FontID" );
453 nError = errUnknownID;
454 }
455 }
456
457
458 //--------------------------------------------
459 // Benannte-Bereiche
460 //--------------------------------------------
461
462
Sc10NameData(SvStream & rStream)463 Sc10NameData::Sc10NameData(SvStream& rStream)
464 {
465 sal_uInt8 nLen;
466 rStream >> nLen;
467 rStream.Read(Name, sizeof(Name) - 1);
468 if (nLen >= sizeof(Name))
469 nLen = sizeof(Name) - 1;
470 Name[nLen] = 0;
471
472 rStream >> nLen;
473 rStream.Read(Reference, sizeof(Reference) - 1);
474 if (nLen >= sizeof(Reference))
475 nLen = sizeof(Reference) - 1;
476 Reference[nLen] = 0;
477 rStream.Read(Reserved, sizeof(Reserved));
478 }
479
480
Sc10NameCollection(SvStream & rStream)481 Sc10NameCollection::Sc10NameCollection(SvStream& rStream) :
482 ScCollection (4, 4),
483 nError (0)
484 {
485 sal_uInt16 ID;
486 rStream >> ID;
487 if (ID == NameID)
488 {
489 sal_uInt16 nAnz;
490 rStream >> nAnz;
491 for (sal_uInt16 i=0; (i < nAnz) && (nError == 0); i++)
492 {
493 nError = insert_new<Sc10NameData>( this, rStream);
494 }
495 }
496 else
497 {
498 DBG_ERROR( "NameID" );
499 nError = errUnknownID;
500 }
501 }
502
503 //--------------------------------------------
504 // Vorlagen
505 //--------------------------------------------
506
507
Sc10PatternData(SvStream & rStream)508 Sc10PatternData::Sc10PatternData(SvStream& rStream)
509 {
510 lcl_ReadFixedString( rStream, Name, sizeof(Name));
511 lcl_ReadValueFormat(rStream, ValueFormat);
512 lcl_ReadLogFont(rStream, LogFont);
513
514 rStream >> Attr;
515 rStream >> Justify;
516 rStream >> Frame;
517 rStream >> Raster;
518 rStream >> nColor;
519 rStream >> FrameColor;
520 rStream >> Flags;
521 rStream >> FormatFlags;
522 rStream.Read(Reserved, sizeof(Reserved));
523 }
524
525
Sc10PatternCollection(SvStream & rStream)526 Sc10PatternCollection::Sc10PatternCollection(SvStream& rStream) :
527 ScCollection (4, 4),
528 nError (0)
529 {
530 sal_uInt16 ID;
531 rStream >> ID;
532 if (ID == PatternID)
533 {
534 sal_uInt16 nAnz;
535 rStream >> nAnz;
536 for (sal_uInt16 i=0; (i < nAnz) && (nError == 0); i++)
537 {
538 nError = insert_new<Sc10PatternData>( this, rStream);
539 }
540 }
541 else
542 {
543 DBG_ERROR( "PatternID" );
544 nError = errUnknownID;
545 }
546 }
547
548
549 //--------------------------------------------
550 // Datenbank
551 //--------------------------------------------
552
553
Sc10DataBaseData(SvStream & rStream)554 Sc10DataBaseData::Sc10DataBaseData(SvStream& rStream)
555 {
556 lcl_ReadFixedString( rStream, &DataBaseRec.Name, sizeof(DataBaseRec.Name));
557 rStream >> DataBaseRec.Tab;
558 lcl_ReadBlockRect(rStream, DataBaseRec.Block);
559 rStream >> DataBaseRec.RowHeader;
560 rStream >> DataBaseRec.SortField0;
561 rStream >> DataBaseRec.SortUpOrder0;
562 rStream >> DataBaseRec.SortField1;
563 rStream >> DataBaseRec.SortUpOrder1;
564 rStream >> DataBaseRec.SortField2;
565 rStream >> DataBaseRec.SortUpOrder2;
566 rStream >> DataBaseRec.IncludeFormat;
567
568 rStream >> DataBaseRec.QueryField0;
569 rStream >> DataBaseRec.QueryOp0;
570 rStream >> DataBaseRec.QueryByString0;
571 lcl_ReadFixedString( rStream, &DataBaseRec.QueryString0, sizeof(DataBaseRec.QueryString0));
572 DataBaseRec.QueryValue0 = ScfTools::ReadLongDouble(rStream);
573
574 rStream >> DataBaseRec.QueryConnect1;
575 rStream >> DataBaseRec.QueryField1;
576 rStream >> DataBaseRec.QueryOp1;
577 rStream >> DataBaseRec.QueryByString1;
578 lcl_ReadFixedString( rStream, &DataBaseRec.QueryString1, sizeof(DataBaseRec.QueryString1));
579 DataBaseRec.QueryValue1 = ScfTools::ReadLongDouble(rStream);
580
581 rStream >> DataBaseRec.QueryConnect2;
582 rStream >> DataBaseRec.QueryField2;
583 rStream >> DataBaseRec.QueryOp2;
584 rStream >> DataBaseRec.QueryByString2;
585 lcl_ReadFixedString( rStream, &DataBaseRec.QueryString2, sizeof(DataBaseRec.QueryString2));
586 DataBaseRec.QueryValue2 = ScfTools::ReadLongDouble(rStream);
587 }
588
589
Sc10DataBaseCollection(SvStream & rStream)590 Sc10DataBaseCollection::Sc10DataBaseCollection(SvStream& rStream) :
591 ScCollection (4, 4),
592 nError (0)
593 {
594 sal_uInt16 ID;
595 rStream >> ID;
596 if (ID == DataBaseID)
597 {
598 lcl_ReadFixedString( rStream, ActName, sizeof(ActName));
599 sal_uInt16 nAnz;
600 rStream >> nAnz;
601 for (sal_uInt16 i=0; (i < nAnz) && (nError == 0); i++)
602 {
603 nError = insert_new<Sc10DataBaseData>( this, rStream);
604 }
605 }
606 else
607 {
608 DBG_ERROR( "DataBaseID" );
609 nError = errUnknownID;
610 }
611 }
612
613
operator ==(const Sc10LogFont & rData) const614 int Sc10LogFont::operator==( const Sc10LogFont& rData ) const
615 {
616 return !strcmp( lfFaceName, rData.lfFaceName )
617 && lfHeight == rData.lfHeight
618 && lfWidth == rData.lfWidth
619 && lfEscapement == rData.lfEscapement
620 && lfOrientation == rData.lfOrientation
621 && lfWeight == rData.lfWeight
622 && lfItalic == rData.lfItalic
623 && lfUnderline == rData.lfUnderline
624 && lfStrikeOut == rData.lfStrikeOut
625 && lfCharSet == rData.lfCharSet
626 && lfOutPrecision == rData.lfOutPrecision
627 && lfClipPrecision == rData.lfClipPrecision
628 && lfQuality == rData.lfQuality
629 && lfPitchAndFamily == rData.lfPitchAndFamily;
630 }
631
632
operator ==(const Sc10Color & rColor) const633 int Sc10Color::operator==( const Sc10Color& rColor ) const
634 {
635 return ((Red == rColor.Red) && (Green == rColor.Green) && (Blue == rColor.Blue));
636 }
637
638
operator ==(const Sc10HeadFootLine & rData) const639 int Sc10HeadFootLine::operator==( const Sc10HeadFootLine& rData ) const
640 {
641 return !strcmp(Title, rData.Title)
642 && LogFont == rData.LogFont
643 && HorJustify == rData.HorJustify
644 && VerJustify == rData.VerJustify
645 && Raster == rData.Raster
646 && Frame == rData.Frame
647 && TextColor == rData.TextColor
648 && BackColor == rData.BackColor
649 && RasterColor == rData.RasterColor
650 && FrameColor == rData.FrameColor
651 && Reserved == rData.Reserved;
652 }
653
654
operator ==(const Sc10PageFormat & rData) const655 int Sc10PageFormat::operator==( const Sc10PageFormat& rData ) const
656 {
657 return !strcmp(PrintAreaName, rData.PrintAreaName)
658 && HeadLine == rData.HeadLine
659 && FootLine == rData.FootLine
660 && Orientation == rData.Orientation
661 && Width == rData.Width
662 && Height == rData.Height
663 && NonPrintableX == rData.NonPrintableX
664 && NonPrintableY == rData.NonPrintableY
665 && Left == rData.Left
666 && Top == rData.Top
667 && Right == rData.Right
668 && Bottom == rData.Bottom
669 && Head == rData.Head
670 && Foot == rData.Foot
671 && HorCenter == rData.HorCenter
672 && VerCenter == rData.VerCenter
673 && PrintGrid == rData.PrintGrid
674 && PrintColRow == rData.PrintColRow
675 && PrintNote == rData.PrintNote
676 && TopBottomDir == rData.TopBottomDir
677 && FirstPageNo == rData.FirstPageNo
678 && RowRepeatStart == rData.RowRepeatStart
679 && RowRepeatEnd == rData.RowRepeatEnd
680 && ColRepeatStart == rData.ColRepeatStart
681 && ColRepeatEnd == rData.ColRepeatEnd
682 && !memcmp( PrnZoom, rData.PrnZoom, sizeof(PrnZoom) )
683 && !memcmp( &PrintArea, &rData.PrintArea, sizeof(PrintArea) );
684 }
685
686
InsertFormat(const Sc10PageFormat & rData)687 sal_uInt16 Sc10PageCollection::InsertFormat( const Sc10PageFormat& rData )
688 {
689 for (sal_uInt16 i=0; i<nCount; i++)
690 if (At(i)->aPageFormat == rData)
691 return i;
692
693 Insert( new Sc10PageData(rData) );
694
695 return nCount-1;
696 }
697
698
GetMixedCol(const sal_uInt8 nB,const sal_uInt8 nF,const sal_uInt16 nFak)699 static inline sal_uInt8 GetMixedCol( const sal_uInt8 nB, const sal_uInt8 nF, const sal_uInt16 nFak )
700 {
701 sal_Int32 nT = nB - nF;
702 nT *= ( sal_Int32 ) nFak;
703 nT /= 0xFFFF;
704 nT += nF;
705 return ( sal_uInt8 ) nT;
706 }
GetMixedColor(const Color & rFore,const Color & rBack,sal_uInt16 nFact)707 static inline Color GetMixedColor( const Color& rFore, const Color& rBack, sal_uInt16 nFact )
708 {
709 return Color( GetMixedCol( rBack.GetRed(), rFore.GetRed(), nFact ),
710 GetMixedCol( rBack.GetGreen(), rFore.GetGreen(), nFact ),
711 GetMixedCol( rBack.GetBlue(), rFore.GetBlue(), nFact ) );
712 }
713
714
PutToDoc(ScDocument * pDoc)715 void Sc10PageCollection::PutToDoc( ScDocument* pDoc )
716 {
717 ScStyleSheetPool* pStylePool = pDoc->GetStyleSheetPool();
718 EditEngine aEditEngine( pDoc->GetEnginePool() );
719 EditTextObject* pEmptyObject = aEditEngine.CreateTextObject();
720
721 for (sal_uInt16 i=0; i<nCount; i++)
722 {
723 Sc10PageFormat* pPage = &At(i)->aPageFormat;
724
725 pPage->Width = (short) ( pPage->Width * ( 72.0 / 72.27 ) + 0.5 );
726 pPage->Height = (short) ( pPage->Height * ( 72.0 / 72.27 ) + 0.5 );
727 pPage->Top = (short) ( pPage->Top * ( 72.0 / 72.27 ) + 0.5 );
728 pPage->Bottom = (short) ( pPage->Bottom * ( 72.0 / 72.27 ) + 0.5 );
729 pPage->Left = (short) ( pPage->Left * ( 72.0 / 72.27 ) + 0.5 );
730 pPage->Right = (short) ( pPage->Right * ( 72.0 / 72.27 ) + 0.5 );
731 pPage->Head = (short) ( pPage->Head * ( 72.0 / 72.27 ) + 0.5 );
732 pPage->Foot = (short) ( pPage->Foot * ( 72.0 / 72.27 ) + 0.5 );
733
734 String aName = lcl_MakeOldPageStyleFormatName( i );
735
736 ScStyleSheet* pSheet = (ScStyleSheet*) &pStylePool->Make( aName,
737 SFX_STYLE_FAMILY_PAGE,
738 SFXSTYLEBIT_USERDEF | SCSTYLEBIT_STANDARD );
739 // #i68483# set page style name at sheet...
740 pDoc->SetPageStyle( static_cast< SCTAB >( i ), aName );
741
742 SfxItemSet* pSet = &pSheet->GetItemSet();
743
744 for (sal_uInt16 nHeadFoot=0; nHeadFoot<2; nHeadFoot++)
745 {
746 Sc10HeadFootLine* pHeadFootLine = nHeadFoot ? &pPage->FootLine : &pPage->HeadLine;
747
748 SfxItemSet aEditAttribs(aEditEngine.GetEmptyItemSet());
749 FontFamily eFam = FAMILY_DONTKNOW;
750 switch (pPage->HeadLine.LogFont.lfPitchAndFamily & 0xF0)
751 {
752 case ffDontCare: eFam = FAMILY_DONTKNOW; break;
753 case ffRoman: eFam = FAMILY_ROMAN; break;
754 case ffSwiss: eFam = FAMILY_SWISS; break;
755 case ffModern: eFam = FAMILY_MODERN; break;
756 case ffScript: eFam = FAMILY_SCRIPT; break;
757 case ffDecorative: eFam = FAMILY_DECORATIVE; break;
758 default: eFam = FAMILY_DONTKNOW; break;
759 }
760 aEditAttribs.Put( SvxFontItem(
761 eFam,
762 SC10TOSTRING( pHeadFootLine->LogFont.lfFaceName ), EMPTY_STRING,
763 PITCH_DONTKNOW, RTL_TEXTENCODING_DONTKNOW, EE_CHAR_FONTINFO ),
764 EE_CHAR_FONTINFO );
765 aEditAttribs.Put( SvxFontHeightItem( Abs( pHeadFootLine->LogFont.lfHeight ), 100, EE_CHAR_FONTHEIGHT ),
766 EE_CHAR_FONTHEIGHT);
767
768 Sc10Color nColor = pHeadFootLine->TextColor;
769 Color TextColor( nColor.Red, nColor.Green, nColor.Blue );
770 aEditAttribs.Put(SvxColorItem(TextColor, EE_CHAR_COLOR), EE_CHAR_COLOR);
771 // FontAttr
772 if (pHeadFootLine->LogFont.lfWeight != fwNormal)
773 aEditAttribs.Put(SvxWeightItem(WEIGHT_BOLD, EE_CHAR_WEIGHT), EE_CHAR_WEIGHT);
774 if (pHeadFootLine->LogFont.lfItalic != 0)
775 aEditAttribs.Put(SvxPostureItem(ITALIC_NORMAL, EE_CHAR_ITALIC), EE_CHAR_ITALIC);
776 if (pHeadFootLine->LogFont.lfUnderline != 0)
777 aEditAttribs.Put(SvxUnderlineItem(UNDERLINE_SINGLE, EE_CHAR_UNDERLINE), EE_CHAR_UNDERLINE);
778 if (pHeadFootLine->LogFont.lfStrikeOut != 0)
779 aEditAttribs.Put(SvxCrossedOutItem(STRIKEOUT_SINGLE, EE_CHAR_STRIKEOUT), EE_CHAR_STRIKEOUT);
780 String aText( pHeadFootLine->Title, DEFCHARSET );
781 aEditEngine.SetText( aText );
782 aEditEngine.QuickSetAttribs( aEditAttribs, ESelection( 0, 0, 0, aText.Len() ) );
783
784 EditTextObject* pObject = aEditEngine.CreateTextObject();
785 ScPageHFItem aHeaderItem(nHeadFoot ? ATTR_PAGE_FOOTERRIGHT : ATTR_PAGE_HEADERRIGHT);
786 switch (pHeadFootLine->HorJustify)
787 {
788 case hjCenter:
789 aHeaderItem.SetLeftArea(*pEmptyObject);
790 aHeaderItem.SetCenterArea(*pObject);
791 aHeaderItem.SetRightArea(*pEmptyObject);
792 break;
793 case hjRight:
794 aHeaderItem.SetLeftArea(*pEmptyObject);
795 aHeaderItem.SetCenterArea(*pEmptyObject);
796 aHeaderItem.SetRightArea(*pObject);
797 break;
798 default:
799 aHeaderItem.SetLeftArea(*pObject);
800 aHeaderItem.SetCenterArea(*pEmptyObject);
801 aHeaderItem.SetRightArea(*pEmptyObject);
802 break;
803 }
804 delete pObject;
805 pSet->Put( aHeaderItem );
806
807 SfxItemSet aSetItemItemSet( *pDoc->GetPool(),
808 ATTR_BACKGROUND, ATTR_BACKGROUND,
809 ATTR_BORDER, ATTR_SHADOW,
810 ATTR_PAGE_SIZE, ATTR_PAGE_SIZE,
811 ATTR_LRSPACE, ATTR_ULSPACE,
812 ATTR_PAGE_ON, ATTR_PAGE_SHARED,
813 0 );
814 nColor = pHeadFootLine->BackColor;
815 Color aBColor( nColor.Red, nColor.Green, nColor.Blue );
816 nColor = pHeadFootLine->RasterColor;
817 Color aRColor( nColor.Red, nColor.Green, nColor.Blue );
818
819 sal_uInt16 nFact;
820 sal_Bool bSwapCol = sal_False;
821 switch (pHeadFootLine->Raster)
822 {
823 case raNone: nFact = 0xffff; bSwapCol = sal_True; break;
824 case raGray12: nFact = (0xffff / 100) * 12; break;
825 case raGray25: nFact = (0xffff / 100) * 25; break;
826 case raGray50: nFact = (0xffff / 100) * 50; break;
827 case raGray75: nFact = (0xffff / 100) * 75; break;
828 default: nFact = 0xffff;
829 }
830 if( bSwapCol )
831 aSetItemItemSet.Put( SvxBrushItem( GetMixedColor( aBColor, aRColor, nFact ), ATTR_BACKGROUND ) );
832 else
833 aSetItemItemSet.Put( SvxBrushItem( GetMixedColor( aRColor, aBColor, nFact ), ATTR_BACKGROUND ) );
834
835 if (pHeadFootLine->Frame != 0)
836 {
837 sal_uInt16 nLeft = 0;
838 sal_uInt16 nTop = 0;
839 sal_uInt16 nRight = 0;
840 sal_uInt16 nBottom = 0;
841 sal_uInt16 fLeft = (pHeadFootLine->Frame & 0x000F);
842 sal_uInt16 fTop = (pHeadFootLine->Frame & 0x00F0) / 0x0010;
843 sal_uInt16 fRight = (pHeadFootLine->Frame & 0x0F00) / 0x0100;
844 sal_uInt16 fBottom = (pHeadFootLine->Frame & 0xF000) / 0x1000;
845 if (fLeft > 1)
846 nLeft = 50;
847 else if (fLeft > 0)
848 nLeft = 20;
849 if (fTop > 1)
850 nTop = 50;
851 else if (fTop > 0)
852 nTop = 20;
853 if (fRight > 1)
854 nRight = 50;
855 else if (fRight > 0)
856 nRight = 20;
857 if (fBottom > 1)
858 nBottom = 50;
859 else if (fBottom > 0)
860 nBottom = 20;
861 Color ColorLeft(COL_BLACK);
862 Color ColorTop(COL_BLACK);
863 Color ColorRight(COL_BLACK);
864 Color ColorBottom(COL_BLACK);
865 sal_uInt16 cLeft = (pHeadFootLine->FrameColor & 0x000F);
866 sal_uInt16 cTop = (pHeadFootLine->FrameColor & 0x00F0) >> 4;
867 sal_uInt16 cRight = (pHeadFootLine->FrameColor & 0x0F00) >> 8;
868 sal_uInt16 cBottom = (pHeadFootLine->FrameColor & 0xF000) >> 12;
869 lcl_ChangeColor(cLeft, ColorLeft);
870 lcl_ChangeColor(cTop, ColorTop);
871 lcl_ChangeColor(cRight, ColorRight);
872 lcl_ChangeColor(cBottom, ColorBottom);
873 SvxBorderLine aLine;
874 SvxBoxItem aBox( ATTR_BORDER );
875 aLine.SetOutWidth(nLeft);
876 aLine.SetColor(ColorLeft);
877 aBox.SetLine(&aLine, BOX_LINE_LEFT);
878 aLine.SetOutWidth(nTop);
879 aLine.SetColor(ColorTop);
880 aBox.SetLine(&aLine, BOX_LINE_TOP);
881 aLine.SetOutWidth(nRight);
882 aLine.SetColor(ColorRight);
883 aBox.SetLine(&aLine, BOX_LINE_RIGHT);
884 aLine.SetOutWidth(nBottom);
885 aLine.SetColor(ColorBottom);
886 aBox.SetLine(&aLine, BOX_LINE_BOTTOM);
887
888 aSetItemItemSet.Put(aBox);
889 }
890
891 pSet->Put( SvxULSpaceItem( 0, 0, ATTR_ULSPACE ) );
892
893 if (nHeadFoot==0)
894 aSetItemItemSet.Put( SvxSizeItem( ATTR_PAGE_SIZE, Size( 0, pPage->Top - pPage->Head ) ) );
895 else
896 aSetItemItemSet.Put( SvxSizeItem( ATTR_PAGE_SIZE, Size( 0, pPage->Bottom - pPage->Foot ) ) );
897
898 aSetItemItemSet.Put(SfxBoolItem( ATTR_PAGE_ON, sal_True ));
899 aSetItemItemSet.Put(SfxBoolItem( ATTR_PAGE_DYNAMIC, sal_False ));
900 aSetItemItemSet.Put(SfxBoolItem( ATTR_PAGE_SHARED, sal_True ));
901
902 pSet->Put( SvxSetItem( nHeadFoot ? ATTR_PAGE_FOOTERSET : ATTR_PAGE_HEADERSET,
903 aSetItemItemSet ) );
904 }
905
906 SvxPageItem aPageItem(ATTR_PAGE);
907 aPageItem.SetPageUsage( SVX_PAGE_ALL );
908 aPageItem.SetLandscape( pPage->Orientation != 1 );
909 aPageItem.SetNumType( SVX_ARABIC );
910 pSet->Put(aPageItem);
911
912 pSet->Put(SvxLRSpaceItem( pPage->Left, pPage->Right, 0,0, ATTR_LRSPACE ));
913 pSet->Put(SvxULSpaceItem( pPage->Top, pPage->Bottom, ATTR_ULSPACE ));
914
915 pSet->Put(SfxBoolItem( ATTR_PAGE_HORCENTER, pPage->HorCenter ));
916 pSet->Put(SfxBoolItem( ATTR_PAGE_VERCENTER, pPage->VerCenter ));
917
918 //----------------
919 // Area-Parameter:
920 //----------------
921 {
922 ScRange* pRepeatRow = NULL;
923 ScRange* pRepeatCol = NULL;
924
925 if ( pPage->ColRepeatStart >= 0 )
926 pRepeatCol = new ScRange( static_cast<SCCOL> (pPage->ColRepeatStart), 0, 0 );
927 if ( pPage->RowRepeatStart >= 0 )
928 pRepeatRow = new ScRange( 0, static_cast<SCROW> (pPage->RowRepeatStart), 0 );
929
930
931 if ( pRepeatRow || pRepeatCol )
932 {
933 //
934 // an allen Tabellen setzen
935 //
936 for ( SCTAB nTab = 0, nTabCount = pDoc->GetTableCount(); nTab < nTabCount; ++nTab )
937 {
938 pDoc->SetRepeatColRange( nTab, pRepeatCol );
939 pDoc->SetRepeatRowRange( nTab, pRepeatRow );
940 }
941 }
942
943 delete pRepeatRow;
944 delete pRepeatCol;
945 }
946
947 //-----------------
948 // Table-Parameter:
949 //-----------------
950 pSet->Put( SfxBoolItem( ATTR_PAGE_NOTES, pPage->PrintNote ) );
951 pSet->Put( SfxBoolItem( ATTR_PAGE_GRID, pPage->PrintGrid ) );
952 pSet->Put( SfxBoolItem( ATTR_PAGE_HEADERS, pPage->PrintColRow ) );
953 pSet->Put( SfxBoolItem( ATTR_PAGE_TOPDOWN, pPage->TopBottomDir ) );
954 pSet->Put( ScViewObjectModeItem( ATTR_PAGE_CHARTS, VOBJ_MODE_SHOW ) );
955 pSet->Put( ScViewObjectModeItem( ATTR_PAGE_OBJECTS, VOBJ_MODE_SHOW ) );
956 pSet->Put( ScViewObjectModeItem( ATTR_PAGE_DRAWINGS, VOBJ_MODE_SHOW ) );
957 pSet->Put( SfxUInt16Item( ATTR_PAGE_SCALE,
958 (sal_uInt16)( lcl_PascalToDouble( pPage->PrnZoom ) * 100 ) ) );
959 pSet->Put( SfxUInt16Item( ATTR_PAGE_FIRSTPAGENO, 1 ) );
960
961 pSet->Put( SvxSizeItem( ATTR_PAGE_SIZE, Size( pPage->Width, pPage->Height ) ) );
962 }
963
964 delete pEmptyObject;
965 }
966
967
Clone() const968 ScDataObject* Sc10PageData::Clone() const
969 {
970 return new Sc10PageData(aPageFormat);
971 }
972
973
974 //--------------------------------------------
975 // Import
976 //--------------------------------------------
977
978
Sc10Import(SvStream & rStr,ScDocument * pDocument)979 Sc10Import::Sc10Import(SvStream& rStr, ScDocument* pDocument ) :
980 rStream (rStr),
981 pDoc (pDocument),
982 pFontCollection (NULL),
983 pNameCollection (NULL),
984 pPatternCollection (NULL),
985 pDataBaseCollection (NULL),
986 nError (0),
987 nShowTab (0)
988 {
989 pPrgrsBar = NULL;
990 }
991
992
~Sc10Import()993 Sc10Import::~Sc10Import()
994 {
995 pDoc->CalcAfterLoad();
996 pDoc->UpdateAllCharts();
997
998 delete pFontCollection;
999 delete pNameCollection;
1000 delete pPatternCollection;
1001 delete pDataBaseCollection;
1002
1003 DBG_ASSERT( pPrgrsBar == NULL,
1004 "*Sc10Import::Sc10Import(): Progressbar lebt noch!?" );
1005 }
1006
1007
Import()1008 sal_uLong Sc10Import::Import()
1009 {
1010 pPrgrsBar = new ScfStreamProgressBar( rStream, pDoc->GetDocumentShell() );
1011
1012 ScDocOptions aOpt = pDoc->GetDocOptions();
1013 aOpt.SetDate( 1, 1, 1900 );
1014 aOpt.SetYear2000( 18 + 1901 ); // ab SO51 src513e vierstellig
1015 pDoc->SetDocOptions( aOpt );
1016 pDoc->GetFormatTable()->ChangeNullDate( 1, 1, 1900 );
1017
1018 LoadFileHeader(); pPrgrsBar->Progress();
1019 if (!nError) { LoadFileInfo(); pPrgrsBar->Progress(); }
1020 if (!nError) { LoadEditStateInfo(); pPrgrsBar->Progress(); }
1021 if (!nError) { LoadProtect(); pPrgrsBar->Progress(); }
1022 if (!nError) { LoadViewColRowBar(); pPrgrsBar->Progress(); }
1023 if (!nError) { LoadScrZoom(); pPrgrsBar->Progress(); }
1024 if (!nError) { LoadPalette(); pPrgrsBar->Progress(); }
1025 if (!nError) { LoadFontCollection(); pPrgrsBar->Progress(); }
1026 if (!nError) { LoadNameCollection(); pPrgrsBar->Progress(); }
1027 if (!nError) { LoadPatternCollection(); pPrgrsBar->Progress(); }
1028 if (!nError) { LoadDataBaseCollection(); pPrgrsBar->Progress(); }
1029 if (!nError) { LoadTables(); pPrgrsBar->Progress(); }
1030 if (!nError) { LoadObjects(); pPrgrsBar->Progress(); }
1031 if (!nError) { ImportNameCollection(); pPrgrsBar->Progress(); }
1032 pDoc->SetViewOptions( aSc30ViewOpt );
1033
1034 #ifdef DBG_UTIL
1035 if (nError)
1036 {
1037 DBG_ERROR( ByteString::CreateFromInt32( nError ).GetBuffer() );
1038 }
1039 #endif
1040
1041 delete pPrgrsBar;
1042 #ifdef DBG_UTIL
1043 pPrgrsBar = NULL;
1044 #endif
1045
1046 return nError;
1047 }
1048
1049
LoadFileHeader()1050 void Sc10Import::LoadFileHeader()
1051 {
1052 Sc10FileHeader FileHeader;
1053 lcl_ReadFileHeader(rStream, FileHeader);
1054
1055 nError = rStream.GetError();
1056 if ( nError == 0 )
1057 {
1058 sal_Char Sc10CopyRight[32];
1059 strcpy(Sc10CopyRight, "Blaise-Tabelle"); // #100211# - checked
1060 Sc10CopyRight[14] = 10;
1061 Sc10CopyRight[15] = 13;
1062 Sc10CopyRight[16] = 0;
1063 if ((strcmp(FileHeader.CopyRight, Sc10CopyRight) != 0)
1064 || (FileHeader.Version < 101)
1065 || (FileHeader.Version > 102))
1066 nError = errUnknownFormat;
1067 }
1068 }
1069
1070
LoadFileInfo()1071 void Sc10Import::LoadFileInfo()
1072 {
1073 Sc10FileInfo FileInfo;
1074 rStream.Read(&FileInfo, sizeof(FileInfo));
1075
1076 nError = rStream.GetError();
1077 // Achtung Info Uebertragen
1078 }
1079
1080
1081
LoadEditStateInfo()1082 void Sc10Import::LoadEditStateInfo()
1083 {
1084 Sc10EditStateInfo EditStateInfo;
1085 rStream.Read(&EditStateInfo, sizeof(EditStateInfo));
1086
1087 nError = rStream.GetError();
1088 nShowTab = static_cast<SCTAB>(EditStateInfo.DeltaZ);
1089 // Achtung Cursorposition und Offset der Tabelle Uebertragen (soll man das machen??)
1090 }
1091
1092
LoadProtect()1093 void Sc10Import::LoadProtect()
1094 {
1095 lcl_ReadSheetProtect(rStream, SheetProtect);
1096 nError = rStream.GetError();
1097
1098 ScDocProtection aProtection;
1099 aProtection.setProtected(static_cast<bool>(SheetProtect.Protect));
1100 aProtection.setPassword(SC10TOSTRING(SheetProtect.PassWord));
1101 pDoc->SetDocProtection(&aProtection);
1102 }
1103
1104
LoadViewColRowBar()1105 void Sc10Import::LoadViewColRowBar()
1106 {
1107 sal_uInt8 ViewColRowBar;
1108 rStream >> ViewColRowBar;
1109 nError = rStream.GetError();
1110 aSc30ViewOpt.SetOption( VOPT_HEADER, (sal_Bool)ViewColRowBar );
1111 }
1112
1113
LoadScrZoom()1114 void Sc10Import::LoadScrZoom()
1115 {
1116 // Achtung Zoom ist leider eine 6Byte TP real Zahl (keine Ahnung wie die Umzusetzen ist)
1117 sal_Char cZoom[6];
1118 rStream.Read(cZoom, sizeof(cZoom));
1119 nError = rStream.GetError();
1120 }
1121
1122
LoadPalette()1123 void Sc10Import::LoadPalette()
1124 {
1125 lcl_ReadPalette(rStream, TextPalette);
1126 lcl_ReadPalette(rStream, BackPalette);
1127 lcl_ReadPalette(rStream, RasterPalette);
1128 lcl_ReadPalette(rStream, FramePalette);
1129
1130 nError = rStream.GetError();
1131 }
1132
1133
LoadFontCollection()1134 void Sc10Import::LoadFontCollection()
1135 {
1136 pFontCollection = new Sc10FontCollection(rStream);
1137 if (!nError)
1138 nError = pFontCollection->GetError();
1139 }
1140
1141
LoadNameCollection()1142 void Sc10Import::LoadNameCollection()
1143 {
1144 pNameCollection = new Sc10NameCollection(rStream);
1145 if (!nError)
1146 nError = pNameCollection->GetError();
1147 }
1148
1149
ImportNameCollection()1150 void Sc10Import::ImportNameCollection()
1151 {
1152 ScRangeName* pRN = pDoc->GetRangeName();
1153
1154 for (sal_uInt16 i = 0; i < pNameCollection->GetCount(); i++)
1155 {
1156 Sc10NameData* pName = pNameCollection->At( i );
1157 pRN->Insert( new ScRangeData( pDoc,
1158 SC10TOSTRING( pName->Name ),
1159 SC10TOSTRING( pName->Reference ) ) );
1160 }
1161 }
1162
1163
LoadPatternCollection()1164 void Sc10Import::LoadPatternCollection()
1165 {
1166 pPatternCollection = new Sc10PatternCollection( rStream );
1167 if (!nError)
1168 nError = pPatternCollection->GetError();
1169 if (nError == errOutOfMemory)
1170 return; // hopeless
1171 ScStyleSheetPool* pStylePool = pDoc->GetStyleSheetPool();
1172 for( sal_uInt16 i = 0 ; i < pPatternCollection->GetCount() ; i++ )
1173 {
1174 Sc10PatternData* pPattern = pPatternCollection->At( i );
1175 String aName( pPattern->Name, DEFCHARSET );
1176 SfxStyleSheetBase* pStyle = pStylePool->Find( aName, SFX_STYLE_FAMILY_PARA );
1177 if( pStyle == NULL )
1178 pStylePool->Make( aName, SFX_STYLE_FAMILY_PARA );
1179 else
1180 {
1181 pPattern->Name[ 27 ] = 0;
1182 strcat( pPattern->Name, "_Old" ); // #100211# - checked
1183 aName = SC10TOSTRING( pPattern->Name );
1184 pStylePool->Make( aName, SFX_STYLE_FAMILY_PARA );
1185 }
1186 pStyle = pStylePool->Find( aName, SFX_STYLE_FAMILY_PARA );
1187 if( pStyle != NULL )
1188 {
1189 SfxItemSet &rItemSet = pStyle->GetItemSet();
1190 // Font
1191 if( ( pPattern->FormatFlags & pfFont ) == pfFont )
1192 {
1193 FontFamily eFam = FAMILY_DONTKNOW;
1194 switch( pPattern->LogFont.lfPitchAndFamily & 0xF0 )
1195 {
1196 case ffDontCare : eFam = FAMILY_DONTKNOW; break;
1197 case ffRoman : eFam = FAMILY_ROMAN; break;
1198 case ffSwiss : eFam = FAMILY_SWISS; break;
1199 case ffModern : eFam = FAMILY_MODERN; break;
1200 case ffScript : eFam = FAMILY_SCRIPT; break;
1201 case ffDecorative : eFam = FAMILY_DECORATIVE; break;
1202 default: eFam = FAMILY_DONTKNOW; break;
1203 }
1204 rItemSet.Put( SvxFontItem( eFam, SC10TOSTRING( pPattern->LogFont.lfFaceName ), EMPTY_STRING,
1205 PITCH_DONTKNOW, RTL_TEXTENCODING_DONTKNOW, ATTR_FONT ) );
1206 rItemSet.Put( SvxFontHeightItem( Abs( pPattern->LogFont.lfHeight ), 100, ATTR_FONT_HEIGHT ) );
1207 Color TextColor( COL_BLACK );
1208 lcl_ChangeColor( ( pPattern->nColor & 0x000F ), TextColor );
1209 rItemSet.Put( SvxColorItem( TextColor, ATTR_FONT_COLOR ) );
1210 // FontAttr
1211 if( pPattern->LogFont.lfWeight != fwNormal )
1212 rItemSet.Put( SvxWeightItem( WEIGHT_BOLD, ATTR_FONT_WEIGHT ) );
1213 if( pPattern->LogFont.lfItalic != 0 )
1214 rItemSet.Put( SvxPostureItem( ITALIC_NORMAL, ATTR_FONT_POSTURE ) );
1215 if( pPattern->LogFont.lfUnderline != 0 )
1216 rItemSet.Put( SvxUnderlineItem( UNDERLINE_SINGLE, ATTR_FONT_UNDERLINE ) );
1217 if( pPattern->LogFont.lfStrikeOut != 0 )
1218 rItemSet.Put( SvxCrossedOutItem( STRIKEOUT_SINGLE, ATTR_FONT_CROSSEDOUT ) );
1219 }
1220 // Ausrichtung
1221 if( ( pPattern->FormatFlags & pfJustify ) == pfJustify )
1222 {
1223 sal_uInt16 HorJustify = ( pPattern->Justify & 0x000F );
1224 sal_uInt16 VerJustify = ( pPattern->Justify & 0x00F0 ) >> 4;
1225 sal_uInt16 OJustify = ( pPattern->Justify & 0x0F00 ) >> 8;
1226 sal_uInt16 EJustify = ( pPattern->Justify & 0xF000 ) >> 12;
1227 if( HorJustify != 0 )
1228 switch( HorJustify )
1229 {
1230 case hjLeft:
1231 rItemSet.Put( SvxHorJustifyItem( SVX_HOR_JUSTIFY_LEFT, ATTR_HOR_JUSTIFY ) );
1232 break;
1233 case hjCenter:
1234 rItemSet.Put( SvxHorJustifyItem( SVX_HOR_JUSTIFY_CENTER, ATTR_HOR_JUSTIFY ) );
1235 break;
1236 case hjRight:
1237 rItemSet.Put( SvxHorJustifyItem( SVX_HOR_JUSTIFY_RIGHT, ATTR_HOR_JUSTIFY ) );
1238 break;
1239 }
1240 if( VerJustify != 0 )
1241 switch( VerJustify )
1242 {
1243 case vjTop:
1244 rItemSet.Put( SvxVerJustifyItem( SVX_VER_JUSTIFY_TOP, ATTR_VER_JUSTIFY ) );
1245 break;
1246 case vjCenter:
1247 rItemSet.Put( SvxVerJustifyItem( SVX_VER_JUSTIFY_CENTER, ATTR_VER_JUSTIFY ) );
1248 break;
1249 case vjBottom:
1250 rItemSet.Put( SvxVerJustifyItem( SVX_VER_JUSTIFY_BOTTOM, ATTR_VER_JUSTIFY ) );
1251 break;
1252 }
1253
1254 if( ( OJustify & ojWordBreak ) == ojWordBreak )
1255 rItemSet.Put( SfxBoolItem( sal_True ) );
1256 if( ( OJustify & ojBottomTop ) == ojBottomTop )
1257 rItemSet.Put( SfxInt32Item( ATTR_ROTATE_VALUE, 9000 ) );
1258 else if( ( OJustify & ojTopBottom ) == ojTopBottom )
1259 rItemSet.Put( SfxInt32Item( ATTR_ROTATE_VALUE, 27000 ) );
1260
1261 sal_Int16 Margin = Max( ( sal_uInt16 ) 20, ( sal_uInt16 ) ( EJustify * 20 ) );
1262 if( ( ( OJustify & ojBottomTop ) == ojBottomTop ) )
1263 rItemSet.Put( SvxMarginItem( 20, Margin, 20, Margin, ATTR_MARGIN ) );
1264 else
1265 rItemSet.Put( SvxMarginItem( Margin, 20, Margin, 20, ATTR_MARGIN ) );
1266 }
1267
1268 // Frame
1269 if( ( pPattern->FormatFlags & pfFrame ) == pfFrame )
1270 {
1271 if( pPattern->Frame != 0 )
1272 {
1273 sal_uInt16 nLeft = 0;
1274 sal_uInt16 nTop = 0;
1275 sal_uInt16 nRight = 0;
1276 sal_uInt16 nBottom = 0;
1277 sal_uInt16 fLeft = ( pPattern->Frame & 0x000F );
1278 sal_uInt16 fTop = ( pPattern->Frame & 0x00F0 ) / 0x0010;
1279 sal_uInt16 fRight = ( pPattern->Frame & 0x0F00 ) / 0x0100;
1280 sal_uInt16 fBottom = ( pPattern->Frame & 0xF000 ) / 0x1000;
1281
1282 if( fLeft > 1 )
1283 nLeft = 50;
1284 else if( fLeft > 0 )
1285 nLeft = 20;
1286
1287 if( fTop > 1 )
1288 nTop = 50;
1289 else if( fTop > 0 )
1290 nTop = 20;
1291
1292 if( fRight > 1 )
1293 nRight = 50;
1294 else if( fRight > 0 )
1295 nRight = 20;
1296
1297 if( fBottom > 1 )
1298 nBottom = 50;
1299 else if( fBottom > 0 )
1300 nBottom = 20;
1301
1302 Color ColorLeft( COL_BLACK );
1303 Color ColorTop( COL_BLACK );
1304 Color ColorRight( COL_BLACK );
1305 Color ColorBottom( COL_BLACK );
1306
1307 sal_uInt16 cLeft = ( pPattern->FrameColor & 0x000F );
1308 sal_uInt16 cTop = ( pPattern->FrameColor & 0x00F0 ) >> 4;
1309 sal_uInt16 cRight = ( pPattern->FrameColor & 0x0F00 ) >> 8;
1310 sal_uInt16 cBottom = ( pPattern->FrameColor & 0xF000 ) >> 12;
1311
1312 lcl_ChangeColor( cLeft, ColorLeft );
1313 lcl_ChangeColor( cTop, ColorTop );
1314 lcl_ChangeColor( cRight, ColorRight );
1315 lcl_ChangeColor( cBottom, ColorBottom );
1316
1317 SvxBorderLine aLine;
1318 SvxBoxItem aBox( ATTR_BORDER );
1319
1320 aLine.SetOutWidth( nLeft );
1321 aLine.SetColor( ColorLeft );
1322 aBox.SetLine( &aLine, BOX_LINE_LEFT );
1323 aLine.SetOutWidth( nTop );
1324 aLine.SetColor( ColorTop );
1325 aBox.SetLine( &aLine, BOX_LINE_TOP );
1326 aLine.SetOutWidth( nRight );
1327 aLine.SetColor( ColorRight );
1328 aBox.SetLine( &aLine, BOX_LINE_RIGHT );
1329 aLine.SetOutWidth( nBottom );
1330 aLine.SetColor( ColorBottom );
1331 aBox.SetLine( &aLine, BOX_LINE_BOTTOM );
1332 rItemSet.Put( aBox );
1333 }
1334 }
1335 // Raster
1336 if( ( pPattern->FormatFlags & pfRaster ) == pfRaster )
1337 {
1338 if( pPattern->Raster != 0 )
1339 {
1340 sal_uInt16 nBColor = ( pPattern->nColor & 0x00F0 ) >> 4;
1341 sal_uInt16 nRColor = ( pPattern->nColor & 0x0F00 ) >> 8;
1342 Color aBColor( COL_BLACK );
1343
1344 lcl_ChangeColor( nBColor, aBColor );
1345
1346 if( nBColor == 0 )
1347 aBColor.SetColor( COL_WHITE );
1348 else if( nBColor == 15 )
1349 aBColor.SetColor( COL_BLACK );
1350
1351 Color aRColor( COL_BLACK );
1352 lcl_ChangeColor( nRColor, aRColor );
1353 sal_uInt16 nFact;
1354 sal_Bool bSwapCol = sal_False;
1355 sal_Bool bSetItem = sal_True;
1356 switch (pPattern->Raster)
1357 {
1358 case raNone: nFact = 0xffff; bSwapCol = sal_True; bSetItem = (nBColor > 0); break;
1359 case raGray12: nFact = (0xffff / 100) * 12; break;
1360 case raGray25: nFact = (0xffff / 100) * 25; break;
1361 case raGray50: nFact = (0xffff / 100) * 50; break;
1362 case raGray75: nFact = (0xffff / 100) * 75; break;
1363 default: nFact = 0xffff; bSetItem = (nRColor < 15);
1364 }
1365 if ( bSetItem )
1366 {
1367 if( bSwapCol )
1368 rItemSet.Put( SvxBrushItem( GetMixedColor( aBColor, aRColor, nFact ), ATTR_BACKGROUND ) );
1369 else
1370 rItemSet.Put( SvxBrushItem( GetMixedColor( aRColor, aBColor, nFact ), ATTR_BACKGROUND ) );
1371 }
1372 }
1373 }
1374 // ZahlenFormate
1375 if( ( pPattern->ValueFormat.Format != 0 ) &&
1376 ( ( pPattern->FormatFlags & pfValue ) == pfValue ) )
1377 {
1378 sal_uLong nKey = 0;
1379 ChangeFormat( pPattern->ValueFormat.Format, pPattern->ValueFormat.Info, nKey );
1380 rItemSet.Put( SfxUInt32Item( ATTR_VALUE_FORMAT, ( sal_uInt32 ) nKey ) );
1381 }
1382
1383 // Zellattribute (Schutz, Versteckt...)
1384 if( ( pPattern->Flags != 0 ) &&
1385 ( ( pPattern->FormatFlags & pfProtection ) == pfProtection ) )
1386 {
1387 sal_Bool bProtect = ( ( pPattern->Flags & paProtect ) == paProtect );
1388 sal_Bool bHFormula = ( ( pPattern->Flags & paHideFormula ) == paHideFormula );
1389 sal_Bool bHCell = ( ( pPattern->Flags & paHideAll ) == paHideAll );
1390 sal_Bool bHPrint = ( ( pPattern->Flags & paHidePrint ) == paHidePrint );
1391 rItemSet.Put( ScProtectionAttr( bProtect, bHFormula, bHCell, bHPrint ) );
1392 }
1393 } // if Style != 0
1394 } // for (i = 0; i < GetCount()
1395 }
1396
1397
LoadDataBaseCollection()1398 void Sc10Import::LoadDataBaseCollection()
1399 {
1400 pDataBaseCollection = new Sc10DataBaseCollection(rStream);
1401 if (!nError)
1402 nError = pDataBaseCollection->GetError();
1403 if (nError == errOutOfMemory)
1404 return; // hopeless
1405 for( sal_uInt16 i = 0 ; i < pDataBaseCollection->GetCount() ; i++ )
1406 {
1407 Sc10DataBaseData* pOldData = pDataBaseCollection->At(i);
1408 ScDBData* pNewData = new ScDBData( SC10TOSTRING( pOldData->DataBaseRec.Name ),
1409 ( SCTAB ) pOldData->DataBaseRec.Tab,
1410 ( SCCOL ) pOldData->DataBaseRec.Block.x1,
1411 ( SCROW ) pOldData->DataBaseRec.Block.y1,
1412 ( SCCOL ) pOldData->DataBaseRec.Block.x2,
1413 ( SCROW ) pOldData->DataBaseRec.Block.y2,
1414 sal_True,
1415 ( sal_Bool) pOldData->DataBaseRec.RowHeader );
1416 pDoc->GetDBCollection()->Insert( pNewData );
1417 }
1418 }
1419
1420
LoadTables()1421 void Sc10Import::LoadTables()
1422 {
1423 Sc10PageCollection aPageCollection;
1424
1425 sal_Int16 nTabCount;
1426 rStream >> nTabCount;
1427 for (sal_Int16 Tab = 0; (Tab < nTabCount) && (nError == 0); Tab++)
1428 {
1429 Sc10PageFormat PageFormat;
1430 sal_Int16 DataBaseIndex;
1431 Sc10TableProtect TabProtect;
1432 sal_Int16 TabNo;
1433 sal_Char TabName[128];
1434 sal_uInt16 Display;
1435 sal_uInt8 Visible;
1436 sal_uInt16 ID;
1437 sal_uInt16 DataCount;
1438 sal_uInt16 DataStart;
1439 sal_uInt16 DataEnd;
1440 sal_uInt16 DataValue;
1441 sal_uInt16 Count;
1442 sal_uInt16 i;
1443 String aStr; // Universal-Konvertierungs-String
1444
1445
1446 lcl_ReadPageFormat(rStream, PageFormat);
1447
1448 sal_uInt16 nAt = aPageCollection.InsertFormat(PageFormat);
1449 String aPageName = lcl_MakeOldPageStyleFormatName( nAt );
1450
1451 pPrgrsBar->Progress();
1452
1453 rStream >> DataBaseIndex;
1454
1455 lcl_ReadTabProtect(rStream, TabProtect);
1456
1457 ScTableProtection aProtection;
1458 aProtection.setProtected(static_cast<bool>(TabProtect.Protect));
1459 aProtection.setPassword(SC10TOSTRING(TabProtect.PassWord));
1460 pDoc->SetTabProtection(static_cast<SCTAB>(Tab), &aProtection);
1461
1462 rStream >> TabNo;
1463
1464 sal_uInt8 nLen;
1465 rStream >> nLen;
1466 rStream.Read(TabName, sizeof(TabName) - 1);
1467 if (nLen >= sizeof(TabName))
1468 nLen = sizeof(TabName) - 1;
1469 TabName[nLen] = 0;
1470
1471 //----------------------------------------------------------
1472 rStream >> Display;
1473
1474 if ( Tab == (sal_Int16)nShowTab )
1475 {
1476 ScVObjMode eObjMode = VOBJ_MODE_SHOW;
1477
1478 aSc30ViewOpt.SetOption( VOPT_FORMULAS, IS_SET(dfFormula,Display) );
1479 aSc30ViewOpt.SetOption( VOPT_NULLVALS, IS_SET(dfZerro,Display) );
1480 aSc30ViewOpt.SetOption( VOPT_SYNTAX, IS_SET(dfSyntax,Display) );
1481 aSc30ViewOpt.SetOption( VOPT_NOTES, IS_SET(dfNoteMark,Display) );
1482 aSc30ViewOpt.SetOption( VOPT_VSCROLL, sal_True );
1483 aSc30ViewOpt.SetOption( VOPT_HSCROLL, sal_True );
1484 aSc30ViewOpt.SetOption( VOPT_TABCONTROLS, sal_True );
1485 aSc30ViewOpt.SetOption( VOPT_OUTLINER, sal_True );
1486 aSc30ViewOpt.SetOption( VOPT_GRID, IS_SET(dfGrid,Display) );
1487
1488 // VOPT_HEADER wird in LoadViewColRowBar() gesetzt
1489
1490 if ( IS_SET(dfObjectAll,Display) ) // Objekte anzeigen
1491 eObjMode = VOBJ_MODE_SHOW;
1492 else if ( IS_SET(dfObjectFrame,Display) ) // Objekte als Platzhalter
1493 eObjMode = VOBJ_MODE_SHOW;
1494 else if ( IS_SET(dfObjectNone,Display) ) // Objekte nicht anzeigen
1495 eObjMode = VOBJ_MODE_HIDE;
1496
1497 aSc30ViewOpt.SetObjMode( VOBJ_TYPE_OLE, eObjMode );
1498 aSc30ViewOpt.SetObjMode( VOBJ_TYPE_CHART, eObjMode );
1499 aSc30ViewOpt.SetObjMode( VOBJ_TYPE_DRAW, eObjMode );
1500 }
1501
1502 /* wofuer wird das benoetigt? Da in SC 1.0 die Anzeigeflags pro Tabelle gelten und nicht pro View
1503 Dieses Flag in die ViewOptions eintragen bei Gelegenheit, Sollte der Stephan Olk machen
1504 sal_uInt16 nDisplayMask = 0xFFFF;
1505 sal_uInt16 nDisplayValue = 0;
1506 if (Tab == 0)
1507 nDisplayValue = Display;
1508 else
1509 {
1510 sal_uInt16 nDiff = Display ^ nDisplayValue;
1511 nDisplayMask &= ~nDiff;
1512 }
1513 */
1514 //--------------------------------------------------------------------
1515 rStream >> Visible;
1516
1517 nError = rStream.GetError();
1518 if (nError != 0) return;
1519
1520 if (TabNo == 0)
1521 pDoc->RenameTab(static_cast<SCTAB> (TabNo), SC10TOSTRING( TabName ), sal_False);
1522 else
1523 pDoc->InsertTab(SC_TAB_APPEND, SC10TOSTRING( TabName ) );
1524
1525 pDoc->SetPageStyle( static_cast<SCTAB>(Tab), aPageName );
1526
1527 if (Visible == 0) pDoc->SetVisible(static_cast<SCTAB> (TabNo), sal_False);
1528
1529 // ColWidth
1530 rStream >> ID;
1531 if (ID != ColWidthID)
1532 {
1533 DBG_ERROR( "ColWidthID" );
1534 nError = errUnknownID;
1535 return;
1536 }
1537 rStream >> DataCount;
1538 DataStart = 0;
1539 for (i=0; i < DataCount; i++)
1540 {
1541 rStream >> DataEnd;
1542 rStream >> DataValue;
1543 for (SCCOL j = static_cast<SCCOL>(DataStart); j <= static_cast<SCCOL>(DataEnd); j++) pDoc->SetColWidth(j, static_cast<SCTAB> (TabNo), DataValue);
1544 DataStart = DataEnd + 1;
1545 }
1546 pPrgrsBar->Progress();
1547
1548 // ColAttr
1549 rStream >> ID;
1550 if (ID != ColAttrID)
1551 {
1552 DBG_ERROR( "ColAttrID" );
1553 nError = errUnknownID;
1554 return;
1555 }
1556
1557 rStream >> DataCount;
1558 DataStart = 0;
1559 for (i=0; i < DataCount; i++)
1560 {
1561 rStream >> DataEnd;
1562 rStream >> DataValue;
1563 if (DataValue != 0)
1564 {
1565 bool bPageBreak = ((DataValue & crfSoftBreak) == crfSoftBreak);
1566 bool bManualBreak = ((DataValue & crfHardBreak) == crfHardBreak);
1567 bool bHidden = ((DataValue & crfHidden) == crfHidden);
1568 for (SCCOL k = static_cast<SCCOL>(DataStart); k <= static_cast<SCCOL>(DataEnd); k++)
1569 {
1570 pDoc->SetColHidden(k, k, static_cast<SCTAB>(TabNo), bHidden);
1571 pDoc->SetColBreak(k, static_cast<SCTAB> (TabNo), bPageBreak, bManualBreak);
1572 }
1573 }
1574 DataStart = DataEnd + 1;
1575 }
1576 pPrgrsBar->Progress();
1577
1578 // RowHeight
1579 rStream >> ID;
1580 if (ID != RowHeightID)
1581 {
1582 DBG_ERROR( "RowHeightID" );
1583 nError = errUnknownID;
1584 return;
1585 }
1586
1587 rStream >> DataCount;
1588 DataStart = 0;
1589 for (i=0; i < DataCount; i++)
1590 {
1591 rStream >> DataEnd;
1592 rStream >> DataValue;
1593 pDoc->SetRowHeightRange(static_cast<SCROW> (DataStart), static_cast<SCROW> (DataEnd), static_cast<SCTAB> (TabNo), DataValue);
1594 DataStart = DataEnd + 1;
1595 }
1596 pPrgrsBar->Progress();
1597
1598 // RowAttr
1599 rStream >> ID;
1600 if (ID != RowAttrID)
1601 {
1602 DBG_ERROR( "RowAttrID" );
1603 nError = errUnknownID;
1604 return;
1605 }
1606
1607 rStream >> DataCount;
1608 DataStart = 0;
1609 for (i=0; i < DataCount; i++)
1610 {
1611 rStream >> DataEnd;
1612 rStream >> DataValue;
1613 if (DataValue != 0)
1614 {
1615 bool bPageBreak = ((DataValue & crfSoftBreak) == crfSoftBreak);
1616 bool bManualBreak = ((DataValue & crfHardBreak) == crfHardBreak);
1617 bool bHidden = ((DataValue & crfHidden) == crfHidden);
1618 for (SCROW l = static_cast<SCROW>(DataStart); l <= static_cast<SCROW>(DataEnd); l++)
1619 {
1620 pDoc->SetRowHidden(l, l, static_cast<SCTAB> (TabNo), bHidden);
1621 pDoc->SetRowBreak(l, static_cast<SCTAB> (TabNo), bPageBreak, bManualBreak);
1622 }
1623 }
1624 DataStart = DataEnd + 1;
1625 }
1626 pPrgrsBar->Progress();
1627
1628 // DataTable
1629 rStream >> ID;
1630 if (ID != TableID)
1631 {
1632 DBG_ERROR( "TableID" );
1633 nError = errUnknownID;
1634 return;
1635 }
1636 for (SCCOL Col = 0; (Col <= SC10MAXCOL) && (nError == 0); Col++)
1637 {
1638 rStream >> Count;
1639 nError = rStream.GetError();
1640 if ((Count != 0) && (nError == 0))
1641 LoadCol(Col, static_cast<SCTAB> (TabNo));
1642 }
1643 DBG_ASSERT( nError == 0, "Stream" );
1644 }
1645 pPrgrsBar->Progress();
1646
1647 aPageCollection.PutToDoc( pDoc );
1648 }
1649
1650
LoadCol(SCCOL Col,SCTAB Tab)1651 void Sc10Import::LoadCol(SCCOL Col, SCTAB Tab)
1652 {
1653 LoadColAttr(Col, Tab);
1654
1655 sal_uInt16 CellCount;
1656 sal_uInt8 CellType;
1657 sal_uInt16 Row;
1658 rStream >> CellCount;
1659 SCROW nScCount = static_cast< SCROW >( CellCount );
1660 if (nScCount > MAXROW) nError = errUnknownFormat;
1661 for (sal_uInt16 i = 0; (i < CellCount) && (nError == 0); i++)
1662 {
1663 rStream >> CellType;
1664 rStream >> Row;
1665 nError = rStream.GetError();
1666 if (nError == 0)
1667 {
1668 switch (CellType)
1669 {
1670 case ctValue :
1671 {
1672 const SfxPoolItem* pValueFormat = pDoc->GetAttr(Col, static_cast<SCROW> (Row), Tab, ATTR_VALUE_FORMAT);
1673 sal_uLong nFormat = ((SfxUInt32Item*)pValueFormat)->GetValue();
1674 double Value = ScfTools::ReadLongDouble(rStream);
1675
1676 // Achtung hier ist eine Anpassung Notwendig wenn Ihr das Basisdatum aendert
1677 // In StarCalc 1.0 entspricht 0 dem 01.01.1900
1678 // if ((nFormat >= 30) && (nFormat <= 35))
1679 // Value += 0;
1680 if ((nFormat >= 40) && (nFormat <= 45))
1681 Value /= 86400.0;
1682 pDoc->SetValue(Col, static_cast<SCROW> (Row), Tab, Value);
1683 break;
1684 }
1685 case ctString :
1686 {
1687 sal_uInt8 Len;
1688 sal_Char s[256];
1689 rStream >> Len;
1690 rStream.Read(s, Len);
1691 s[Len] = 0;
1692
1693 pDoc->SetString( Col, static_cast<SCROW> (Row), Tab, SC10TOSTRING( s ) );
1694 break;
1695 }
1696 case ctFormula :
1697 {
1698 /*double Value =*/ ScfTools::ReadLongDouble(rStream);
1699 sal_uInt8 Len;
1700 sal_Char s[256+1];
1701 rStream >> Len;
1702 rStream.Read(&s[1], Len);
1703 s[0] = '=';
1704 s[Len + 1] = 0;
1705 ScFormulaCell* pCell = new ScFormulaCell( pDoc, ScAddress( Col, static_cast<SCROW> (Row), Tab ) );
1706 pCell->SetHybridFormula( SC10TOSTRING( s ),formula::FormulaGrammar::GRAM_NATIVE );
1707 pDoc->PutCell( Col, static_cast<SCROW> (Row), Tab, pCell, (sal_Bool)sal_True );
1708 break;
1709 }
1710 case ctNote :
1711 break;
1712 default :
1713 nError = errUnknownFormat;
1714 break;
1715 }
1716 sal_uInt16 NoteLen;
1717 rStream >> NoteLen;
1718 if (NoteLen != 0)
1719 {
1720 sal_Char* pNote = new sal_Char[NoteLen+1];
1721 rStream.Read(pNote, NoteLen);
1722 pNote[NoteLen] = 0;
1723 String aNoteText( SC10TOSTRING(pNote));
1724 delete [] pNote;
1725 ScAddress aPos( Col, static_cast<SCROW>(Row), Tab );
1726 ScNoteUtil::CreateNoteFromString( *pDoc, aPos, aNoteText, false, false );
1727 }
1728 }
1729 pPrgrsBar->Progress();
1730 }
1731 }
1732
1733
LoadColAttr(SCCOL Col,SCTAB Tab)1734 void Sc10Import::LoadColAttr(SCCOL Col, SCTAB Tab)
1735 {
1736 Sc10ColAttr aFont;
1737 Sc10ColAttr aAttr;
1738 Sc10ColAttr aJustify;
1739 Sc10ColAttr aFrame;
1740 Sc10ColAttr aRaster;
1741 Sc10ColAttr aValue;
1742 Sc10ColAttr aColor;
1743 Sc10ColAttr aFrameColor;
1744 Sc10ColAttr aFlag;
1745 Sc10ColAttr aPattern;
1746
1747 if (nError == 0) LoadAttr(aFont);
1748 if (nError == 0) LoadAttr(aAttr);
1749 if (nError == 0) LoadAttr(aJustify);
1750 if (nError == 0) LoadAttr(aFrame);
1751 if (nError == 0) LoadAttr(aRaster);
1752 if (nError == 0) LoadAttr(aValue);
1753 if (nError == 0) LoadAttr(aColor);
1754 if (nError == 0) LoadAttr(aFrameColor);
1755 if (nError == 0) LoadAttr(aFlag);
1756 if (nError == 0) LoadAttr(aPattern);
1757
1758 if (nError == 0)
1759 {
1760 SCROW nStart;
1761 SCROW nEnd;
1762 sal_uInt16 i;
1763 sal_uInt16 nLimit;
1764 sal_uInt16 nValue1;
1765 Sc10ColData *pColData;
1766
1767 // Font (Name, Groesse)
1768 nStart = 0;
1769 nEnd = 0;
1770 nLimit = aFont.Count;
1771 pColData = aFont.pData;
1772 for( i = 0 ; i < nLimit ; i++, pColData++ )
1773 {
1774 nEnd = static_cast<SCROW>(pColData->Row);
1775 if ((nStart <= nEnd) && (pColData->Value))
1776 {
1777 FontFamily eFam = FAMILY_DONTKNOW;
1778 Sc10FontData* pFont = pFontCollection->At(pColData->Value);
1779 if (pFont)
1780 {
1781 switch (pFont->PitchAndFamily & 0xF0)
1782 {
1783 case ffDontCare : eFam = FAMILY_DONTKNOW; break;
1784 case ffRoman : eFam = FAMILY_ROMAN; break;
1785 case ffSwiss : eFam = FAMILY_SWISS; break;
1786 case ffModern : eFam = FAMILY_MODERN; break;
1787 case ffScript : eFam = FAMILY_SCRIPT; break;
1788 case ffDecorative : eFam = FAMILY_DECORATIVE; break;
1789 default: eFam = FAMILY_DONTKNOW; break;
1790 }
1791 ScPatternAttr aScPattern(pDoc->GetPool());
1792 aScPattern.GetItemSet().Put(SvxFontItem(eFam, SC10TOSTRING( pFont->FaceName ), EMPTY_STRING,
1793 PITCH_DONTKNOW, RTL_TEXTENCODING_DONTKNOW, ATTR_FONT ));
1794 aScPattern.GetItemSet().Put(SvxFontHeightItem(Abs(pFont->Height), 100, ATTR_FONT_HEIGHT ));
1795 pDoc->ApplyPatternAreaTab(Col, nStart, Col, nEnd, Tab, aScPattern);
1796 }
1797 }
1798 nStart = nEnd + 1;
1799 }
1800
1801 // Fontfarbe
1802 nStart = 0;
1803 nEnd = 0;
1804 nLimit = aColor.Count;
1805 pColData = aColor.pData;
1806 for( i = 0 ; i < nLimit ; i++, pColData++ )
1807 {
1808 nEnd = static_cast<SCROW>(pColData->Row);
1809 if ((nStart <= nEnd) && (pColData->Value))
1810 {
1811 Color TextColor(COL_BLACK);
1812 lcl_ChangeColor((pColData->Value & 0x000F), TextColor);
1813 ScPatternAttr aScPattern(pDoc->GetPool());
1814 aScPattern.GetItemSet().Put(SvxColorItem(TextColor, ATTR_FONT_COLOR ));
1815 pDoc->ApplyPatternAreaTab(Col, nStart, Col, nEnd, Tab, aScPattern);
1816 }
1817 nStart = nEnd + 1;
1818 }
1819
1820 // Fontattribute (Fett, Kursiv...)
1821 nStart = 0;
1822 nEnd = 0;
1823 nLimit = aAttr.Count;
1824 pColData = aAttr.pData;
1825 for( i = 0 ; i < nLimit ; i++, pColData++ )
1826 {
1827 nEnd = static_cast<SCROW>(pColData->Row);
1828 nValue1 = pColData->Value;
1829 if ((nStart <= nEnd) && (nValue1))
1830 {
1831 ScPatternAttr aScPattern(pDoc->GetPool());
1832 if ((nValue1 & atBold) == atBold)
1833 aScPattern.GetItemSet().Put(SvxWeightItem(WEIGHT_BOLD, ATTR_FONT_WEIGHT));
1834 if ((nValue1 & atItalic) == atItalic)
1835 aScPattern.GetItemSet().Put(SvxPostureItem(ITALIC_NORMAL, ATTR_FONT_POSTURE));
1836 if ((nValue1 & atUnderline) == atUnderline)
1837 aScPattern.GetItemSet().Put(SvxUnderlineItem(UNDERLINE_SINGLE, ATTR_FONT_UNDERLINE));
1838 if ((nValue1 & atStrikeOut) == atStrikeOut)
1839 aScPattern.GetItemSet().Put(SvxCrossedOutItem(STRIKEOUT_SINGLE, ATTR_FONT_CROSSEDOUT));
1840 pDoc->ApplyPatternAreaTab(Col, nStart, Col, nEnd, Tab, aScPattern);
1841 }
1842 nStart = nEnd + 1;
1843 }
1844
1845 // Zellausrichtung
1846 nStart = 0;
1847 nEnd = 0;
1848 nLimit = aJustify.Count;
1849 pColData = aJustify.pData;
1850 for( i = 0 ; i < nLimit ; i++, pColData++ )
1851 {
1852 nEnd = static_cast<SCROW>(pColData->Row);
1853 nValue1 = pColData->Value;
1854 if ((nStart <= nEnd) && (nValue1))
1855 {
1856 ScPatternAttr aScPattern(pDoc->GetPool());
1857 sal_uInt16 HorJustify = (nValue1 & 0x000F);
1858 sal_uInt16 VerJustify = (nValue1 & 0x00F0) >> 4;
1859 sal_uInt16 OJustify = (nValue1 & 0x0F00) >> 8;
1860 sal_uInt16 EJustify = (nValue1 & 0xF000) >> 12;
1861
1862 switch (HorJustify)
1863 {
1864 case hjLeft:
1865 aScPattern.GetItemSet().Put(SvxHorJustifyItem(SVX_HOR_JUSTIFY_LEFT, ATTR_HOR_JUSTIFY));
1866 break;
1867 case hjCenter:
1868 aScPattern.GetItemSet().Put(SvxHorJustifyItem(SVX_HOR_JUSTIFY_CENTER, ATTR_HOR_JUSTIFY));
1869 break;
1870 case hjRight:
1871 aScPattern.GetItemSet().Put(SvxHorJustifyItem(SVX_HOR_JUSTIFY_RIGHT, ATTR_HOR_JUSTIFY));
1872 break;
1873 }
1874
1875 switch (VerJustify)
1876 {
1877 case vjTop:
1878 aScPattern.GetItemSet().Put(SvxVerJustifyItem(SVX_VER_JUSTIFY_TOP, ATTR_VER_JUSTIFY));
1879 break;
1880 case vjCenter:
1881 aScPattern.GetItemSet().Put(SvxVerJustifyItem(SVX_VER_JUSTIFY_CENTER, ATTR_VER_JUSTIFY));
1882 break;
1883 case vjBottom:
1884 aScPattern.GetItemSet().Put(SvxVerJustifyItem(SVX_VER_JUSTIFY_BOTTOM, ATTR_VER_JUSTIFY));
1885 break;
1886 }
1887
1888 if (OJustify & ojWordBreak)
1889 aScPattern.GetItemSet().Put(SfxBoolItem(sal_True));
1890 if (OJustify & ojBottomTop)
1891 aScPattern.GetItemSet().Put(SfxInt32Item(ATTR_ROTATE_VALUE,9000));
1892 else if (OJustify & ojTopBottom)
1893 aScPattern.GetItemSet().Put(SfxInt32Item(ATTR_ROTATE_VALUE,27000));
1894
1895 sal_Int16 Margin = Max((sal_uInt16)20, (sal_uInt16)(EJustify * 20));
1896 if (((OJustify & ojBottomTop) == ojBottomTop) || ((OJustify & ojBottomTop) == ojBottomTop))
1897 aScPattern.GetItemSet().Put(SvxMarginItem(20, Margin, 20, Margin, ATTR_MARGIN));
1898 else
1899 aScPattern.GetItemSet().Put(SvxMarginItem(Margin, 20, Margin, 20, ATTR_MARGIN));
1900 pDoc->ApplyPatternAreaTab(Col, nStart, Col, nEnd, Tab, aScPattern);
1901 }
1902 nStart = nEnd + 1;
1903 }
1904 // Umrandung
1905 sal_Bool bEnd = sal_False;
1906 sal_uInt16 nColorIndex = 0;
1907 sal_uInt16 nFrameIndex = 0;
1908
1909 // Special Fix...
1910 const sal_uInt32 nHelpMeStart = 100;
1911 sal_uInt32 nHelpMe = nHelpMeStart;
1912 sal_uInt16 nColorIndexOld = nColorIndex;
1913 sal_uInt16 nFrameIndexOld = nColorIndex;
1914
1915 nEnd = 0;
1916 nStart = 0;
1917 while( !bEnd && nHelpMe )
1918 {
1919 pColData = &aFrame.pData[ nFrameIndex ];
1920
1921 sal_uInt16 nValue = pColData->Value;
1922 sal_uInt16 nLeft = 0;
1923 sal_uInt16 nTop = 0;
1924 sal_uInt16 nRight = 0;
1925 sal_uInt16 nBottom = 0;
1926 sal_uInt16 fLeft = ( nValue & 0x000F );
1927 sal_uInt16 fTop = ( nValue & 0x00F0 ) >> 4;
1928 sal_uInt16 fRight = ( nValue & 0x0F00 ) >> 8;
1929 sal_uInt16 fBottom = ( nValue & 0xF000 ) >> 12;
1930
1931 if( fLeft > 1 )
1932 nLeft = 50;
1933 else if( fLeft > 0 )
1934 nLeft = 20;
1935
1936 if( fTop > 1 )
1937 nTop = 50;
1938 else if( fTop > 0 )
1939 nTop = 20;
1940
1941 if( fRight > 1 )
1942 nRight = 50;
1943 else if( fRight > 0 )
1944 nRight = 20;
1945
1946 if( fBottom > 1 )
1947 nBottom = 50;
1948 else if( fBottom > 0 )
1949 nBottom = 20;
1950
1951 Color ColorLeft( COL_BLACK );
1952 Color ColorTop( COL_BLACK );
1953 Color ColorRight( COL_BLACK );
1954 Color ColorBottom( COL_BLACK );
1955 sal_uInt16 nFrmColVal = aFrameColor.pData[ nColorIndex ].Value;
1956 SCROW nFrmColRow = static_cast<SCROW>(aFrameColor.pData[ nColorIndex ].Row);
1957 sal_uInt16 cLeft = ( nFrmColVal & 0x000F );
1958 sal_uInt16 cTop = ( nFrmColVal & 0x00F0 ) >> 4;
1959 sal_uInt16 cRight = ( nFrmColVal & 0x0F00 ) >> 8;
1960 sal_uInt16 cBottom = ( nFrmColVal & 0xF000 ) >> 12;
1961
1962 lcl_ChangeColor( cLeft, ColorLeft );
1963 lcl_ChangeColor( cTop, ColorTop );
1964 lcl_ChangeColor( cRight, ColorRight );
1965 lcl_ChangeColor( cBottom, ColorBottom );
1966
1967 if( static_cast<SCROW>(pColData->Row) < nFrmColRow )
1968 {
1969 nEnd = static_cast<SCROW>(pColData->Row);
1970 if( nFrameIndex < ( aFrame.Count - 1 ) )
1971 nFrameIndex++;
1972 }
1973 else if( static_cast<SCROW>(pColData->Row) > nFrmColRow )
1974 {
1975 nEnd = static_cast<SCROW>(aFrameColor.pData[ nColorIndex ].Row);
1976 if( nColorIndex < ( aFrameColor.Count - 1 ) )
1977 nColorIndex++;
1978 }
1979 else
1980 {
1981 nEnd = nFrmColRow;
1982 if( nFrameIndex < (aFrame.Count - 1 ) )
1983 nFrameIndex++;
1984 if( nColorIndex < ( aFrameColor.Count - 1 ) )
1985 nColorIndex++;
1986 }
1987 if( ( nStart <= nEnd ) && ( nValue != 0 ) )
1988 {
1989 ScPatternAttr aScPattern(pDoc->GetPool());
1990 SvxBorderLine aLine;
1991 SvxBoxItem aBox( ATTR_BORDER );
1992
1993 aLine.SetOutWidth( nLeft );
1994 aLine.SetColor( ColorLeft );
1995 aBox.SetLine( &aLine, BOX_LINE_LEFT );
1996
1997 aLine.SetOutWidth( nTop );
1998 aLine.SetColor( ColorTop );
1999 aBox.SetLine( &aLine, BOX_LINE_TOP );
2000
2001 aLine.SetOutWidth( nRight );
2002 aLine.SetColor( ColorRight );
2003 aBox.SetLine( &aLine, BOX_LINE_RIGHT );
2004
2005 aLine.SetOutWidth( nBottom );
2006 aLine.SetColor( ColorBottom );
2007 aBox.SetLine( &aLine, BOX_LINE_BOTTOM );
2008
2009 aScPattern.GetItemSet().Put( aBox );
2010 pDoc->ApplyPatternAreaTab( Col, nStart, Col, nEnd, Tab, aScPattern );
2011 }
2012 nStart = nEnd + 1;
2013
2014 bEnd = ( nFrameIndex == ( aFrame.Count - 1 ) ) && ( nColorIndex == ( aFrameColor.Count - 1 ) );
2015
2016 if( nColorIndexOld != nColorIndex || nFrameIndexOld != nFrameIndex )
2017 {
2018 nColorIndexOld = nColorIndex;
2019 nFrameIndexOld = nFrameIndex;
2020 nHelpMe = nHelpMeStart;
2021 }
2022 else
2023 nHelpMe--;
2024
2025 pColData++;
2026 }
2027
2028 // ACHTUNG: Code bis hier ueberarbeitet ... jetzt hab' ich keinen Bock mehr! (GT)
2029
2030 // Hintergrund (Farbe, Raster)
2031 sal_uInt16 nRasterIndex = 0;
2032 bEnd = sal_False;
2033 nColorIndex = 0;
2034 nEnd = 0;
2035 nStart = 0;
2036
2037 // Special Fix...
2038 nHelpMe = nHelpMeStart;
2039 sal_uInt16 nRasterIndexOld = nRasterIndex;
2040
2041 while( !bEnd && nHelpMe )
2042 {
2043 sal_uInt16 nBColor = ( aColor.pData[ nColorIndex ].Value & 0x00F0 ) >> 4;
2044 sal_uInt16 nRColor = ( aColor.pData[ nColorIndex ].Value & 0x0F00 ) >> 8;
2045 Color aBColor( COL_BLACK );
2046
2047 lcl_ChangeColor( nBColor, aBColor );
2048
2049 if( nBColor == 0 )
2050 aBColor.SetColor( COL_WHITE );
2051 else if( nBColor == 15 )
2052 aBColor.SetColor( COL_BLACK );
2053
2054 Color aRColor( COL_BLACK );
2055
2056 lcl_ChangeColor( nRColor, aRColor );
2057
2058 ScPatternAttr aScPattern( pDoc->GetPool() );
2059
2060 sal_uInt16 nFact;
2061 sal_Bool bSwapCol = sal_False;
2062 sal_Bool bSetItem = sal_True;
2063 switch ( aRaster.pData[ nRasterIndex ].Value )
2064 {
2065 case raNone: nFact = 0xffff; bSwapCol = sal_True; bSetItem = (nBColor > 0); break;
2066 case raGray12: nFact = (0xffff / 100) * 12; break;
2067 case raGray25: nFact = (0xffff / 100) * 25; break;
2068 case raGray50: nFact = (0xffff / 100) * 50; break;
2069 case raGray75: nFact = (0xffff / 100) * 75; break;
2070 default: nFact = 0xffff; bSetItem = (nRColor < 15);
2071 }
2072 if ( bSetItem )
2073 {
2074 if( bSwapCol )
2075 aScPattern.GetItemSet().Put( SvxBrushItem( GetMixedColor( aBColor, aRColor, nFact ), ATTR_BACKGROUND ) );
2076 else
2077 aScPattern.GetItemSet().Put( SvxBrushItem( GetMixedColor( aRColor, aBColor, nFact ), ATTR_BACKGROUND ) );
2078 }
2079 if( aRaster.pData[ nRasterIndex ].Row < aColor.pData[ nColorIndex ].Row )
2080 {
2081 nEnd = static_cast<SCROW>(aRaster.pData[ nRasterIndex ].Row);
2082 if( nRasterIndex < ( aRaster.Count - 1 ) )
2083 nRasterIndex++;
2084 }
2085 else if( aRaster.pData[ nRasterIndex ].Row > aColor.pData[ nColorIndex ].Row )
2086 {
2087 nEnd = static_cast<SCROW>(aColor.pData[ nColorIndex ].Row);
2088 if( nColorIndex < ( aColor.Count - 1 ) )
2089 nColorIndex++;
2090 }
2091 else
2092 {
2093 nEnd = static_cast<SCROW>(aColor.pData[ nColorIndex ].Row);
2094 if( nRasterIndex < ( aRaster.Count - 1 ) )
2095 nRasterIndex++;
2096 if( nColorIndex < ( aColor.Count - 1 ) )
2097 nColorIndex++;
2098 }
2099 if( nStart <= nEnd )
2100 pDoc->ApplyPatternAreaTab( Col, nStart, Col, nEnd, Tab, aScPattern );
2101
2102 nStart = nEnd + 1;
2103
2104 bEnd = ( nRasterIndex == ( aRaster.Count - 1 ) ) && ( nColorIndex == ( aColor.Count - 1 ) );
2105
2106 if( nColorIndexOld != nColorIndex || nRasterIndexOld != nRasterIndex )
2107 {
2108 nColorIndexOld = nColorIndex;
2109 nRasterIndexOld = nRasterIndex;
2110 nHelpMe = nHelpMeStart;
2111 }
2112 else
2113 nHelpMe--;
2114
2115 nHelpMe--;
2116 }
2117
2118 // Zahlenformate
2119 nStart = 0;
2120 nEnd = 0;
2121 nLimit = aValue.Count;
2122 pColData = aValue.pData;
2123 for (i=0; i<nLimit; i++, pColData++)
2124 {
2125 nEnd = static_cast<SCROW>(pColData->Row);
2126 nValue1 = pColData->Value;
2127 if ((nStart <= nEnd) && (nValue1))
2128 {
2129 sal_uLong nKey = 0;
2130 sal_uInt16 nFormat = (nValue1 & 0x00FF);
2131 sal_uInt16 nInfo = (nValue1 & 0xFF00) >> 8;
2132 ChangeFormat(nFormat, nInfo, nKey);
2133 ScPatternAttr aScPattern(pDoc->GetPool());
2134 aScPattern.GetItemSet().Put(SfxUInt32Item(ATTR_VALUE_FORMAT, (sal_uInt32)nKey));
2135 pDoc->ApplyPatternAreaTab(Col, nStart, Col, nEnd, Tab, aScPattern);
2136 }
2137 nStart = nEnd + 1;
2138 }
2139
2140 // Zellattribute (Schutz, Versteckt...)
2141 nStart = 0;
2142 nEnd = 0;
2143 for (i=0; i<aFlag.Count; i++)
2144 {
2145 nEnd = static_cast<SCROW>(aFlag.pData[i].Row);
2146 if ((nStart <= nEnd) && (aFlag.pData[i].Value != 0))
2147 {
2148 sal_Bool bProtect = ((aFlag.pData[i].Value & paProtect) == paProtect);
2149 sal_Bool bHFormula = ((aFlag.pData[i].Value & paHideFormula) == paHideFormula);
2150 sal_Bool bHCell = ((aFlag.pData[i].Value & paHideAll) == paHideAll);
2151 sal_Bool bHPrint = ((aFlag.pData[i].Value & paHidePrint) == paHidePrint);
2152 ScPatternAttr aScPattern(pDoc->GetPool());
2153 aScPattern.GetItemSet().Put(ScProtectionAttr(bProtect, bHFormula, bHCell, bHPrint));
2154 pDoc->ApplyPatternAreaTab(Col, nStart, Col, nEnd, Tab, aScPattern);
2155 }
2156 nStart = nEnd + 1;
2157 }
2158
2159 // ZellVorlagen
2160 nStart = 0;
2161 nEnd = 0;
2162 ScStyleSheetPool* pStylePool = pDoc->GetStyleSheetPool();
2163 for (i=0; i<aPattern.Count; i++)
2164 {
2165 nEnd = static_cast<SCROW>(aPattern.pData[i].Row);
2166 if ((nStart <= nEnd) && (aPattern.pData[i].Value != 0))
2167 {
2168 sal_uInt16 nPatternIndex = (aPattern.pData[i].Value & 0x00FF) - 1;
2169 Sc10PatternData* pPattern = pPatternCollection->At(nPatternIndex);
2170 if (pPattern != NULL)
2171 {
2172 ScStyleSheet* pStyle = (ScStyleSheet*) pStylePool->Find(
2173 SC10TOSTRING( pPattern->Name ), SFX_STYLE_FAMILY_PARA);
2174
2175 if (pStyle != NULL)
2176 pDoc->ApplyStyleAreaTab(Col, nStart, Col, nEnd, Tab, *pStyle);
2177 }
2178 }
2179 nStart = nEnd + 1;
2180 }
2181 }
2182 }
2183
2184
LoadAttr(Sc10ColAttr & rAttr)2185 void Sc10Import::LoadAttr(Sc10ColAttr& rAttr)
2186 {
2187 // rAttr is not reused, otherwise we'd have to delete [] rAttr.pData;
2188 rStream >> rAttr.Count;
2189 if (rAttr.Count)
2190 {
2191 rAttr.pData = new (::std::nothrow) Sc10ColData[rAttr.Count];
2192 if (rAttr.pData != NULL)
2193 {
2194 for (sal_uInt16 i = 0; i < rAttr.Count; i++)
2195 {
2196 rStream >> rAttr.pData[i].Row;
2197 rStream >> rAttr.pData[i].Value;
2198 }
2199 nError = rStream.GetError();
2200 }
2201 else
2202 {
2203 nError = errOutOfMemory;
2204 rAttr.Count = 0;
2205 }
2206 }
2207 }
2208
2209
ChangeFormat(sal_uInt16 nFormat,sal_uInt16 nInfo,sal_uLong & nKey)2210 void Sc10Import::ChangeFormat(sal_uInt16 nFormat, sal_uInt16 nInfo, sal_uLong& nKey)
2211 {
2212 // Achtung: Die Formate werden nur auf die StarCalc 3.0 internen Formate gemappt
2213 // Korrekterweise muessten zum Teil neue Formate erzeugt werden (sollte Stephan sich ansehen)
2214 nKey = 0;
2215 switch (nFormat)
2216 {
2217 case vfStandard :
2218 if (nInfo > 0)
2219 nKey = 2;
2220 break;
2221 case vfMoney :
2222 if (nInfo > 0)
2223 nKey = 21;
2224 else
2225 nKey = 20;
2226 break;
2227 case vfThousend :
2228 if (nInfo > 0)
2229 nKey = 4;
2230 else
2231 nKey = 5;
2232 break;
2233 case vfPercent :
2234 if (nInfo > 0)
2235 nKey = 11;
2236 else
2237 nKey = 10;
2238 break;
2239 case vfExponent :
2240 nKey = 60;
2241 break;
2242 case vfZerro :
2243 // Achtung kein Aequivalent
2244 break;
2245 case vfDate :
2246 switch (nInfo)
2247 {
2248 case df_NDMY_Long :
2249 nKey = 31;
2250 break;
2251 case df_DMY_Long :
2252 nKey = 30;
2253 break;
2254 case df_MY_Long :
2255 nKey = 32;
2256 break;
2257 case df_NDM_Long :
2258 nKey = 31;
2259 break;
2260 case df_DM_Long :
2261 nKey = 33;
2262 break;
2263 case df_M_Long :
2264 nKey = 34;
2265 break;
2266 case df_NDMY_Short :
2267 nKey = 31;
2268 break;
2269 case df_DMY_Short :
2270 nKey = 30;
2271 break;
2272 case df_MY_Short :
2273 nKey = 32;
2274 break;
2275 case df_NDM_Short :
2276 nKey = 31;
2277 break;
2278 case df_DM_Short :
2279 nKey = 33;
2280 break;
2281 case df_M_Short :
2282 nKey = 34;
2283 break;
2284 case df_Q_Long :
2285 nKey = 35;
2286 break;
2287 case df_Q_Short :
2288 nKey = 35;
2289 break;
2290 default :
2291 nKey = 30;
2292 break;
2293 }
2294 break;
2295 case vfTime :
2296 switch (nInfo)
2297 {
2298 case tf_HMS_Long :
2299 nKey = 41;
2300 break;
2301 case tf_HM_Long :
2302 nKey = 40;
2303 break;
2304 case tf_HMS_Short :
2305 nKey = 43;
2306 break;
2307 case tf_HM_Short :
2308 nKey = 42;
2309 break;
2310 default :
2311 nKey = 41;
2312 break;
2313 }
2314 break;
2315 case vfBoolean :
2316 nKey = 99;
2317 break;
2318 case vfStandardRed :
2319 if (nInfo > 0)
2320 nKey = 2;
2321 break;
2322 case vfMoneyRed :
2323 if (nInfo > 0)
2324 nKey = 23;
2325 else
2326 nKey = 22;
2327 break;
2328 case vfThousendRed :
2329 if (nInfo > 0)
2330 nKey = 4;
2331 else
2332 nKey = 5;
2333 break;
2334 case vfPercentRed :
2335 if (nInfo > 0)
2336 nKey = 11;
2337 else
2338 nKey = 10;
2339 break;
2340 case vfExponentRed :
2341 nKey = 60;
2342 break;
2343 case vfFormula :
2344 break;
2345 case vfString :
2346 break;
2347 default :
2348 break;
2349 }
2350 }
2351
2352
LoadObjects()2353 void Sc10Import::LoadObjects()
2354 {
2355 sal_uInt16 ID;
2356 rStream >> ID;
2357 if (rStream.IsEof()) return;
2358 if (ID == ObjectID)
2359 {
2360 #ifdef SC10_SHOW_OBJECTS
2361 // Achtung nur zu Debugzwecken
2362 //-----------------------------------
2363 pDoc->InsertTab(SC_TAB_APPEND, "GraphObjects");
2364 SCCOL nCol = 0;
2365 SCROW nRow = 0;
2366 SCTAB nTab = 0;
2367 pDoc->GetTable("GraphObjects", nTab);
2368 pDoc->SetString(nCol++, nRow, nTab, "ObjectTyp");
2369 pDoc->SetString(nCol++, nRow, nTab, "Col");
2370 pDoc->SetString(nCol++, nRow, nTab, "Row");
2371 pDoc->SetString(nCol++, nRow, nTab, "Tab");
2372 pDoc->SetString(nCol++, nRow, nTab, "X");
2373 pDoc->SetString(nCol++, nRow, nTab, "Y");
2374 pDoc->SetString(nCol++, nRow, nTab, "W");
2375 pDoc->SetString(nCol++, nRow, nTab, "H");
2376 //-----------------------------------
2377 #endif
2378
2379 sal_uInt16 nAnz;
2380 rStream >> nAnz;
2381 sal_Char Reserved[32];
2382 rStream.Read(Reserved, sizeof(Reserved));
2383 nError = rStream.GetError();
2384 if ((nAnz > 0) && (nError == 0))
2385 {
2386 sal_uInt8 ObjectType;
2387 Sc10GraphHeader GraphHeader;
2388 sal_Bool IsOleObject = sal_False; // Achtung dies ist nur ein Notnagel
2389 for (sal_uInt16 i = 0; (i < nAnz) && (nError == 0) && !rStream.IsEof() && !IsOleObject; i++)
2390 {
2391 rStream >> ObjectType;
2392 lcl_ReadGraphHeader(rStream, GraphHeader);
2393
2394 double nPPTX = ScGlobal::nScreenPPTX;
2395 double nPPTY = ScGlobal::nScreenPPTY;
2396
2397 long nStartX = 0;
2398 for (SCsCOL nX=0; nX<GraphHeader.CarretX; nX++)
2399 nStartX += pDoc->GetColWidth(nX, static_cast<SCTAB>(GraphHeader.CarretZ));
2400 nStartX = (long) ( nStartX * HMM_PER_TWIPS );
2401 nStartX += (long) ( GraphHeader.x / nPPTX * HMM_PER_TWIPS );
2402 long nSizeX = (long) ( GraphHeader.w / nPPTX * HMM_PER_TWIPS );
2403 long nStartY = pDoc->GetRowHeight( 0,
2404 static_cast<SCsROW>(GraphHeader.CarretY) - 1,
2405 static_cast<SCTAB>(GraphHeader.CarretZ));
2406 nStartY = (long) ( nStartY * HMM_PER_TWIPS );
2407 nStartY += (long) ( GraphHeader.y / nPPTY * HMM_PER_TWIPS );
2408 long nSizeY = (long) ( GraphHeader.h / nPPTY * HMM_PER_TWIPS );
2409
2410 #ifdef SC10_SHOW_OBJECTS
2411 // Achtung nur zu Debugzwecken
2412 //-----------------------------------
2413 nCol = 0;
2414 nRow++;
2415 switch (ObjectType)
2416 {
2417 case otOle :
2418 pDoc->SetString(nCol++, nRow, nTab, "Ole-Object");
2419 break;
2420 case otImage :
2421 pDoc->SetString(nCol++, nRow, nTab, "Image-Object");
2422 break;
2423 case otChart :
2424 pDoc->SetString(nCol++, nRow, nTab, "Chart-Object");
2425 break;
2426 default :
2427 pDoc->SetString(nCol++, nRow, nTab, "ERROR");
2428 break;
2429 }
2430 pDoc->SetValue(nCol++, nRow, nTab, GraphHeader.CarretX);
2431 pDoc->SetValue(nCol++, nRow, nTab, GraphHeader.CarretY);
2432 pDoc->SetValue(nCol++, nRow, nTab, GraphHeader.CarretZ);
2433 pDoc->SetValue(nCol++, nRow, nTab, GraphHeader.x);
2434 pDoc->SetValue(nCol++, nRow, nTab, GraphHeader.y);
2435 pDoc->SetValue(nCol++, nRow, nTab, GraphHeader.w);
2436 pDoc->SetValue(nCol++, nRow, nTab, GraphHeader.h);
2437 //-----------------------------------
2438 #endif
2439
2440 switch (ObjectType)
2441 {
2442 case otOle :
2443 // Achtung hier muss sowas wie OleLoadFromStream passieren
2444 IsOleObject = sal_True;
2445 break;
2446 case otImage :
2447 {
2448 Sc10ImageHeader ImageHeader;
2449 lcl_ReadImageHeaer(rStream, ImageHeader);
2450
2451 // Achtung nun kommen die Daten (Bitmap oder Metafile)
2452 // Typ = 1 Device Dependend Bitmap DIB
2453 // Typ = 2 MetaFile
2454 rStream.SeekRel(ImageHeader.Size);
2455
2456 if( ImageHeader.Typ != 1 && ImageHeader.Typ != 2 )
2457 nError = errUnknownFormat;
2458 break;
2459 }
2460 case otChart :
2461 {
2462 Sc10ChartHeader ChartHeader;
2463 Sc10ChartSheetData ChartSheetData;
2464 Sc10ChartTypeData* pTypeData = new (::std::nothrow) Sc10ChartTypeData;
2465 if (!pTypeData)
2466 nError = errOutOfMemory;
2467 else
2468 {
2469 lcl_ReadChartHeader(rStream, ChartHeader);
2470
2471 //! altes Metafile verwenden ??
2472 rStream.SeekRel(ChartHeader.Size);
2473
2474 lcl_ReadChartSheetData(rStream, ChartSheetData);
2475
2476 lcl_ReadChartTypeData(rStream, *pTypeData);
2477
2478 Rectangle aRect( Point(nStartX,nStartY), Size(nSizeX,nSizeY) );
2479 Sc10InsertObject::InsertChart( pDoc, static_cast<SCTAB>(GraphHeader.CarretZ), aRect,
2480 static_cast<SCTAB>(GraphHeader.CarretZ),
2481 ChartSheetData.DataX1, ChartSheetData.DataY1,
2482 ChartSheetData.DataX2, ChartSheetData.DataY2 );
2483
2484 delete pTypeData;
2485 }
2486 }
2487 break;
2488 default :
2489 nError = errUnknownFormat;
2490 break;
2491 }
2492 nError = rStream.GetError();
2493 }
2494 }
2495 }
2496 else
2497 {
2498 DBG_ERROR( "ObjectID" );
2499 nError = errUnknownID;
2500 }
2501 }
2502
2503
2504
2505
2506 //-----------------------------------------------------------------------------------------------
2507
ScImportStarCalc10(SvStream & rStream,ScDocument * pDocument)2508 FltError ScFormatFilterPluginImpl::ScImportStarCalc10( SvStream& rStream, ScDocument* pDocument )
2509 {
2510 rStream.Seek( 0UL );
2511 Sc10Import aImport( rStream, pDocument );
2512 return ( FltError ) aImport.Import();
2513 }
2514
2515
2516
2517