]> git.saurik.com Git - wxWidgets.git/blame_incremental - src/html/htmltag.cpp
Tries to fix wxListBox focus problems.
[wxWidgets.git] / src / html / htmltag.cpp
... / ...
CommitLineData
1/////////////////////////////////////////////////////////////////////////////
2// Name: htmltag.cpp
3// Purpose: wxHtmlTag class (represents single tag)
4// Author: Vaclav Slavik
5// RCS-ID: $Id$
6// Copyright: (c) 1999 Vaclav Slavik
7// Licence: wxWindows Licence
8/////////////////////////////////////////////////////////////////////////////
9
10
11#ifdef __GNUG__
12#pragma implementation
13#endif
14
15#include "wx/wxprec.h"
16
17#include "wx/defs.h"
18#if wxUSE_HTML
19
20#ifdef __BORDLANDC__
21#pragma hdrstop
22#endif
23
24#ifndef WXPRECOMP
25#endif
26
27#include "wx/html/htmltag.h"
28#include "wx/html/htmlpars.h"
29#include "wx/colour.h"
30#include <stdio.h> // for vsscanf
31#include <stdarg.h>
32
33
34//-----------------------------------------------------------------------------
35// wxHtmlTagsCache
36//-----------------------------------------------------------------------------
37
38struct wxHtmlCacheItem
39{
40 // this is "pos" value passed to wxHtmlTag's constructor.
41 // it is position of '<' character of the tag
42 int Key;
43
44 // end positions for the tag:
45 // end1 is '<' of ending tag,
46 // end2 is '>' or both are
47 // -1 if there is no ending tag for this one...
48 // or -2 if this is ending tag </...>
49 int End1, End2;
50
51 // name of this tag
52 wxChar *Name;
53};
54
55
56IMPLEMENT_CLASS(wxHtmlTagsCache,wxObject)
57
58#define CACHE_INCREMENT 64
59
60wxHtmlTagsCache::wxHtmlTagsCache(const wxString& source)
61{
62 const wxChar *src = source.c_str();
63 int i, tg, pos, stpos;
64 int lng = source.Length();
65 wxChar dummy[256];
66
67 m_Cache = NULL;
68 m_CacheSize = 0;
69 m_CachePos = 0;
70
71 pos = 0;
72 while (pos < lng)
73 {
74 if (src[pos] == wxT('<')) // tag found:
75 {
76 if (m_CacheSize % CACHE_INCREMENT == 0)
77 m_Cache = (wxHtmlCacheItem*) realloc(m_Cache, (m_CacheSize + CACHE_INCREMENT) * sizeof(wxHtmlCacheItem));
78 tg = m_CacheSize++;
79 m_Cache[tg].Key = stpos = pos++;
80 dummy[0] = 0; i = 0;
81 while (pos < lng &&
82 src[pos] != wxT('>') &&
83 src[pos] != wxT(' ') && src[pos] != wxT('\r') &&
84 src[pos] != wxT('\n') && src[pos] != wxT('\t'))
85 {
86 dummy[i] = src[pos++];
87 if ((dummy[i] >= wxT('a')) && (dummy[i] <= wxT('z'))) dummy[i] -= (wxT('a') - wxT('A'));
88 i++;
89 }
90 dummy[i] = 0;
91 m_Cache[tg].Name = new wxChar[i+1];
92 memcpy(m_Cache[tg].Name, dummy, (i+1)*sizeof(wxChar));
93
94 while (pos < lng && src[pos] != wxT('>')) pos++;
95
96 if (src[stpos+1] == wxT('/')) // ending tag:
97 {
98 m_Cache[tg].End1 = m_Cache[tg].End2 = -2;
99 // find matching begin tag:
100 for (i = tg; i >= 0; i--)
101 if ((m_Cache[i].End1 == -1) && (wxStrcmp(m_Cache[i].Name, dummy+1) == 0))
102 {
103 m_Cache[i].End1 = stpos;
104 m_Cache[i].End2 = pos + 1;
105 break;
106 }
107 }
108 else
109 {
110 m_Cache[tg].End1 = m_Cache[tg].End2 = -1;
111 }
112 }
113
114 pos++;
115 }
116
117 // ok, we're done, now we'll free .Name members of cache - we don't need it anymore:
118 for (i = 0; i < m_CacheSize; i++)
119 {
120 delete[] m_Cache[i].Name;
121 m_Cache[i].Name = NULL;
122 }
123}
124
125void wxHtmlTagsCache::QueryTag(int at, int* end1, int* end2)
126{
127 if (m_Cache == NULL) return;
128 if (m_Cache[m_CachePos].Key != at)
129 {
130 int delta = (at < m_Cache[m_CachePos].Key) ? -1 : 1;
131 do
132 {
133 m_CachePos += delta;
134 }
135 while (m_Cache[m_CachePos].Key != at);
136 }
137 *end1 = m_Cache[m_CachePos].End1;
138 *end2 = m_Cache[m_CachePos].End2;
139}
140
141
142
143
144//-----------------------------------------------------------------------------
145// wxHtmlTag
146//-----------------------------------------------------------------------------
147
148IMPLEMENT_CLASS(wxHtmlTag,wxObject)
149
150wxHtmlTag::wxHtmlTag(wxHtmlTag *parent,
151 const wxString& source, int pos, int end_pos,
152 wxHtmlTagsCache *cache,
153 wxHtmlEntitiesParser *entParser) : wxObject()
154{
155 /* Setup DOM relations */
156
157 m_Next = NULL;
158 m_FirstChild = m_LastChild = NULL;
159 m_Parent = parent;
160 if (parent)
161 {
162 m_Prev = m_Parent->m_LastChild;
163 if (m_Prev == NULL)
164 m_Parent->m_FirstChild = this;
165 else
166 m_Prev->m_Next = this;
167 m_Parent->m_LastChild = this;
168 }
169 else
170 m_Prev = NULL;
171
172 /* Find parameters and their values: */
173
174 int i;
175 wxChar c;
176
177 // fill-in name, params and begin pos:
178 i = pos+1;
179
180 // find tag's name and convert it to uppercase:
181 while ((i < end_pos) &&
182 ((c = source[i++]) != wxT(' ') && c != wxT('\r') &&
183 c != wxT('\n') && c != wxT('\t') &&
184 c != wxT('>')))
185 {
186 if ((c >= wxT('a')) && (c <= wxT('z')))
187 c -= (wxT('a') - wxT('A'));
188 m_Name << c;
189 }
190
191 // if the tag has parameters, read them and "normalize" them,
192 // i.e. convert to uppercase, replace whitespaces by spaces and
193 // remove whitespaces around '=':
194 if (source[i-1] != wxT('>'))
195 {
196 #define IS_WHITE(c) (c == wxT(' ') || c == wxT('\r') || \
197 c == wxT('\n') || c == wxT('\t'))
198 wxString pname, pvalue;
199 wxChar quote;
200 enum
201 {
202 ST_BEFORE_NAME = 1,
203 ST_NAME,
204 ST_BEFORE_EQ,
205 ST_BEFORE_VALUE,
206 ST_VALUE
207 } state;
208
209 quote = 0;
210 state = ST_BEFORE_NAME;
211 while (i < end_pos)
212 {
213 c = source[i++];
214
215 if (c == wxT('>') && !(state == ST_VALUE && quote != 0))
216 {
217 if (state == ST_BEFORE_EQ || state == ST_NAME)
218 {
219 m_ParamNames.Add(pname);
220 m_ParamValues.Add(wxEmptyString);
221 }
222 else if (state == ST_VALUE && quote == 0)
223 {
224 m_ParamNames.Add(pname);
225 if (entParser)
226 m_ParamValues.Add(entParser->Parse(pvalue));
227 else
228 m_ParamValues.Add(pvalue);
229 }
230 break;
231 }
232 switch (state)
233 {
234 case ST_BEFORE_NAME:
235 if (!IS_WHITE(c))
236 {
237 pname = c;
238 state = ST_NAME;
239 }
240 break;
241 case ST_NAME:
242 if (IS_WHITE(c))
243 state = ST_BEFORE_EQ;
244 else if (c == wxT('='))
245 state = ST_BEFORE_VALUE;
246 else
247 pname << c;
248 break;
249 case ST_BEFORE_EQ:
250 if (c == wxT('='))
251 state = ST_BEFORE_VALUE;
252 else if (!IS_WHITE(c))
253 {
254 m_ParamNames.Add(pname);
255 m_ParamValues.Add(wxEmptyString);
256 pname = c;
257 state = ST_NAME;
258 }
259 break;
260 case ST_BEFORE_VALUE:
261 if (!IS_WHITE(c))
262 {
263 if (c == wxT('"') || c == wxT('\''))
264 quote = c, pvalue = wxEmptyString;
265 else
266 quote = 0, pvalue = c;
267 state = ST_VALUE;
268 }
269 break;
270 case ST_VALUE:
271 if ((quote != 0 && c == quote) ||
272 (quote == 0 && IS_WHITE(c)))
273 {
274 m_ParamNames.Add(pname);
275 if (quote == 0)
276 {
277 // VS: backward compatibility, no real reason,
278 // but wxHTML code relies on this... :(
279 pvalue.MakeUpper();
280 }
281 if (entParser)
282 m_ParamValues.Add(entParser->Parse(pvalue));
283 else
284 m_ParamValues.Add(pvalue);
285 state = ST_BEFORE_NAME;
286 }
287 else
288 pvalue << c;
289 break;
290 }
291 }
292
293 #undef IS_WHITE
294 }
295 m_Begin = i;
296
297 cache->QueryTag(pos, &m_End1, &m_End2);
298 if (m_End1 > end_pos) m_End1 = end_pos;
299 if (m_End2 > end_pos) m_End2 = end_pos;
300}
301
302wxHtmlTag::~wxHtmlTag()
303{
304 wxHtmlTag *t1, *t2;
305 t1 = m_FirstChild;
306 while (t1)
307 {
308 t2 = t1->GetNextSibling();
309 delete t1;
310 t1 = t2;
311 }
312}
313
314bool wxHtmlTag::HasParam(const wxString& par) const
315{
316 return (m_ParamNames.Index(par, FALSE) != wxNOT_FOUND);
317}
318
319wxString wxHtmlTag::GetParam(const wxString& par, bool with_commas) const
320{
321 int index = m_ParamNames.Index(par, FALSE);
322 if (index == wxNOT_FOUND)
323 return wxEmptyString;
324 if (with_commas)
325 {
326 // VS: backward compatibility, seems to be never used by wxHTML...
327 wxString s;
328 s << wxT('"') << m_ParamValues[index] << wxT('"');
329 return s;
330 }
331 else
332 return m_ParamValues[index];
333}
334
335int wxHtmlTag::ScanParam(const wxString& par, wxChar *format, void *param) const
336{
337 wxString parval = GetParam(par);
338 return wxSscanf(parval, format, param);
339}
340
341bool wxHtmlTag::GetParamAsColour(const wxString& par, wxColour *clr) const
342{
343 wxString str = GetParam(par);
344
345 if (str.IsEmpty()) return FALSE;
346 if (str.GetChar(0) == wxT('#'))
347 {
348 unsigned long tmp;
349 if (ScanParam(par, wxT("#%lX"), &tmp) != 1)
350 return FALSE;
351 *clr = wxColour((unsigned char)((tmp & 0xFF0000) >> 16),
352 (unsigned char)((tmp & 0x00FF00) >> 8),
353 (unsigned char)(tmp & 0x0000FF));
354 return TRUE;
355 }
356 else
357 {
358 // Handle colours defined in HTML 4.0:
359 #define HTML_COLOUR(name,r,g,b) \
360 if (str.IsSameAs(wxT(name), FALSE)) \
361 { *clr = wxColour(r,g,b); return TRUE; }
362 HTML_COLOUR("black", 0x00,0x00,0x00)
363 HTML_COLOUR("silver", 0xC0,0xC0,0xC0)
364 HTML_COLOUR("gray", 0x80,0x80,0x80)
365 HTML_COLOUR("white", 0xFF,0xFF,0xFF)
366 HTML_COLOUR("maroon", 0x80,0x00,0x00)
367 HTML_COLOUR("red", 0xFF,0x00,0x00)
368 HTML_COLOUR("purple", 0x80,0x00,0x80)
369 HTML_COLOUR("fuchsia", 0xFF,0x00,0xFF)
370 HTML_COLOUR("green", 0x00,0x80,0x00)
371 HTML_COLOUR("lime", 0x00,0xFF,0x00)
372 HTML_COLOUR("olive", 0x80,0x80,0x00)
373 HTML_COLOUR("yellow", 0xFF,0xFF,0x00)
374 HTML_COLOUR("navy", 0x00,0x00,0x80)
375 HTML_COLOUR("blue", 0x00,0x00,0xFF)
376 HTML_COLOUR("teal", 0x00,0x80,0x80)
377 HTML_COLOUR("aqua", 0x00,0xFF,0xFF)
378 #undef HTML_COLOUR
379 }
380
381 return FALSE;
382}
383
384bool wxHtmlTag::GetParamAsInt(const wxString& par, int *clr) const
385{
386 if (!HasParam(par)) return FALSE;
387 long i;
388 bool succ = GetParam(par).ToLong(&i);
389 *clr = (int)i;
390 return succ;
391}
392
393wxString wxHtmlTag::GetAllParams() const
394{
395 // VS: this function is for backward compatiblity only,
396 // never used by wxHTML
397 wxString s;
398 size_t cnt = m_ParamNames.GetCount();
399 for (size_t i = 0; i < cnt; i++)
400 {
401 s << m_ParamNames[i];
402 s << wxT('=');
403 if (m_ParamValues[i].Find(wxT('"')) != wxNOT_FOUND)
404 s << wxT('\'') << m_ParamValues[i] << wxT('\'');
405 else
406 s << wxT('"') << m_ParamValues[i] << wxT('"');
407 }
408 return s;
409}
410
411wxHtmlTag *wxHtmlTag::GetFirstSibling() const
412{
413 if (m_Parent)
414 return m_Parent->m_FirstChild;
415 else
416 {
417 wxHtmlTag *cur = (wxHtmlTag*)this;
418 while (cur->m_Prev)
419 cur = cur->m_Prev;
420 return cur;
421 }
422}
423
424wxHtmlTag *wxHtmlTag::GetLastSibling() const
425{
426 if (m_Parent)
427 return m_Parent->m_LastChild;
428 else
429 {
430 wxHtmlTag *cur = (wxHtmlTag*)this;
431 while (cur->m_Next)
432 cur = cur->m_Next;
433 return cur;
434 }
435}
436
437wxHtmlTag *wxHtmlTag::GetNextTag() const
438{
439 if (m_FirstChild) return m_FirstChild;
440 if (m_Next) return m_Next;
441 wxHtmlTag *cur = m_Parent;
442 if (!cur) return NULL;
443 while (cur->m_Parent && !cur->m_Next)
444 cur = cur->m_Parent;
445 return cur->m_Next;
446}
447
448#endif