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.
366 lines
9.9 KiB
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;
|
|
}
|