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.
tdelibs/kabc/ldif.cpp

366 lines
9.9 KiB

/*
This file is part of libkabc.
Copyright (c) 2004 Szombathelyi György <gyurco@freemail.hu>
This library is free software; you can redistribute it and/or
modify it under the terms of the GNU Library General Public
License as published by the Free Software Foundation; either
version 2 of the License, or (at your option) any later version.
This library is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
Library General Public License for more details.
You should have received a copy of the GNU Library General Public License
along with this library; see the file COPYING.LIB. If not, write to
the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
Boston, MA 02110-1301, USA.
*/
#include <kdebug.h>
#include <kmdcodec.h>
#include "ldif.h"
using namespace KABC;
LDIF::LDIF()
{
startParsing();
}
LDIF::~LDIF()
{
}
TQCString LDIF::assembleLine( const TQString &fieldname, const TQByteArray &value,
uint linelen, bool url )
{
bool safe = false;
bool isDn;
TQCString result;
uint i;
if ( url ) {
result = fieldname.utf8() + ":< " + TQCString( value.data(), value.size()+1 );
} else {
isDn = fieldname.lower() == "dn";
//SAFE-INIT-CHAR
if ( value.size() > 0 && value[0] > 0 && value[0] != '\n' &&
value[0] != '\r' && value[0] != ':' && value[0] != '<' ) safe = true;
//SAFE-CHAR
if ( safe ) {
for ( i=1; i < value.size(); i++ ) {
//allow utf-8 in Distinguished Names
if ( ( isDn && value[i] == 0 ) ||
( !isDn && value[i] <= 0 ) ||
value[i] == '\r' || value[i] == '\n' ) {
safe = false;
break;
}
}
}
if ( value.size() == 0 ) safe = true;
if( safe ) {
result = fieldname.utf8() + ": " + TQCString( value.data(), value.size()+1 );
} else {
result = fieldname.utf8() + ":: " + KCodecs::base64Encode( value, false );
}
if ( linelen > 0 ) {
i = (fieldname.length()+2) > linelen ? fieldname.length()+2 : linelen;
while ( i < result.length() ) {
result.insert( i, "\n " );
i += linelen+2;
}
}
}
return result;
}
TQCString LDIF::assembleLine( const TQString &fieldname, const TQCString &value,
uint linelen, bool url )
{
TQCString ret;
TQByteArray tmp;
uint valuelen = value.length();
const char *data = value.data();
tmp.setRawData( data, valuelen );
ret = assembleLine( fieldname, tmp, linelen, url );
tmp.resetRawData( data, valuelen );
return ret;
}
TQCString LDIF::assembleLine( const TQString &fieldname, const TQString &value,
uint linelen, bool url )
{
return assembleLine( fieldname, value.utf8(), linelen, url );
}
bool LDIF::splitLine( const TQCString &line, TQString &fieldname, TQByteArray &value )
{
int position;
TQByteArray tmp;
int linelen;
const char *data;
// kdDebug(5700) << "splitLine line: " << TQString::fromUtf8(line) << endl;
position = line.find( ":" );
if ( position == -1 ) {
// strange: we did not find a fieldname
fieldname = "";
TQCString str;
str = line.stripWhiteSpace();
linelen = str.length();
data = str.data();
tmp.setRawData( data, linelen );
value = tmp.copy();
tmp.resetRawData( data, linelen );
// kdDebug(5700) << "value : " << value[0] << endl;
return false;
}
linelen = line.length();
if ( linelen > ( position + 1 ) && line[ position + 1 ] == ':' ) {
// String is BASE64 encoded -> decode it now.
fieldname = TQString::fromUtf8(
line.left( position ).stripWhiteSpace() );
if ( linelen <= ( position + 3 ) ) {
value.resize( 0 );
return false;
}
data = &line.data()[ position + 3 ];
tmp.setRawData( data, linelen - position - 3 );
KCodecs::base64Decode( tmp, value );
tmp.resetRawData( data, linelen - position - 3 );
return false;
}
if ( linelen > ( position + 1 ) && line[ position + 1 ] == '<' ) {
// String is an URL.
fieldname = TQString::fromUtf8(
line.left( position ).stripWhiteSpace() );
if ( linelen <= ( position + 3 ) ) {
value.resize( 0 );
return false;
}
data = &line.data()[ position + 3];
tmp.setRawData( data, linelen - position - 3 );
value = tmp.copy();
tmp.resetRawData( data, linelen - position - 3 );
return true;
}
fieldname = TQString::fromUtf8(line.left( position ).stripWhiteSpace());
if ( linelen <= ( position + 2 ) ) {
value.resize( 0 );
return false;
}
data = &line.data()[ position + 2 ];
tmp.setRawData( data, linelen - position - 2 );
value = tmp.copy();
tmp.resetRawData( data, linelen - position - 2 );
return false;
}
bool LDIF::splitControl( const TQCString &line, TQString &oid, bool &critical,
TQByteArray &value )
{
TQString tmp;
critical = false;
bool url = splitLine( line, tmp, value );
kdDebug(5700) << "splitControl: value: " << TQString(TQString::fromUtf8(value, value.size())) << endl;
if ( tmp.isEmpty() ) {
tmp = TQString::fromUtf8( value, value.size() );
value.resize( 0 );
}
if ( tmp.right( 4 ) == "true" ) {
critical = true;
tmp.truncate( tmp.length() - 5 );
} else if ( tmp.right( 5 ) == "false" ) {
critical = false;
tmp.truncate( tmp.length() - 6 );
}
oid = tmp;
return url;
}
LDIF::ParseVal LDIF::processLine()
{
if ( mIsComment ) return None;
ParseVal retval = None;
if ( mLastParseVal == EndEntry ) mEntryType = Entry_None;
mUrl = splitLine( line, mAttr, mVal );
TQString attrLower = mAttr.lower();
switch ( mEntryType ) {
case Entry_None:
if ( attrLower == "version" ) {
if ( !mDn.isEmpty() ) retval = Err;
} else if ( attrLower == "dn" ) {
kdDebug(5700) << "ldapentry dn: " << TQString(TQString::fromUtf8( mVal, mVal.size() )) << endl;
mDn = TQString::fromUtf8( mVal, mVal.size() );
mModType = Mod_None;
retval = NewEntry;
} else if ( attrLower == "changetype" ) {
if ( mDn.isEmpty() )
retval = Err;
else {
TQString tmpval = TQString::fromUtf8( mVal, mVal.size() );
kdDebug(5700) << "changetype: " << tmpval << endl;
if ( tmpval == "add" ) mEntryType = Entry_Add;
else if ( tmpval == "delete" ) mEntryType = Entry_Del;
else if ( tmpval == "modrdn" || tmpval == "moddn" ) {
mNewRdn = "";
mNewSuperior = "";
mDelOldRdn = true;
mEntryType = Entry_Modrdn;
}
else if ( tmpval == "modify" ) mEntryType = Entry_Mod;
else retval = Err;
}
} else if ( attrLower == "control" ) {
mUrl = splitControl( TQCString( mVal, mVal.size() + 1 ), mOid, mCritical, mVal );
retval = Control;
} else if ( !mAttr.isEmpty() && mVal.size() > 0 ) {
mEntryType = Entry_Add;
retval = Item;
}
break;
case Entry_Add:
if ( mAttr.isEmpty() && mVal.size() == 0 )
retval = EndEntry;
else
retval = Item;
break;
case Entry_Del:
if ( mAttr.isEmpty() && mVal.size() == 0 )
retval = EndEntry;
else
retval = Err;
break;
case Entry_Mod:
if ( mModType == Mod_None ) {
kdDebug(5700) << "tdeio_ldap: new modtype " << mAttr << endl;
if ( mAttr.isEmpty() && mVal.size() == 0 ) {
retval = EndEntry;
} else if ( attrLower == "add" ) {
mModType = Mod_Add;
} else if ( attrLower == "replace" ) {
mModType = Mod_Replace;
mAttr = TQString::fromUtf8( mVal, mVal.size() );
mVal.resize( 0 );
retval = Item;
} else if ( attrLower == "delete" ) {
mModType = Mod_Del;
mAttr = TQString::fromUtf8( mVal, mVal.size() );
mVal.resize( 0 );
retval = Item;
} else {
retval = Err;
}
} else {
if ( mAttr.isEmpty() ) {
if ( TQString::fromUtf8( mVal, mVal.size() ) == "-" ) {
mModType = Mod_None;
} else if ( mVal.size() == 0 ) {
retval = EndEntry;
} else
retval = Err;
} else
retval = Item;
}
break;
case Entry_Modrdn:
if ( mAttr.isEmpty() && mVal.size() == 0 )
retval = EndEntry;
else if ( attrLower == "newrdn" )
mNewRdn = TQString::fromUtf8( mVal, mVal.size() );
else if ( attrLower == "newsuperior" )
mNewSuperior = TQString::fromUtf8( mVal, mVal.size() );
else if ( attrLower == "deleteoldrdn" ) {
if ( mVal.size() > 0 && mVal[0] == '0' )
mDelOldRdn = false;
else if ( mVal.size() > 0 && mVal[0] == '1' )
mDelOldRdn = true;
else
retval = Err;
} else
retval = Err;
break;
}
return retval;
}
LDIF::ParseVal LDIF::nextItem()
{
ParseVal retval = None;
char c=0;
while( retval == None ) {
if ( mPos < mLdif.size() ) {
c = mLdif[mPos];
mPos++;
if ( mIsNewLine && c == '\r' ) continue; //handle \n\r line end
if ( mIsNewLine && ( c == ' ' || c == '\t' ) ) { //line folding
mIsNewLine = false;
continue;
}
if ( mIsNewLine ) {
mIsNewLine = false;
retval = processLine();
mLastParseVal = retval;
line.resize( 0 );
mIsComment = ( c == '#' );
}
if ( c == '\n' || c == '\r' ) {
mLineNo++;
mIsNewLine = true;
continue;
}
} else {
retval = MoreData;
break;
}
if ( !mIsComment ) line += c;
}
return retval;
}
void LDIF::endLDIF()
{
TQByteArray tmp( 3 );
tmp[ 0 ] = '\n';
tmp[ 1 ] = '\n';
tmp[ 2 ] = '\n';
mLdif = tmp;
mPos = 0;
}
void LDIF::startParsing()
{
mPos = mLineNo = 0;
mDelOldRdn = false;
mEntryType = Entry_None;
mModType = Mod_None;
mDn = mNewRdn = mNewSuperior = "";
line = "";
mIsNewLine = false;
mIsComment = false;
mLastParseVal = None;
}