You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
tdenetwork/kopete/protocols/groupwise/libgroupwise/gwfield.cpp

224 lines
5.2 KiB

/*
gwfield.cpp - Fields used for Request/Response data in GroupWise
Copyright (c) 2004 SUSE Linux AG http://www.suse.com
Based on Testbed
Copyright (c) 2003 by Will Stephenson <will@stevello.free-online.co.uk>
Kopete (c) 2002-2004 by the Kopete developers <kopete-devel@kde.org>
*************************************************************************
* *
* This library is free software; you can redistribute it and/or *
* modify it under the terms of the GNU Lesser General Public *
* License as published by the Free Software Foundation; either *
* version 2 of the License, or (at your option) any later version. *
* *
*************************************************************************
*/
#include <tqcstring.h>
#include "gwerror.h"
#ifdef LIBGW_USE_KDEBUG
#include <kdebug.h>
#endif
#include "gwfield.h"
#include <iostream>
using namespace Field;
using namespace std;
/* === FieldList ==================================================== */
FieldList::~FieldList()
{
}
FieldListIterator FieldList::tqfind( TQCString tag )
{
FieldListIterator it = begin();
return tqfind( it, tag );
}
FieldListIterator FieldList::tqfind( FieldListIterator &it, TQCString tag )
{
FieldListIterator theEnd = end();
//cout << "FieldList::tqfind() looking for " << tag.data() << endl;
for ( ; it != theEnd; ++it )
{
//cout << " - on " << (*it)->tag().data() << endl;
if ( (*it)->tag() == tag )
break;
}
return it;
}
int FieldList::findIndex( TQCString tag )
{
FieldListIterator it = begin();
FieldListIterator theEnd = end();
int index = 0;
for ( ; it != theEnd; ++it, ++index )
if ( (*it)->tag() == tag )
return index;
return -1;
}
void FieldList::dump( bool recursive, int offset )
{
const FieldListIterator myEnd = end();
if ( !offset )
kdDebug( GROUPWISE_DEBUG_LIBGW ) << k_funcinfo << ( recursive ? ", recursively" : ", non-recursive" ) << endl;
for( FieldListIterator it = begin(); it != myEnd; ++it )
{
TQString s;
s.fill(' ', offset*2 );
s.append( (*it)->tag() );
SingleField * sf;
if ( ( sf = dynamic_cast<SingleField*>( *it ) ) )
{
s.append( " :" );
s.append( sf->value().toString() );
}
kdDebug( GROUPWISE_DEBUG_LIBGW ) << s << endl;
if ( recursive )
{
MultiField * mf;
if ( ( mf = dynamic_cast<MultiField*>( *it ) ) )
mf->fields().dump( recursive, offset+1 );
}
}
}
void FieldList::purge()
{
Field::FieldListIterator it = begin();
Field::FieldListIterator theEnd = end();
int index = 0;
for ( ; it != theEnd; ++it, ++index )
delete *it;
}
// THIS IS AN ATTEMPT TO HIDE THE POLYMORPHISM INSIDE THE LIST
// HOWEVER IT FAILS BECAUSE WE NEED BOTH THE ITERATOR AND THE CASTED Single|MultiField it points to
SingleField * FieldList::findSingleField( TQCString tag )
{
FieldListIterator it = begin();
return findSingleField( it, tag );
}
SingleField * FieldList::findSingleField( FieldListIterator &it, TQCString tag )
{
FieldListIterator found = tqfind( it, tag );
if ( found == end() )
return 0;
else
return dynamic_cast<SingleField *>( *found );
}
MultiField * FieldList::findMultiField( TQCString tag )
{
FieldListIterator it = begin();
return findMultiField( it, tag );
}
MultiField * FieldList::findMultiField( FieldListIterator &it, TQCString tag )
{
FieldListIterator found = tqfind( it, tag );
if ( found == end() )
return 0;
else
return dynamic_cast<MultiField *>( *found );
}
/* === FieldBase ========================================================= */
FieldBase::FieldBase( TQCString tag, TQ_UINT8 method, TQ_UINT8 flags, TQ_UINT8 type )
: m_tag( tag ), m_method( method ), m_flags( flags ), m_type( type )
{
}
TQCString FieldBase::tag() const
{
return m_tag;
}
TQ_UINT8 FieldBase::method() const
{
return m_method;
}
TQ_UINT8 FieldBase::flags() const
{
return m_flags;
}
TQ_UINT8 FieldBase::type() const
{
return m_type;
}
void FieldBase::setFlags( const TQ_UINT8 flags )
{
m_flags = flags;
}
/* === SingleField ========================================================= */
SingleField::SingleField( TQCString tag, TQ_UINT8 method, TQ_UINT8 flags, TQ_UINT8 type, TQVariant value )
: FieldBase( tag, method, flags, type ), m_value( value )
{
}
SingleField::SingleField( TQCString tag, TQ_UINT8 flags, TQ_UINT8 type, TQVariant value )
: FieldBase( tag, NMFIELD_METHOD_VALID, flags, type ), m_value( value )
{
}
SingleField::~SingleField()
{
}
void SingleField::setValue( const TQVariant v )
{
m_value = v;
}
TQVariant SingleField::value() const
{
return m_value;
}
/* === MultiField ========================================================= */
MultiField::MultiField( TQCString tag, TQ_UINT8 method, TQ_UINT8 flags, TQ_UINT8 type, FieldList fields )
: FieldBase( tag, method, flags, type ), m_fields( fields )
{
}
MultiField::MultiField( TQCString tag, TQ_UINT8 method, TQ_UINT8 flags, TQ_UINT8 type )
: FieldBase( tag, method, flags, type )
{
}
MultiField::~MultiField()
{
m_fields.purge();
}
FieldList MultiField::fields() const
{
return m_fields;
}
void MultiField::setFields( FieldList fields )
{
m_fields = fields;
}