fixed TABs positioning inside <pre> so that tags don't throw it apart
[wxWidgets.git] / src / html / m_pre.cpp
1 /////////////////////////////////////////////////////////////////////////////
2 // Name: src/html/m_pre.cpp
3 // Purpose: wxHtml module for <PRE> ... </PRE> tag (code citation)
4 // Author: Vaclav Slavik
5 // RCS-ID: $Id$
6 // Copyright: (c) 1999 Vaclav Slavik
7 // Licence: wxWindows licence
8 /////////////////////////////////////////////////////////////////////////////
9
10 #include "wx/wxprec.h"
11
12 #ifdef __BORLANDC__
13 #pragma hdrstop
14 #endif
15
16 #if wxUSE_HTML && wxUSE_STREAMS
17
18 #ifndef WX_PRECOMP
19 #endif
20
21 #include "wx/html/forcelnk.h"
22 #include "wx/html/m_templ.h"
23
24 #include "wx/html/htmlcell.h"
25 #include "wx/tokenzr.h"
26 #include "wx/encconv.h"
27
28 FORCE_LINK_ME(m_pre)
29
30 // replaces '\t', ' ' and '\n' with HTML markup:
31 static wxString LINKAGEMODE HtmlizeWhitespaces(const wxString& str)
32 {
33 wxString out;
34 size_t len = str.Len();
35 size_t linepos = 0;
36 for (size_t i = 0; i < len; i++)
37 {
38 switch ( str[i].GetValue() )
39 {
40 case wxT('<'):
41 while (i < len && str[i] != wxT('>'))
42 {
43 out << str[i++];
44 }
45 out << wxT('>');
46 break;
47 case wxT(' '):
48 out << wxT("&nbsp;");
49 linepos++;
50 break;
51 case wxT('\n'):
52 out << wxT("<br>");
53 linepos = 0;
54 break;
55 case wxT('\t'):
56 {
57 for (size_t j = 8 - linepos % 8; j > 0; j--)
58 out << wxT("&nbsp;");
59 linepos += 8 - linepos % 8;
60 }
61 break;
62 default:
63 out << str[i];
64 linepos++;
65 break;
66 }
67 }
68 return out;
69 }
70
71
72 //-----------------------------------------------------------------------------
73 // The list handler:
74 //-----------------------------------------------------------------------------
75
76
77 TAG_HANDLER_BEGIN(PRE, "PRE")
78 TAG_HANDLER_CONSTR(PRE) { }
79
80 TAG_HANDLER_PROC(tag)
81 {
82 wxHtmlContainerCell *c;
83
84 int fixed = m_WParser->GetFontFixed(),
85 italic = m_WParser->GetFontItalic(),
86 underlined = m_WParser->GetFontUnderlined(),
87 bold = m_WParser->GetFontBold(),
88 fsize = m_WParser->GetFontSize();
89
90 c = m_WParser->GetContainer();
91 m_WParser->SetFontUnderlined(false);
92 m_WParser->SetFontBold(false);
93 m_WParser->SetFontItalic(false);
94 m_WParser->SetFontFixed(true);
95 m_WParser->SetFontSize(3);
96 c->InsertCell(new wxHtmlFontCell(m_WParser->CreateCurrentFont()));
97
98 m_WParser->CloseContainer();
99 c = m_WParser->OpenContainer();
100 c->SetWidthFloat(tag);
101 c = m_WParser->OpenContainer();
102 c->SetAlignHor(wxHTML_ALIGN_LEFT);
103 c->SetIndent(m_WParser->GetCharHeight(), wxHTML_INDENT_TOP);
104
105 wxString srcMid = m_WParser->GetInnerSource(tag);
106 ParseInnerSource(HtmlizeWhitespaces(srcMid));
107
108 m_WParser->CloseContainer();
109 m_WParser->CloseContainer();
110 c = m_WParser->OpenContainer();
111
112 m_WParser->SetFontUnderlined(underlined);
113 m_WParser->SetFontBold(bold);
114 m_WParser->SetFontItalic(italic);
115 m_WParser->SetFontFixed(fixed);
116 m_WParser->SetFontSize(fsize);
117 c->InsertCell(new wxHtmlFontCell(m_WParser->CreateCurrentFont()));
118
119 return true;
120 }
121
122 TAG_HANDLER_END(PRE)
123
124
125
126
127
128 TAGS_MODULE_BEGIN(Pre)
129
130 TAGS_MODULE_ADD(PRE)
131
132 TAGS_MODULE_END(Pre)
133
134 #endif