[wxWidgets.git] / src / html / htmltag.cpp

/////////////////////////////////////////////////////////////////////////////
// Name:        htmltag.cpp
// Purpose:     wxHtmlTag class (represents single tag)
// Author:      Vaclav Slavik
// RCS-ID:      $Id$
// Copyright:   (c) 1999 Vaclav Slavik
// Licence:     wxWindows Licence
/////////////////////////////////////////////////////////////////////////////


#ifdef __GNUG__
#pragma implementation
#endif

#include "wx/wxprec.h"

#include "wx/defs.h"
#if wxUSE_HTML

#ifdef __BORDLANDC__
#pragma hdrstop
#endif

#ifndef WXPRECOMP
#include "wx/wx.h"
#endif

#include "wx/html/htmltag.h"
#include <stdio.h> // for vsscanf
#include <stdarg.h>


//-----------------------------------------------------------------------------
// wxHtmlTagsCache
//-----------------------------------------------------------------------------

IMPLEMENT_CLASS(wxHtmlTagsCache,wxObject)

#define CACHE_INCREMENT  64

wxHtmlTagsCache::wxHtmlTagsCache(const wxString& source)
{
    const wxChar *src = source.c_str();
    int i, tg, pos, stpos;
    int lng = source.Length();
    wxChar dummy[256];

    m_Cache = NULL;
    m_CacheSize = 0;
    m_CachePos = 0;

    pos = 0;
    while (pos < lng) 
    {
        if (src[pos] == wxT('<'))   // tag found:
	    {
            if (m_CacheSize % CACHE_INCREMENT == 0)
                m_Cache = (sCacheItem*) realloc(m_Cache, (m_CacheSize + CACHE_INCREMENT) * sizeof(sCacheItem));
            tg = m_CacheSize++;
            m_Cache[tg].Key = stpos = pos++;
            dummy[0] = 0; i = 0;
            while (pos < lng && 
                   src[pos] != wxT('>') &&
                   src[pos] != wxT(' ') && src[pos] != wxT('\r') && 
                   src[pos] != wxT('\n') && src[pos] != wxT('\t')) 
		    {
                dummy[i] = src[pos++];
                if ((dummy[i] >= wxT('a')) && (dummy[i] <= wxT('z'))) dummy[i] -= (wxT('a') - wxT('A'));
                i++;
            }
            dummy[i] = 0;
            m_Cache[tg].Name = new wxChar[i+1];
            memcpy(m_Cache[tg].Name, dummy, (i+1)*sizeof(wxChar));

            while (pos < lng && src[pos] != wxT('>')) pos++;

            if (src[stpos+1] == wxT('/')) // ending tag:
    	    {
                m_Cache[tg].End1 = m_Cache[tg].End2 = -2;
                // find matching begin tag:
                for (i = tg; i >= 0; i--)
                    if ((m_Cache[i].End1 == -1) && (wxStrcmp(m_Cache[i].Name, dummy+1) == 0)) 
		            {
                        m_Cache[i].End1 = stpos;
                        m_Cache[i].End2 = pos + 1;
                        break;
                    }
            }
            else 
	        {
                m_Cache[tg].End1 = m_Cache[tg].End2 = -1;
            }
        }

        pos++;
    }

    // ok, we're done, now we'll free .Name members of cache - we don't need it anymore:
    for (i = 0; i < m_CacheSize; i++) 
    {
        delete[] m_Cache[i].Name;
        m_Cache[i].Name = NULL;
    }
}


void wxHtmlTagsCache::QueryTag(int at, int* end1, int* end2)
{
    if (m_Cache == NULL) return;
    if (m_Cache[m_CachePos].Key != at) 
    {
        int delta = (at < m_Cache[m_CachePos].Key) ? -1 : 1;
        do {m_CachePos += delta;} while (m_Cache[m_CachePos].Key != at);
    }
    *end1 = m_Cache[m_CachePos].End1;
    *end2 = m_Cache[m_CachePos].End2;
}


//-----------------------------------------------------------------------------
// wxHtmlTag
//-----------------------------------------------------------------------------

IMPLEMENT_CLASS(wxHtmlTag,wxObject)

wxHtmlTag::wxHtmlTag(const wxString& source, int pos, int end_pos, wxHtmlTagsCache* cache) : wxObject()
{
    int i;
    char c;

    // fill-in name, params and begin pos:
    m_Name = m_Params = wxEmptyString;
    i = pos+1;
    if (source[i] == '/') { m_Ending = TRUE; i++; }
    else m_Ending = FALSE;

    // find tag's name and convert it to uppercase:
    while ((i < end_pos) && 
               ((c = source[i++]) != ' ' && c != '\r' && c != '\n' && c != '\t' &&
                c != '>')) 
	{
        if ((c >= 'a') && (c <= 'z')) c -= ('a' - 'A');
        m_Name += c;
    }

    // if the tag has parameters, read them and "normalize" them,
    // i.e. convert to uppercase, replace whitespaces by spaces and 
    // remove whitespaces around '=':
    if (source[i-1] != '>')
        while ((i < end_pos) && ((c = source[i++]) != '>')) 
	    {
            if ((c >= 'a') && (c <= 'z')) c -= ('a' - 'A');
            if (c == '\r' || c == '\n' || c == '\t') c = ' '; // make future parsing a bit simpler
            m_Params += c;
            if (c == '"') 
	        {
                // remove spaces around the '=' character:
                if (m_Params.Length() > 1 && 
                    m_Params[m_Params.Length()-2] == ' ')
                {
                    m_Params.RemoveLast();
                    while (m_Params.Length() > 0 && m_Params.Last() == ' ') 
                        m_Params.RemoveLast();
                    m_Params += '"';
                }
                while ((i < end_pos) && (source[i++] == ' ')) {}
                if (i < end_pos) i--;
            
                // ...and copy the value to m_Params:
                while ((i < end_pos) && ((c = source[i++]) != '"')) m_Params += c;
                m_Params += c;
            }
            else if (c == '\'') 
	        {
                while ((i < end_pos) && ((c = source[i++]) != '\'')) m_Params += c;
                m_Params += c;
            }
        }
   m_Begin = i;

   cache->QueryTag(pos, &m_End1, &m_End2);
   if (m_End1 > end_pos) m_End1 = end_pos;
   if (m_End2 > end_pos) m_End2 = end_pos;
}

    
bool wxHtmlTag::HasParam(const wxString& par) const
{
    const wxChar *st = m_Params, *p = par;
    const wxChar *st2, *p2;

    if (*st == 0) return FALSE;
    if (*p == 0) return FALSE;
    for (st2 = st, p2 = p; ; st2++) 
    {
        if (*p2 == 0) return TRUE;
        if (*st2 == 0) return FALSE;
        if (*p2 != *st2) p2 = p;
        if (*p2 == *st2) p2++;
        if (*st2 == ' ') p2 = p;
        else if (*st2 == '=') 
	    {
            p2 = p;
            while (*st2 != ' ') 
	        {
                if (*st2 == '"') 
		        {
                    st2++;
                    while (*st2 != '"') st2++;
                }
                st2++;
                if (*st2 == 0) return FALSE;
            }
        }
    }
}


wxString wxHtmlTag::GetParam(const wxString& par, bool with_commas) const
{
    const wxChar *st = m_Params, *p = par;
    const wxChar *st2, *p2;
    bool comma;
    char comma_char;

    if (*st == 0) return "";
    if (*p == 0) return "";
    for (st2 = st, p2 = p; ; st2++) 
    {
        if (*p2 == 0)  // found
	    {
            wxString fnd = "";
            st2++; // '=' character
            comma = FALSE;
    	    comma_char = '\0';
            if (!with_commas && (*(st2) == '"')) 
	        {
    	        st2++;
        		comma = TRUE; 
        		comma_char = '"';
	        }
    	    else if (!with_commas && (*(st2) == '\'')) 
	        {
    	        st2++; 
    	    	comma = TRUE;
        		comma_char = '\'';
    	    }
	    
            while (*st2 != 0) 
	        {
                if (comma && *st2 == comma_char) comma = FALSE;
                else if ((*st2 == ' ') && (!comma)) break;
                fnd += (*(st2++));
            }
            if (!with_commas && (*(st2-1) == comma_char)) fnd.RemoveLast();
            return fnd;
        }
        if (*st2 == 0) return "";
        if (*p2 != *st2) p2 = p;
        if (*p2 == *st2) p2++;
        if (*st2 == ' ') p2 = p;
        else if (*st2 == '=') 
	    {
            p2 = p;
            while (*st2 != ' ') 
	        {
                if (*st2 == '"') 
		        {
                    st2++;
                    while (*st2 != '"') st2++;
                }
                else if (*st2 == '\'') 
		        {
                    st2++;
                    while (*st2 != '\'') st2++;
                }
                st2++;
            }
        }
    }
}


int wxHtmlTag::ScanParam(const wxString& par, wxChar *format, void *param) const
{
    wxString parval = GetParam(par);
    return wxSscanf((const wxChar*)parval, format, param);
}

#endif
Commit	Line	Data
5526e819 VS	1	/////////////////////////////////////////////////////////////////////////////
	2	// Name: htmltag.cpp
	3	// Purpose: wxHtmlTag class (represents single tag)
	4	// Author: Vaclav Slavik
69941f05	5	// RCS-ID: $Id$
5526e819 VS	6	// Copyright: (c) 1999 Vaclav Slavik
	7	// Licence: wxWindows Licence
	8	/////////////////////////////////////////////////////////////////////////////
	9
	10
	11	#ifdef __GNUG__
	12	#pragma implementation
	13	#endif
	14
3096bd2f	15	#include "wx/wxprec.h"
5526e819 VS	16
	17	#include "wx/defs.h"
	18	#if wxUSE_HTML
	19
	20	#ifdef __BORDLANDC__
	21	#pragma hdrstop
	22	#endif
	23
	24	#ifndef WXPRECOMP
3096bd2f	25	#include "wx/wx.h"
5526e819 VS	26	#endif
5526e819 VS	27
69941f05	28	#include "wx/html/htmltag.h"
7e1e0960	29	#include <stdio.h> // for vsscanf
5526e819 VS	30	#include <stdarg.h>
	31
	32
	33
	34
	35	//-----------------------------------------------------------------------------
	36	// wxHtmlTagsCache
	37	//-----------------------------------------------------------------------------
	38
	39	IMPLEMENT_CLASS(wxHtmlTagsCache,wxObject)
	40
	41	#define CACHE_INCREMENT 64
	42
	43	wxHtmlTagsCache::wxHtmlTagsCache(const wxString& source)
	44	{
66a77a74	45	const wxChar *src = source.c_str();
5526e819 VS	46	int i, tg, pos, stpos;
5526e819 VS	47	int lng = source.Length();
66a77a74	48	wxChar dummy[256];
5526e819 VS	49
	50	m_Cache = NULL;
	51	m_CacheSize = 0;
	52	m_CachePos = 0;
	53
	54	pos = 0;
4f9297b0 VS	55	while (pos < lng)
	56	{
	57	if (src[pos] == wxT('<')) // tag found:
	58	{
5526e819 VS	59	if (m_CacheSize % CACHE_INCREMENT == 0)
	60	m_Cache = (sCacheItem) realloc(m_Cache, (m_CacheSize + CACHE_INCREMENT) sizeof(sCacheItem));
	61	tg = m_CacheSize++;
	62	m_Cache[tg].Key = stpos = pos++;
	63	dummy[0] = 0; i = 0;
15db3cf5 VS	64	while (pos < lng &&
15db3cf5 VS	65	src[pos] != wxT('>') &&
f6bcfd97	66	src[pos] != wxT(' ') && src[pos] != wxT('\r') &&
4f9297b0 VS	67	src[pos] != wxT('\n') && src[pos] != wxT('\t'))
4f9297b0 VS	68	{
5526e819	69	dummy[i] = src[pos++];
66a77a74	70	if ((dummy[i] >= wxT('a')) && (dummy[i] <= wxT('z'))) dummy[i] -= (wxT('a') - wxT('A'));
5526e819 VS	71	i++;
	72	}
	73	dummy[i] = 0;
66a77a74 OK	74	m_Cache[tg].Name = new wxChar[i+1];
66a77a74 OK	75	memcpy(m_Cache[tg].Name, dummy, (i+1)*sizeof(wxChar));
5526e819	76
15db3cf5	77	while (pos < lng && src[pos] != wxT('>')) pos++;
5526e819	78
4f9297b0 VS	79	if (src[stpos+1] == wxT('/')) // ending tag:
4f9297b0 VS	80	{
5526e819 VS	81	m_Cache[tg].End1 = m_Cache[tg].End2 = -2;
	82	// find matching begin tag:
	83	for (i = tg; i >= 0; i--)
4f9297b0 VS	84	if ((m_Cache[i].End1 == -1) && (wxStrcmp(m_Cache[i].Name, dummy+1) == 0))
4f9297b0 VS	85	{
5526e819 VS	86	m_Cache[i].End1 = stpos;
	87	m_Cache[i].End2 = pos + 1;
	88	break;
	89	}
	90	}
4f9297b0 VS	91	else
4f9297b0 VS	92	{
5526e819 VS	93	m_Cache[tg].End1 = m_Cache[tg].End2 = -1;
	94	}
	95	}
	96
	97	pos++;
	98	}
	99
	100	// ok, we're done, now we'll free .Name members of cache - we don't need it anymore:
4f9297b0 VS	101	for (i = 0; i < m_CacheSize; i++)
4f9297b0 VS	102	{
2776d7c3	103	delete[] m_Cache[i].Name;
5526e819 VS	104	m_Cache[i].Name = NULL;
	105	}
	106	}
	107
	108
	109
	110	void wxHtmlTagsCache::QueryTag(int at, int* end1, int* end2)
	111	{
	112	if (m_Cache == NULL) return;
4f9297b0 VS	113	if (m_Cache[m_CachePos].Key != at)
4f9297b0 VS	114	{
5526e819 VS	115	int delta = (at < m_Cache[m_CachePos].Key) ? -1 : 1;
	116	do {m_CachePos += delta;} while (m_Cache[m_CachePos].Key != at);
	117	}
	118	*end1 = m_Cache[m_CachePos].End1;
	119	*end2 = m_Cache[m_CachePos].End2;
	120	}
	121
	122
	123
	124
	125	//-----------------------------------------------------------------------------
	126	// wxHtmlTag
	127	//-----------------------------------------------------------------------------
	128
	129	IMPLEMENT_CLASS(wxHtmlTag,wxObject)
	130
	131	wxHtmlTag::wxHtmlTag(const wxString& source, int pos, int end_pos, wxHtmlTagsCache* cache) : wxObject()
	132	{
	133	int i;
	134	char c;
	135
	136	// fill-in name, params and begin pos:
	137	m_Name = m_Params = wxEmptyString;
	138	i = pos+1;
4f9297b0	139	if (source[i] == '/') { m_Ending = TRUE; i++; }
5526e819 VS	140	else m_Ending = FALSE;
5526e819 VS	141
b076dc01	142	// find tag's name and convert it to uppercase:
f6bcfd97 BP	143	while ((i < end_pos) &&
f6bcfd97 BP	144	((c = source[i++]) != ' ' && c != '\r' && c != '\n' && c != '\t' &&
4f9297b0 VS	145	c != '>'))
4f9297b0 VS	146	{
5526e819 VS	147	if ((c >= 'a') && (c <= 'z')) c -= ('a' - 'A');
	148	m_Name += c;
	149	}
	150
b076dc01 VS	151	// if the tag has parameters, read them and "normalize" them,
	152	// i.e. convert to uppercase, replace whitespaces by spaces and
	153	// remove whitespaces around '=':
5526e819	154	if (source[i-1] != '>')
4f9297b0 VS	155	while ((i < end_pos) && ((c = source[i++]) != '>'))
4f9297b0 VS	156	{
5526e819	157	if ((c >= 'a') && (c <= 'z')) c -= ('a' - 'A');
f6bcfd97	158	if (c == '\r' \|\| c == '\n' \|\| c == '\t') c = ' '; // make future parsing a bit simpler
5526e819	159	m_Params += c;
4f9297b0 VS	160	if (c == '"')
4f9297b0 VS	161	{
b076dc01 VS	162	// remove spaces around the '=' character:
	163	if (m_Params.Length() > 1 &&
	164	m_Params[m_Params.Length()-2] == ' ')
	165	{
	166	m_Params.RemoveLast();
	167	while (m_Params.Length() > 0 && m_Params.Last() == ' ')
	168	m_Params.RemoveLast();
	169	m_Params += '"';
	170	}
	171	while ((i < end_pos) && (source[i++] == ' ')) {}
	172	if (i < end_pos) i--;
	173
	174	// ...and copy the value to m_Params:
5526e819 VS	175	while ((i < end_pos) && ((c = source[i++]) != '"')) m_Params += c;
	176	m_Params += c;
	177	}
4f9297b0 VS	178	else if (c == '\'')
4f9297b0 VS	179	{
72aa4a98 VS	180	while ((i < end_pos) && ((c = source[i++]) != '\'')) m_Params += c;
	181	m_Params += c;
	182	}
5526e819 VS	183	}
	184	m_Begin = i;
	185
4f9297b0	186	cache->QueryTag(pos, &m_End1, &m_End2);
5526e819 VS	187	if (m_End1 > end_pos) m_End1 = end_pos;
	188	if (m_End2 > end_pos) m_End2 = end_pos;
	189	}
	190
	191
	192
	193	bool wxHtmlTag::HasParam(const wxString& par) const
	194	{
66a77a74 OK	195	const wxChar st = m_Params, p = par;
66a77a74 OK	196	const wxChar st2, p2;
5526e819 VS	197
	198	if (*st == 0) return FALSE;
	199	if (*p == 0) return FALSE;
4f9297b0 VS	200	for (st2 = st, p2 = p; ; st2++)
4f9297b0 VS	201	{
5526e819 VS	202	if (*p2 == 0) return TRUE;
	203	if (*st2 == 0) return FALSE;
	204	if (p2 != st2) p2 = p;
	205	if (p2 == st2) p2++;
	206	if (*st2 == ' ') p2 = p;
4f9297b0 VS	207	else if (*st2 == '=')
4f9297b0 VS	208	{
5526e819	209	p2 = p;
4f9297b0 VS	210	while (*st2 != ' ')
	211	{
	212	if (*st2 == '"')
	213	{
5526e819 VS	214	st2++;
	215	while (*st2 != '"') st2++;
	216	}
	217	st2++;
	218	if (*st2 == 0) return FALSE;
	219	}
	220	}
	221	}
	222	}
	223
	224
	225
	226	wxString wxHtmlTag::GetParam(const wxString& par, bool with_commas) const
	227	{
66a77a74 OK	228	const wxChar st = m_Params, p = par;
66a77a74 OK	229	const wxChar st2, p2;
5526e819	230	bool comma;
72aa4a98	231	char comma_char;
5526e819 VS	232
	233	if (*st == 0) return "";
	234	if (*p == 0) return "";
4f9297b0 VS	235	for (st2 = st, p2 = p; ; st2++)
	236	{
	237	if (*p2 == 0) // found
	238	{
5526e819 VS	239	wxString fnd = "";
	240	st2++; // '=' character
	241	comma = FALSE;
4f9297b0 VS	242	comma_char = '\0';
	243	if (!with_commas && (*(st2) == '"'))
	244	{
	245	st2++;
	246	comma = TRUE;
	247	comma_char = '"';
	248	}
	249	else if (!with_commas && (*(st2) == '\''))
	250	{
	251	st2++;
	252	comma = TRUE;
	253	comma_char = '\'';
	254	}
	255
	256	while (*st2 != 0)
	257	{
72aa4a98	258	if (comma && *st2 == comma_char) comma = FALSE;
5526e819 VS	259	else if ((*st2 == ' ') && (!comma)) break;
	260	fnd += (*(st2++));
	261	}
72aa4a98	262	if (!with_commas && (*(st2-1) == comma_char)) fnd.RemoveLast();
5526e819 VS	263	return fnd;
	264	}
	265	if (*st2 == 0) return "";
	266	if (p2 != st2) p2 = p;
	267	if (p2 == st2) p2++;
	268	if (*st2 == ' ') p2 = p;
4f9297b0 VS	269	else if (*st2 == '=')
4f9297b0 VS	270	{
5526e819	271	p2 = p;
4f9297b0 VS	272	while (*st2 != ' ')
	273	{
	274	if (*st2 == '"')
	275	{
5526e819 VS	276	st2++;
	277	while (*st2 != '"') st2++;
	278	}
4f9297b0 VS	279	else if (*st2 == '\'')
4f9297b0 VS	280	{
72aa4a98 VS	281	st2++;
	282	while (*st2 != '\'') st2++;
	283	}
5526e819 VS	284	st2++;
	285	}
	286	}
	287	}
	288	}
	289
	290
	291
66a77a74	292	int wxHtmlTag::ScanParam(const wxString& par, wxChar format, void param) const
5526e819	293	{
5526e819	294	wxString parval = GetParam(par);
66a77a74	295	return wxSscanf((const wxChar*)parval, format, param);
5526e819 VS	296	}
5526e819 VS	297
4d223b67	298	#endif