?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
Update ooo320-m1
[ooovba.git] / sw / source / filter / html / htmlfldw.cxx
blob4027ddc7be1c63eb14bdfc0aa0ba90ef0ed50152
1 /*************************************************************************
2 *
3 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
4 *
5 * Copyright 2008 by Sun Microsystems, Inc.
6 *
7 * OpenOffice.org - a multi-platform office productivity suite
8 *
9 * $RCSfile: htmlfldw.cxx,v $
10 * $Revision: 1.14 $
11 *
12 * This file is part of OpenOffice.org.
13 *
14 * OpenOffice.org is free software: you can redistribute it and/or modify
15 * it under the terms of the GNU Lesser General Public License version 3
16 * only, as published by the Free Software Foundation.
17 *
18 * OpenOffice.org is distributed in the hope that it will be useful,
19 * but WITHOUT ANY WARRANTY; without even the implied warranty of
20 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
21 * GNU Lesser General Public License version 3 for more details
22 * (a copy is included in the LICENSE file that accompanied this code).
23 *
24 * You should have received a copy of the GNU Lesser General Public License
25 * version 3 along with OpenOffice.org. If not, see
26 * <http://www.openoffice.org/license.html>
27 * for a copy of the LGPLv3 License.
28 *
29 ************************************************************************/
30
31 // MARKER(update_precomp.py): autogen include statement, do not remove
32 #include "precompiled_sw.hxx"
33
34
35 #include <com/sun/star/i18n/ScriptType.hpp>
36 #include <tools/string.hxx>
37 #include <svtools/htmlkywd.hxx>
38 #include <svtools/htmlout.hxx>
39 #include <svtools/htmltokn.h>
40 #include <fmtfld.hxx>
41 #include <doc.hxx>
42 #include <breakit.hxx>
43 #include <ndtxt.hxx>
44 #include <txtfld.hxx>
45 #include "fldbas.hxx"
46 #include "docufld.hxx"
47 #include "flddat.hxx"
48 #include "htmlfld.hxx"
49 #include "wrthtml.hxx"
50
51 using namespace nsSwDocInfoSubType;
52
53 const sal_Char *SwHTMLWriter::GetNumFormat( USHORT nFmt )
54 {
55 const sal_Char *pFmtStr = 0;
56
57 switch( (SvxExtNumType)nFmt )
58 {
59 case SVX_NUM_CHARS_UPPER_LETTER: pFmtStr = OOO_STRING_SW_HTML_FF_uletter; break;
60 case SVX_NUM_CHARS_LOWER_LETTER: pFmtStr = OOO_STRING_SW_HTML_FF_lletter; break;
61 case SVX_NUM_ROMAN_UPPER: pFmtStr = OOO_STRING_SW_HTML_FF_uroman; break;
62 case SVX_NUM_ROMAN_LOWER: pFmtStr = OOO_STRING_SW_HTML_FF_lroman; break;
63 case SVX_NUM_ARABIC: pFmtStr = OOO_STRING_SW_HTML_FF_arabic; break;
64 case SVX_NUM_NUMBER_NONE: pFmtStr = OOO_STRING_SW_HTML_FF_none; break;
65 case SVX_NUM_CHAR_SPECIAL: pFmtStr = OOO_STRING_SW_HTML_FF_char; break;
66 case SVX_NUM_PAGEDESC: pFmtStr = OOO_STRING_SW_HTML_FF_page; break;
67 case SVX_NUM_CHARS_UPPER_LETTER_N: pFmtStr = OOO_STRING_SW_HTML_FF_ulettern; break;
68 case SVX_NUM_CHARS_LOWER_LETTER_N: pFmtStr = OOO_STRING_SW_HTML_FF_llettern; break;
69 default:
70 ;
71 }
72
73 return pFmtStr;
74 }
75
76 extern BOOL lcl_css1atr_equalFontItems( const SfxPoolItem& r1, const SfxPoolItem& r2 );
77 static Writer& OutHTML_SwField( Writer& rWrt, const SwField* pFld,
78 const SwTxtNode& rTxtNd, xub_StrLen nFldPos )
79 {
80 SwHTMLWriter & rHTMLWrt = (SwHTMLWriter&)rWrt;
81
82 const SwFieldType* pFldTyp = pFld->GetTyp();
83 USHORT nField = pFldTyp->Which();
84 ULONG nFmt = pFld->GetFormat();
85
86 const sal_Char *pTypeStr=0, // TYPE
87 *pSubStr=0, // SUBTYPE
88 *pFmtStr=0; // FORMAT (SW)
89 String aValue; // VALUE (SW)
90 BOOL bNumFmt=FALSE; // SDNUM (Number-Formatter-Format)
91 BOOL bNumValue=FALSE; // SDVAL (Number-Formatter-Value)
92 double dNumValue = 0.0; // SDVAL (Number-Formatter-Value)
93 BOOL bFixed=FALSE; // SDFIXED
94 String aName; // NAME (CUSTOM)
95
96 switch( nField )
97 {
98 case RES_EXTUSERFLD:
99 pTypeStr = OOO_STRING_SW_HTML_FT_sender;
100 switch( (SwExtUserSubType)pFld->GetSubType() )
101 {
102 case EU_COMPANY: pSubStr = OOO_STRING_SW_HTML_FS_company; break;
103 case EU_FIRSTNAME: pSubStr = OOO_STRING_SW_HTML_FS_firstname; break;
104 case EU_NAME: pSubStr = OOO_STRING_SW_HTML_FS_name; break;
105 case EU_SHORTCUT: pSubStr = OOO_STRING_SW_HTML_FS_shortcut; break;
106 case EU_STREET: pSubStr = OOO_STRING_SW_HTML_FS_street; break;
107 case EU_COUNTRY: pSubStr = OOO_STRING_SW_HTML_FS_country; break;
108 case EU_ZIP: pSubStr = OOO_STRING_SW_HTML_FS_zip; break;
109 case EU_CITY: pSubStr = OOO_STRING_SW_HTML_FS_city; break;
110 case EU_TITLE: pSubStr = OOO_STRING_SW_HTML_FS_title; break;
111 case EU_POSITION: pSubStr = OOO_STRING_SW_HTML_FS_position; break;
112 case EU_PHONE_PRIVATE: pSubStr = OOO_STRING_SW_HTML_FS_pphone; break;
113 case EU_PHONE_COMPANY: pSubStr = OOO_STRING_SW_HTML_FS_cphone; break;
114 case EU_FAX: pSubStr = OOO_STRING_SW_HTML_FS_fax; break;
115 case EU_EMAIL: pSubStr = OOO_STRING_SW_HTML_FS_email; break;
116 case EU_STATE: pSubStr = OOO_STRING_SW_HTML_FS_state; break;
117 default:
118 ;
119 }
120 ASSERT( pSubStr, "ubekannter Subtyp fuer SwExtUserField" );
121 bFixed = ((const SwExtUserField*)pFld)->IsFixed();
122 break;
123
124 case RES_AUTHORFLD:
125 pTypeStr = OOO_STRING_SW_HTML_FT_author;
126 switch( (SwAuthorFormat)nFmt & 0xff)
127 {
128 case AF_NAME: pFmtStr = OOO_STRING_SW_HTML_FF_name; break;
129 case AF_SHORTCUT: pFmtStr = OOO_STRING_SW_HTML_FF_shortcut; break;
130 }
131 ASSERT( pFmtStr, "ubekanntes Format fuer SwAuthorField" );
132 bFixed = ((const SwAuthorField*)pFld)->IsFixed();
133 break;
134
135 case RES_DATETIMEFLD:
136 pTypeStr = OOO_STRING_SW_HTML_FT_datetime;
137 bNumFmt = TRUE;
138 if( ((SwDateTimeField*)pFld)->IsFixed() )
139 {
140 bNumValue = TRUE;
141 dNumValue = ((SwDateTimeField*)pFld)->GetValue();
142 }
143 break;
144
145 case RES_PAGENUMBERFLD:
146 {
147 pTypeStr = OOO_STRING_SW_HTML_FT_page;
148 SwPageNumSubType eSubType = (SwPageNumSubType)pFld->GetSubType();
149 switch( eSubType )
150 {
151 case PG_RANDOM: pSubStr = OOO_STRING_SW_HTML_FS_random; break;
152 case PG_NEXT: pSubStr = OOO_STRING_SW_HTML_FS_next; break;
153 case PG_PREV: pSubStr = OOO_STRING_SW_HTML_FS_prev; break;
154 }
155 ASSERT( pSubStr, "ubekannter Subtyp fuer SwPageNumberField" );
156 pFmtStr = SwHTMLWriter::GetNumFormat( static_cast< sal_uInt16 >(nFmt) );
157
158 if( (SvxExtNumType)nFmt==SVX_NUM_CHAR_SPECIAL )
159 {
160 aValue = ((const SwPageNumberField *)pFld)->GetUserString();
161 }
162 else
163 {
164 const String& rValue = pFld->GetPar2();
165 short nValue = (short)rValue.ToInt32();
166 if( (eSubType == PG_NEXT && nValue!=1) ||
167 (eSubType == PG_PREV && nValue!=-1) ||
168 (eSubType == PG_RANDOM && nValue!=0) )
169 {
170 aValue = rValue;
171 }
172 }
173 }
174 break;
175 case RES_DOCINFOFLD:
176 {
177 USHORT nSubType = pFld->GetSubType();
178 pTypeStr = OOO_STRING_SW_HTML_FT_docinfo;
179 USHORT nExtSubType = nSubType & 0x0f00;
180 nSubType &= 0x00ff;
181
182 switch( nSubType )
183 {
184 case DI_TITEL: pSubStr = OOO_STRING_SW_HTML_FS_title; break;
185 case DI_THEMA: pSubStr = OOO_STRING_SW_HTML_FS_theme; break;
186 case DI_KEYS: pSubStr = OOO_STRING_SW_HTML_FS_keys; break;
187 case DI_COMMENT: pSubStr = OOO_STRING_SW_HTML_FS_comment; break;
188 case DI_CREATE: pSubStr = OOO_STRING_SW_HTML_FS_create; break;
189 case DI_CHANGE: pSubStr = OOO_STRING_SW_HTML_FS_change; break;
190 case DI_CUSTOM: pSubStr = OOO_STRING_SW_HTML_FS_custom; break;
191 default: pTypeStr = 0; break;
192 }
193
194 if( DI_CUSTOM == nSubType ) {
195 aName = static_cast<const SwDocInfoField*>(pFld)->GetName();
196 }
197
198 if( DI_CREATE == nSubType || DI_CHANGE == nSubType )
199 {
200 switch( nExtSubType )
201 {
202 case DI_SUB_AUTHOR:
203 pFmtStr = OOO_STRING_SW_HTML_FF_author;
204 break;
205 case DI_SUB_TIME:
206 pFmtStr = OOO_STRING_SW_HTML_FF_time;
207 bNumFmt = TRUE;
208 break;
209 case DI_SUB_DATE:
210 pFmtStr = OOO_STRING_SW_HTML_FF_date;
211 bNumFmt = TRUE;
212 break;
213 }
214 }
215 bFixed = ((const SwDocInfoField*)pFld)->IsFixed();
216 if( bNumFmt )
217 {
218 if( bFixed )
219 {
220 // Fuer ein fixes Feld och den Num-Value ausgeben.
221 // Fixe Felder ohne Zahlenformate sollte es
222 // eigentlich nicht geben. ASSERT ist unten.
223 dNumValue = ((const SwDocInfoField*)pFld)->GetValue();
224 bNumValue = TRUE;
225 }
226 else if( !nFmt )
227 {
228 // Nicht fixe Felder muessen kein Zahlenformat haben,
229 // wenn sie aus 4.0-Dokumenten stammen.
230 bNumFmt = FALSE;
231 }
232 }
233 }
234 break;
235
236 case RES_DOCSTATFLD:
237 {
238 pTypeStr = OOO_STRING_SW_HTML_FT_docstat;
239 USHORT nSubType = pFld->GetSubType();
240 switch( nSubType )
241 {
242 case DS_PAGE: pSubStr = OOO_STRING_SW_HTML_FS_page; break;
243 case DS_PARA: pSubStr = OOO_STRING_SW_HTML_FS_para; break;
244 case DS_WORD: pSubStr = OOO_STRING_SW_HTML_FS_word; break;
245 case DS_CHAR: pSubStr = OOO_STRING_SW_HTML_FS_char; break;
246 case DS_TBL: pSubStr = OOO_STRING_SW_HTML_FS_tbl; break;
247 case DS_GRF: pSubStr = OOO_STRING_SW_HTML_FS_grf; break;
248 case DS_OLE: pSubStr = OOO_STRING_SW_HTML_FS_ole; break;
249 default: pTypeStr = 0; break;
250 }
251 pFmtStr = SwHTMLWriter::GetNumFormat( static_cast< sal_uInt16 >(nFmt) );
252 }
253 break;
254
255 case RES_FILENAMEFLD:
256 pTypeStr = OOO_STRING_SW_HTML_FT_filename;
257 switch( (SwFileNameFormat)(nFmt & ~FF_FIXED) )
258 {
259 case FF_NAME: pFmtStr = OOO_STRING_SW_HTML_FF_name; break;
260 case FF_PATHNAME: pFmtStr = OOO_STRING_SW_HTML_FF_pathname; break;
261 case FF_PATH: pFmtStr = OOO_STRING_SW_HTML_FF_path; break;
262 case FF_NAME_NOEXT: pFmtStr = OOO_STRING_SW_HTML_FF_name_noext; break;
263 default:
264 ;
265 }
266 bFixed = ((const SwFileNameField*)pFld)->IsFixed();
267 ASSERT( pFmtStr, "unbekanntes Format fuer SwFileNameField" );
268 break;
269 }
270
271 // <SDFIELD>-Tag ausgeben
272 if( pTypeStr )
273 {
274 ByteString sOut( '<' );
275 ((((sOut += OOO_STRING_SVTOOLS_HTML_sdfield) += ' ') += OOO_STRING_SVTOOLS_HTML_O_type) += '=')
276 += pTypeStr;
277 if( pSubStr )
278 (((sOut += ' ') += OOO_STRING_SVTOOLS_HTML_O_subtype) += '=') += pSubStr;
279 if( pFmtStr )
280 (((sOut += ' ') += OOO_STRING_SVTOOLS_HTML_O_format) += '=') += pFmtStr;
281 if( aName.Len() )
282 {
283 (((sOut += ' ') += OOO_STRING_SVTOOLS_HTML_O_name) += "=\"");
284 rWrt.Strm() << sOut.GetBuffer();
285 HTMLOutFuncs::Out_String( rWrt.Strm(), aName, rHTMLWrt.eDestEnc, &rHTMLWrt.aNonConvertableCharacters );
286 sOut = '\"';
287 }
288 if( aValue.Len() )
289 {
290 ((sOut += ' ') += OOO_STRING_SVTOOLS_HTML_O_value) += "=\"";
291 rWrt.Strm() << sOut.GetBuffer();
292 HTMLOutFuncs::Out_String( rWrt.Strm(), aValue, rHTMLWrt.eDestEnc, &rHTMLWrt.aNonConvertableCharacters );
293 sOut = '\"';
294 }
295 if( bNumFmt )
296 {
297 ASSERT( nFmt, "Zahlenformat ist 0" );
298 sOut = HTMLOutFuncs::CreateTableDataOptionsValNum( sOut,
299 bNumValue, dNumValue, nFmt,
300 *rHTMLWrt.pDoc->GetNumberFormatter(),
301 rHTMLWrt.eDestEnc, &rHTMLWrt.aNonConvertableCharacters );
302
303 }
304 if( bFixed )
305 (sOut += ' ') += OOO_STRING_SVTOOLS_HTML_O_sdfixed;
306 sOut += '>';
307 rWrt.Strm() << sOut.GetBuffer();
308 }
309
310 // Inhalt des Feldes ausgeben
311 String sExpand( pFld->Expand() );
312 sal_Bool bNeedsCJKProcessing = sal_False;
313 if( sExpand.Len() )
314 {
315 sal_uInt16 nScriptType = pBreakIt->GetBreakIter()->getScriptType( sExpand, 0 );
316 xub_StrLen nPos = (xub_StrLen)pBreakIt->GetBreakIter()->endOfScript( sExpand, 0,
317 nScriptType );
318
319 sal_uInt16 nScript =
320 SwHTMLWriter::GetCSS1ScriptForScriptType( nScriptType );
321 if( nPos < sExpand.Len() || nScript != rHTMLWrt.nCSS1Script )
322 {
323 bNeedsCJKProcessing = sal_True;
324 }
325 }
326
327 if( bNeedsCJKProcessing )
328 {
329 SfxItemSet aScriptItemSet( rWrt.pDoc->GetAttrPool(),
330 RES_CHRATR_FONT, RES_CHRATR_FONTSIZE,
331 RES_CHRATR_POSTURE, RES_CHRATR_POSTURE,
332 RES_CHRATR_WEIGHT, RES_CHRATR_WEIGHT,
333 RES_CHRATR_CJK_FONT, RES_CHRATR_CTL_WEIGHT,
334 0 );
335 rTxtNd.GetAttr( aScriptItemSet, nFldPos, nFldPos+1 );
336
337 sal_uInt16 aWesternWhichIds[4] =
338 { RES_CHRATR_FONT, RES_CHRATR_FONTSIZE,
339 RES_CHRATR_POSTURE, RES_CHRATR_WEIGHT };
340 sal_uInt16 aCJKWhichIds[4] =
341 { RES_CHRATR_CJK_FONT, RES_CHRATR_CJK_FONTSIZE,
342 RES_CHRATR_CJK_POSTURE, RES_CHRATR_CJK_WEIGHT };
343 sal_uInt16 aCTLWhichIds[4] =
344 { RES_CHRATR_CTL_FONT, RES_CHRATR_CTL_FONTSIZE,
345 RES_CHRATR_CTL_POSTURE, RES_CHRATR_CTL_WEIGHT };
346
347 sal_uInt16 *pRefWhichIds = 0;
348 switch( rHTMLWrt.nCSS1Script )
349 {
350 case CSS1_OUTMODE_WESTERN:
351 pRefWhichIds = aWesternWhichIds;
352 break;
353 case CSS1_OUTMODE_CJK:
354 pRefWhichIds = aCJKWhichIds;
355 break;
356 case CSS1_OUTMODE_CTL:
357 pRefWhichIds = aCTLWhichIds;
358 break;
359 }
360
361 xub_StrLen nPos = 0;
362 do
363 {
364 sal_uInt16 nScriptType = pBreakIt->GetBreakIter()->getScriptType( sExpand, nPos );
365 sal_uInt16 nScript =
366 SwHTMLWriter::GetCSS1ScriptForScriptType( nScriptType );
367 xub_StrLen nEndPos = (xub_StrLen)pBreakIt->GetBreakIter()->endOfScript(
368 sExpand, nPos, nScriptType );
369 if( nScript != CSS1_OUTMODE_ANY_SCRIPT &&
370 /* #108791# */ nScript != rHTMLWrt.nCSS1Script )
371 {
372 sal_uInt16 *pWhichIds = 0;
373 switch( nScript )
374 {
375 case CSS1_OUTMODE_WESTERN: pWhichIds = aWesternWhichIds; break;
376 case CSS1_OUTMODE_CJK: pWhichIds = aCJKWhichIds; break;
377 case CSS1_OUTMODE_CTL: pWhichIds = aCTLWhichIds; break;
378 }
379
380 rHTMLWrt.bTagOn = TRUE;
381 const SfxPoolItem *aItems[5];
382 sal_uInt16 nItems = 0;
383 for( sal_uInt16 i=0; i<4; i++ )
384 {
385 const SfxPoolItem *pRefItem =
386 aScriptItemSet.GetItem( pRefWhichIds[i] );
387 const SfxPoolItem *pItem =
388 aScriptItemSet.GetItem( pWhichIds[i] );
389 if( pRefItem && pItem &&
390 !(0==i ? lcl_css1atr_equalFontItems( *pRefItem, *pItem )
391 : *pRefItem == *pItem) )
392 {
393 Out( aHTMLAttrFnTab, *pItem, rHTMLWrt );
394 aItems[nItems++] = pItem;
395 }
396 }
397
398 HTMLOutFuncs::Out_String( rWrt.Strm(), sExpand.Copy( nPos, nEndPos ),
399 rHTMLWrt.eDestEnc, &rHTMLWrt.aNonConvertableCharacters );
400
401 rHTMLWrt.bTagOn = FALSE;
402 while( nItems )
403 Out( aHTMLAttrFnTab, *aItems[--nItems], rHTMLWrt );
404
405 }
406 else
407 {
408 HTMLOutFuncs::Out_String( rWrt.Strm(), sExpand.Copy( nPos, nEndPos ),
409 rHTMLWrt.eDestEnc, &rHTMLWrt.aNonConvertableCharacters );
410 }
411 nPos = nEndPos;
412 }
413 while( nPos < sExpand.Len() );
414 }
415 else
416 {
417 HTMLOutFuncs::Out_String( rWrt.Strm(), sExpand,
418 rHTMLWrt.eDestEnc, &rHTMLWrt.aNonConvertableCharacters );
419 }
420
421 // Off-Tag ausgeben
422 if( pTypeStr )
423 HTMLOutFuncs::Out_AsciiTag( rWrt.Strm(), OOO_STRING_SVTOOLS_HTML_sdfield, FALSE );
424
425 return rWrt;
426 }
427
428
429 Writer& OutHTML_SwFmtFld( Writer& rWrt, const SfxPoolItem& rHt )
430 {
431 SwFmtFld & rFld = (SwFmtFld&)rHt;
432 const SwField* pFld = rFld.GetFld();
433 const SwFieldType* pFldTyp = pFld->GetTyp();
434
435 if( RES_SETEXPFLD == pFldTyp->Which() &&
436 (nsSwGetSetExpType::GSE_STRING & pFld->GetSubType()) )
437 {
438 int bOn = FALSE;
439 if( pFldTyp->GetName().EqualsAscii("HTML_ON" ) )
440 bOn = TRUE;
441 else if( !pFldTyp->GetName().EqualsAscii( "HTML_OFF" ) )
442 return rWrt;
443
444 String rTxt( pFld->GetPar2() );
445 rTxt.EraseLeadingChars().EraseTrailingChars();
446 rWrt.Strm() << '<';
447 if( !bOn )
448 rWrt.Strm() << '/';
449 // TODO: HTML-Tags are written without entitities, that for, characters
450 // not contained in the destination encoding are lost!
451 ByteString sTmp( rTxt, ((SwHTMLWriter&)rWrt).eDestEnc );
452 rWrt.Strm() << sTmp.GetBuffer() << '>';
453 }
454 else if( RES_POSTITFLD == pFldTyp->Which() )
455 {
456 // Kommentare werden im ANSI-Zeichensetz, aber mit System-Zeilen-
457 // Umbruechen gesschrieben.
458 const String& rComment = pFld->GetPar2();
459 BOOL bWritten = FALSE;
460
461 if( (rComment.Len() >= 6 && '<' == rComment.GetChar(0) &&
462 '>' == rComment.GetChar(rComment.Len()-1) &&
463 rComment.Copy( 1, 4 ).EqualsIgnoreCaseAscii(OOO_STRING_SVTOOLS_HTML_meta)) ||
464 (rComment.Len() >= 7 &&
465 rComment.Copy( 0, 4 ).EqualsAscii( "<!--" ) &&
466 rComment.Copy( rComment.Len()-3, 3 ).EqualsAscii( "-->" )) )
467 {
468 // META-Tags direkt ausgeben
469 String sComment( rComment );
470 sComment.ConvertLineEnd( GetSystemLineEnd() );
471 // TODO: HTML-Tags are written without entitities, that for,
472 // characters not contained in the destination encoding are lost!
473 ByteString sTmp( sComment, ((SwHTMLWriter&)rWrt).eDestEnc );
474 rWrt.Strm() << sTmp.GetBuffer();
475 bWritten = TRUE;
476 }
477 else if( rComment.Len() >= 7 &&
478 '>' == rComment.GetChar(rComment.Len()-1) &&
479 rComment.Copy(0,5).EqualsIgnoreCaseAscii("HTML:") )
480 {
481 String sComment( rComment.Copy(5) );
482 sComment.EraseLeadingChars();
483 if( '<' == sComment.GetChar(0) )
484 {
485 sComment.ConvertLineEnd( GetSystemLineEnd() );
486 // TODO: HTML-Tags are written without entitities, that for,
487 // characters not contained in the destination encoding are
488 // lost!
489 ByteString sTmp( sComment, ((SwHTMLWriter&)rWrt).eDestEnc );
490 rWrt.Strm() << sTmp.GetBuffer();
491 bWritten = TRUE;
492 }
493
494 }
495
496 if( !bWritten )
497 {
498 ByteString sOut( '<' );
499
500 String sComment( rComment );
501 sComment.ConvertLineEnd( GetSystemLineEnd() );
502 // TODO: ???
503 (((sOut += OOO_STRING_SVTOOLS_HTML_comment) += ' ')
504 += ByteString( sComment, ((SwHTMLWriter&)rWrt).eDestEnc ))
505 += " -->";
506 rWrt.Strm() << sOut.GetBuffer();
507 }
508 }
509 else if( RES_SCRIPTFLD == pFldTyp->Which() )
510 {
511 SwHTMLWriter& rHTMLWrt = (SwHTMLWriter&)rWrt;
512 if( rHTMLWrt.bLFPossible )
513 rHTMLWrt.OutNewLine( TRUE );
514
515 BOOL bURL = ((const SwScriptField *)pFld)->IsCodeURL();
516 const String& rType = pFld->GetPar1();
517 String aContents, aURL;
518 if(bURL)
519 aURL = pFld->GetPar2();
520 else
521 aContents = pFld->GetPar2();
522
523 // sonst ist es der Script-Inhalt selbst. Da nur noh JavaScript
524 // in Feldern landet, muss es sich um JavaSrript handeln ...:)
525 HTMLOutFuncs::OutScript( rWrt.Strm(), rWrt.GetBaseURL(), aContents, rType, JAVASCRIPT,
526 aURL, 0, 0, rHTMLWrt.eDestEnc, &rHTMLWrt.aNonConvertableCharacters );
527
528 if( rHTMLWrt.bLFPossible )
529 rHTMLWrt.OutNewLine( TRUE );
530 }
531 else
532 {
533 const SwTxtFld *pTxtFld = rFld.GetTxtFld();
534 ASSERT( pTxtFld, "Where is the txt fld?" );
535 if( pTxtFld )
536 OutHTML_SwField( rWrt, pFld, pTxtFld->GetTxtNode(),
537 *pTxtFld->GetStart() );
538 }
539 return rWrt;
540 }
541
542
vba interoperability for OOo