Added VCard Backend.

4 files changed, 1228 insertions, 0 deletions

diff --git a/libopie/pim/ocontactaccessbackend_vcard.cpp b/libopie/pim/ocontactaccessbackend_vcard.cpp
new file mode 100644
index 0000000..903c0b7
--- a/dev/null
+++ b/libopie/pim/ocontactaccessbackend_vcard.cpp
@@ -0,0 +1,549 @@
+/*
+ * VCard Backend for the OPIE-Contact Database.
+ *
+ * Copyright (c) 2002 by Stefan Eilers (Eilers.Stefan@epost.de)
+ *
+ * =====================================================================
+         *This program 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.
+ * =====================================================================
+ * ToDo:
+ *
+ * =====================================================================
+ * Version: $Id$
+ * =====================================================================
+ * History:
+ * $Log$
+ * Revision 1.1  2002/11/09 14:34:52  eilers
+ * Added VCard Backend.
+ *
+ */
+#include "ocontactaccessbackend_vcard.h"
+#include "../../library/backend/vobject_p.h"
+#include "../../library/backend/qfiledirect_p.h"
+
+#include <qpe/timeconversion.h>
+
+#include <qfile.h>
+
+OContactAccessBackend_VCard::OContactAccessBackend_VCard ( QString , QString filename = 0l ):
+        m_dirty( false ),
+        m_file( filename )
+{}
+
+
+bool OContactAccessBackend_VCard::load ()
+{   
+        m_map.clear();
+        m_dirty = false;
+        
+        VObject* obj = 0l;
+        obj = Parse_MIME_FromFileName( QFile::encodeName(m_file).data() );
+        if ( !obj )
+                return false;
+
+        while ( obj ) {
+                OContact con = parseVObject( obj );
+                /*
+                 * if uid is 0 assign a new one
+                 * this at least happens on
+                 * Nokia6210
+                 */
+                if ( con.uid() == 0 ){
+                        con.setUid( 1 );
+                        qWarning("assigned new uid %d",con.uid() );
+                }
+
+                m_map.insert( con.uid(), con );
+                
+                VObject *t = obj;
+                obj = nextVObjectInList(obj);
+                cleanVObject( t );
+        }
+
+        return true;
+
+}
+bool OContactAccessBackend_VCard::reload()
+{
+        return load();
+}
+bool OContactAccessBackend_VCard::save()
+{ 
+        if (!m_dirty )
+                return true;
+
+        QFileDirect file( m_file );
+        if (!file.open(IO_WriteOnly ) )
+                return false;
+
+        VObject *obj;
+        obj = newVObject( VCCalProp );
+        addPropValue( obj, VCVersionProp, "1.0" );
+
+        VObject *vo;
+        for(QMap<int, OContact>::ConstIterator it=m_map.begin(); it !=m_map.end(); ++it ){
+                vo = createVObject( *it );
+                addVObjectProp( obj, vo );
+        }
+        writeVObject( file.directHandle() , obj );
+        cleanVObject( obj );
+        
+        cleanStrTbl();
+
+        m_dirty = false;
+        return true;
+        
+
+}
+void OContactAccessBackend_VCard::clear ()
+{
+        m_map.clear();
+        m_dirty = true; // ??? sure ? (se)
+}
+
+bool OContactAccessBackend_VCard::add ( const OContact& newcontact )
+{
+        m_map.insert( newcontact.uid(), newcontact );
+        m_dirty = true;
+        return true;
+}
+
+bool OContactAccessBackend_VCard::remove ( int uid )
+{
+        m_map.remove( uid );
+        m_dirty = true;
+                return true;
+}
+
+bool OContactAccessBackend_VCard::replace ( const OContact &contact )
+{
+        m_map.replace( contact.uid(), contact );
+        m_dirty = true;
+        return true;
+}
+        
+OContact OContactAccessBackend_VCard::find ( int uid ) const
+{
+    return m_map[uid];
+}
+
+QArray<int> OContactAccessBackend_VCard::allRecords() const
+{
+        QArray<int> ar( m_map.count() );
+        QMap<int, OContact>::ConstIterator it;
+        int i = 0;
+        for ( it = m_map.begin(); it != m_map.end(); ++it ) {
+                ar[i] = it.key();
+                i++;
+        }
+        return ar;
+}
+
+// Not implemented
+QArray<int> OContactAccessBackend_VCard::queryByExample ( const OContact&, int )
+{
+        QArray<int> ar(0);
+        return ar;
+}
+
+// Not implemented
+QArray<int> OContactAccessBackend_VCard::matchRegexp(  const QRegExp&  ) const
+{
+        QArray<int> ar(0);
+        return ar;
+}
+
+const uint OContactAccessBackend_VCard::querySettings()
+{
+        return 0; // No search possible
+}
+
+bool OContactAccessBackend_VCard::hasQuerySettings (uint ) const
+{
+        return false; // No search possible, therefore all settings invalid ;)
+}
+
+
+// *** Private stuff ***
+
+
+OContact OContactAccessBackend_VCard::parseVObject( VObject *obj )
+{
+        OContact c;
+        
+        VObjectIterator it;
+        initPropIterator( &it, obj );
+        while( moreIteration( &it ) ) {
+                VObject *o = nextVObject( &it );
+                QCString name = vObjectName( o );
+                QCString value = vObjectStringZValue( o );
+                if ( name == VCNameProp ) {
+                        VObjectIterator nit;
+                        initPropIterator( &nit, o );
+                        while( moreIteration( &nit ) ) {
+                                VObject *o = nextVObject( &nit );
+                                QCString name = vObjectTypeInfo( o );
+                                QString value = vObjectStringZValue( o );
+                                if ( name == VCNamePrefixesProp )
+                                        c.setTitle( value );
+                                else if ( name == VCNameSuffixesProp )
+                                        c.setSuffix( value );
+                                else if ( name == VCFamilyNameProp )
+                                        c.setLastName( value );
+                                else if ( name == VCGivenNameProp )
+                                        c.setFirstName( value );
+                                else if ( name == VCAdditionalNamesProp )
+                                        c.setMiddleName( value );
+                        }
+                }
+                else if ( name == VCAdrProp ) {
+                        bool work = TRUE; // default address is work address
+                        QString street;
+                        QString city;
+                        QString region;
+                        QString postal;
+                        QString country;
+                        
+                        VObjectIterator nit;
+                        initPropIterator( &nit, o );
+                        while( moreIteration( &nit ) ) {
+                                VObject *o = nextVObject( &nit );
+                                QCString name = vObjectName( o );
+                                QString value = vObjectStringZValue( o );
+                                if ( name == VCHomeProp )
+                                        work = FALSE;
+                                else if ( name == VCWorkProp )
+                                        work = TRUE;
+                                else if ( name == VCStreetAddressProp )
+                                        street = value;
+                                else if ( name == VCCityProp )
+                                        city = value;
+                                else if ( name == VCRegionProp )
+                                        region = value;
+                                else if ( name == VCPostalCodeProp )
+                                        postal = value;
+                                else if ( name == VCCountryNameProp )
+                                        country = value;
+                        }
+                        if ( work ) {
+                                c.setBusinessStreet( street );
+                                c.setBusinessCity( city );
+                                c.setBusinessCountry( country );
+                                c.setBusinessZip( postal );
+                                c.setBusinessState( region );
+                        } else {
+                                c.setHomeStreet( street );
+                                c.setHomeCity( city );
+                                c.setHomeCountry( country );
+                                c.setHomeZip( postal );
+                                c.setHomeState( region );
+                        }
+                }
+                else if ( name == VCTelephoneProp ) {
+                        enum {
+                                HOME = 0x01,
+                                WORK = 0x02,
+                                VOICE = 0x04,
+                                CELL = 0x08,
+                                FAX = 0x10,
+                                PAGER = 0x20,
+                                UNKNOWN = 0x80
+                        };
+                        int type = 0;
+                        
+                        VObjectIterator nit;
+                        initPropIterator( &nit, o );
+                        while( moreIteration( &nit ) ) {
+                                VObject *o = nextVObject( &nit );
+                                QCString name = vObjectTypeInfo( o );
+                                if ( name == VCHomeProp )
+                                        type |= HOME;
+                                else if ( name == VCWorkProp )
+                                        type |= WORK;
+                                else if ( name == VCVoiceProp )
+                                        type |= VOICE;
+                                else if ( name == VCCellularProp )
+                                        type |= CELL;
+                                else if ( name == VCFaxProp )
+                                        type |= FAX;
+                                else if ( name == VCPagerProp )
+                                        type |= PAGER;
+                                else  if ( name == VCPreferredProp )
+                                        ;
+                                else
+                                        type |= UNKNOWN;
+                        }
+                        if ( (type & UNKNOWN) != UNKNOWN ) {
+                                if ( ( type & (HOME|WORK) ) == 0 ) // default
+                                        type |= HOME;
+                                if ( ( type & (VOICE|CELL|FAX|PAGER) ) == 0 ) // default
+                                        type |= VOICE;
+                                
+                                if ( (type & (VOICE|HOME) ) == (VOICE|HOME) )
+                                        c.setHomePhone( value );
+                                if ( ( type & (FAX|HOME) ) == (FAX|HOME) )
+                                        c.setHomeFax( value );
+                                if ( ( type & (CELL|HOME) ) == (CELL|HOME) )
+                                        c.setHomeMobile( value );
+                                if ( ( type & (VOICE|WORK) ) == (VOICE|WORK) )
+                                        c.setBusinessPhone( value );
+                                if ( ( type & (FAX|WORK) ) == (FAX|WORK) )
+                                        c.setBusinessFax( value );
+                                if ( ( type & (CELL|WORK) ) == (CELL|WORK) )
+                                        c.setBusinessMobile( value );
+                                if ( ( type & (PAGER|WORK) ) == (PAGER|WORK) )
+                                        c.setBusinessPager( value );
+                        }
+                }
+                else if ( name == VCEmailAddressProp ) {
+                        QString email = vObjectStringZValue( o );
+                        bool valid = TRUE;
+                        VObjectIterator nit;
+                        initPropIterator( &nit, o );
+                        while( moreIteration( &nit ) ) {
+                                VObject *o = nextVObject( &nit );
+                                QCString name = vObjectTypeInfo( o );
+                                if ( name != VCInternetProp && name != VCHomeProp &&
+                                     name != VCWorkProp &&
+                                     name != VCPreferredProp )
+                                        // ### preffered should map to default email
+                                        valid = FALSE;
+                        }
+                        if ( valid ) {
+                                c.insertEmail( email );
+                        }
+                }
+                else if ( name == VCURLProp ) {
+                        VObjectIterator nit;
+                        initPropIterator( &nit, o );
+                        while( moreIteration( &nit ) ) {
+                                VObject *o = nextVObject( &nit );
+                                QCString name = vObjectTypeInfo( o );
+                                if ( name == VCHomeProp )
+                                        c.setHomeWebpage( value );
+                                else if ( name == VCWorkProp )
+                                        c.setBusinessWebpage( value );
+                        }
+                }
+                else if ( name == VCOrgProp ) {
+                        VObjectIterator nit;
+                        initPropIterator( &nit, o );
+                        while( moreIteration( &nit ) ) {
+                                VObject *o = nextVObject( &nit );
+                                QCString name = vObjectName( o );
+                                QString value = vObjectStringZValue( o );
+                                if ( name == VCOrgNameProp )
+                                        c.setCompany( value );
+                                else if ( name == VCOrgUnitProp )
+                                        c.setDepartment( value );
+                                else if ( name == VCOrgUnit2Prop )
+                                        c.setOffice( value );
+                        }
+                }
+                else if ( name == VCTitleProp ) {
+                        c.setJobTitle( value );
+                }
+                else if ( name == "X-Qtopia-Profession" ) {
+                        c.setProfession( value );
+                }
+                else if ( name == "X-Qtopia-Manager" ) {
+                        c.setManager( value );
+                }
+                else if ( name == "X-Qtopia-Assistant" ) {
+                        c.setAssistant( value );
+                }
+                else if ( name == "X-Qtopia-Spouse" ) {
+                        c.setSpouse( value );
+                }
+                else if ( name == "X-Qtopia-Gender" ) {
+                        c.setGender( value );
+                }
+                else if ( name == "X-Qtopia-Anniversary" ) {
+                        c.setAnniversary( TimeConversion::fromString( value ) );
+                }
+                else if ( name == "X-Qtopia-Nickname" ) {
+                        c.setNickname( value );
+                }
+                else if ( name == "X-Qtopia-Children" ) {
+                        c.setChildren( value );
+                }
+                else if ( name == VCBirthDateProp ) {
+                        // Reading Birthdate regarding RFC 2425 (5.8.4)
+                        c.setBirthday( convVCardDateToDate( value ) );
+                        
+                }
+                
+#if 0
+                else {
+                        printf("Name: %s, value=%s\n", name.data(), vObjectStringZValue( o ) );
+                        VObjectIterator nit;
+                        initPropIterator( &nit, o );
+                        while( moreIteration( &nit ) ) {
+                                VObject *o = nextVObject( &nit );
+                                QCString name = vObjectName( o );
+                                QString value = vObjectStringZValue( o );
+                                printf(" subprop: %s = %s\n", name.data(), value.latin1() );
+                        }
+                }
+#endif
+        }
+        c.setFileAs();
+        return c;
+}
+
+
+VObject* OContactAccessBackend_VCard::createVObject( const OContact &c )
+{
+        VObject *vcard = newVObject( VCCardProp );
+        safeAddPropValue( vcard, VCVersionProp, "2.1" );
+        safeAddPropValue( vcard, VCLastRevisedProp, TimeConversion::toISO8601( QDateTime::currentDateTime() ) );
+        safeAddPropValue( vcard, VCUniqueStringProp, QString::number(c.uid()) );
+        
+        // full name
+        safeAddPropValue( vcard, VCFullNameProp, c.fullName() );
+        
+        // name properties
+        VObject *name = safeAddProp( vcard, VCNameProp );
+        safeAddPropValue( name, VCFamilyNameProp, c.lastName() );
+        safeAddPropValue( name, VCGivenNameProp, c.firstName() );
+        safeAddPropValue( name, VCAdditionalNamesProp, c.middleName() );
+        safeAddPropValue( name, VCNamePrefixesProp, c.title() );
+        safeAddPropValue( name, VCNameSuffixesProp, c.suffix() );
+        
+        // home properties
+        VObject *home_adr= safeAddProp( vcard, VCAdrProp );
+        safeAddProp( home_adr, VCHomeProp );
+        safeAddPropValue( home_adr, VCStreetAddressProp, c.homeStreet() );
+        safeAddPropValue( home_adr, VCCityProp, c.homeCity() );
+        safeAddPropValue( home_adr, VCRegionProp, c.homeState() );
+        safeAddPropValue( home_adr, VCPostalCodeProp, c.homeZip() );
+        safeAddPropValue( home_adr, VCCountryNameProp, c.homeCountry() );
+        
+        VObject *home_phone = safeAddPropValue( vcard, VCTelephoneProp, c.homePhone() );
+        safeAddProp( home_phone, VCHomeProp );
+        home_phone = safeAddPropValue( vcard, VCTelephoneProp, c.homeMobile() );
+        safeAddProp( home_phone, VCHomeProp );
+        safeAddProp( home_phone, VCCellularProp );
+        home_phone = safeAddPropValue( vcard, VCTelephoneProp, c.homeFax() );
+        safeAddProp( home_phone, VCHomeProp );
+        safeAddProp( home_phone, VCFaxProp );
+        
+        VObject *url = safeAddPropValue( vcard, VCURLProp, c.homeWebpage() );
+        safeAddProp( url, VCHomeProp );
+        
+        // work properties
+        VObject *work_adr= safeAddProp( vcard, VCAdrProp );
+        safeAddProp( work_adr, VCWorkProp );
+        safeAddPropValue( work_adr, VCStreetAddressProp, c.businessStreet() );
+        safeAddPropValue( work_adr, VCCityProp, c.businessCity() );
+        safeAddPropValue( work_adr, VCRegionProp, c.businessState() );
+        safeAddPropValue( work_adr, VCPostalCodeProp, c.businessZip() );
+        safeAddPropValue( work_adr, VCCountryNameProp, c.businessCountry() );
+        
+        VObject *work_phone = safeAddPropValue( vcard, VCTelephoneProp, c.businessPhone() );
+        safeAddProp( work_phone, VCWorkProp );
+        work_phone = safeAddPropValue( vcard, VCTelephoneProp, c.businessMobile() );
+        safeAddProp( work_phone, VCWorkProp );
+        safeAddProp( work_phone, VCCellularProp );
+        work_phone = safeAddPropValue( vcard, VCTelephoneProp, c.businessFax() );
+        safeAddProp( work_phone, VCWorkProp );
+        safeAddProp( work_phone, VCFaxProp );
+        work_phone = safeAddPropValue( vcard, VCTelephoneProp, c.businessPager() );
+        safeAddProp( work_phone, VCWorkProp );
+        safeAddProp( work_phone, VCPagerProp );
+        
+        url = safeAddPropValue( vcard, VCURLProp, c.businessWebpage() );
+        safeAddProp( url, VCWorkProp );
+        
+        VObject *title = safeAddPropValue( vcard, VCTitleProp, c.jobTitle() );
+        safeAddProp( title, VCWorkProp );
+        
+        
+        QStringList emails = c.emailList();
+        emails.prepend( c.defaultEmail() );
+        for( QStringList::Iterator it = emails.begin(); it != emails.end(); ++it ) {
+                VObject *email = safeAddPropValue( vcard, VCEmailAddressProp, *it );
+                safeAddProp( email, VCInternetProp );
+        }
+        
+        safeAddPropValue( vcard, VCNoteProp, c.notes() );
+        
+        // Exporting Birthday regarding RFC 2425 (5.8.4)
+        if ( c.birthday().isValid() ){
+                QString birthd_rfc2425 = QString("%1-%2-%3")
+                        .arg( c.birthday().year() )
+                        .arg( c.birthday().month(), 2 )
+                        .arg( c.birthday().day(), 2 );
+                // Now replace spaces with "0"...
+                int pos = 0;
+                while ( ( pos = birthd_rfc2425.find (' ')  ) > 0 )
+                        birthd_rfc2425.replace( pos, 1, "0" );
+                
+                qWarning("Exporting birthday as: %s", birthd_rfc2425.latin1());
+                safeAddPropValue( vcard, VCBirthDateProp, birthd_rfc2425.latin1() );
+        }
+        
+        if ( !c.company().isEmpty() || !c.department().isEmpty() || !c.office().isEmpty() ) {
+                VObject *org = safeAddProp( vcard, VCOrgProp );
+                safeAddPropValue( org, VCOrgNameProp, c.company() );
+                safeAddPropValue( org, VCOrgUnitProp, c.department() );
+                safeAddPropValue( org, VCOrgUnit2Prop, c.office() );
+        }
+        
+        // some values we have to export as custom fields
+        safeAddPropValue( vcard, "X-Qtopia-Profession", c.profession() );
+        safeAddPropValue( vcard, "X-Qtopia-Manager", c.manager() );
+        safeAddPropValue( vcard, "X-Qtopia-Assistant", c.assistant() );
+        
+        safeAddPropValue( vcard, "X-Qtopia-Spouse", c.spouse() );
+        safeAddPropValue( vcard, "X-Qtopia-Gender", c.gender() );
+        safeAddPropValue( vcard, "X-Qtopia-Anniversary", TimeConversion::toString( c.anniversary() ) );
+        safeAddPropValue( vcard, "X-Qtopia-Nickname", c.nickname() );
+        safeAddPropValue( vcard, "X-Qtopia-Children", c.children() );
+        
+        return vcard;
+}
+
+QDate OContactAccessBackend_VCard::convVCardDateToDate( const QString& datestr )
+{
+        int monthPos = datestr.find('-');
+        int dayPos = datestr.find('-', monthPos+1 );
+        int sep_ignore = 1;
+        if ( monthPos == -1 || dayPos == -1 ) {
+                qDebug("fromString didn't find - in str = %s; mpos = %d ypos = %d", datestr.latin1(), monthPos, dayPos );
+                // Ok.. No "-" found, therefore we will try to read other format ( YYYYMMDD )
+                if ( datestr.length() == 8 ){
+                        monthPos   = 4;
+                        dayPos     = 6;
+                        sep_ignore = 0;
+                        qDebug("Try with follwing positions str = %s; mpos = %d ypos = %d", datestr.latin1(), monthPos, dayPos );
+                } else {
+                        return QDate();
+                }
+        }
+        int y = datestr.left( monthPos ).toInt();
+        int m = datestr.mid( monthPos + sep_ignore, dayPos - monthPos - sep_ignore ).toInt();
+        int d = datestr.mid( dayPos + sep_ignore ).toInt();
+        qDebug("TimeConversion::fromString ymd = %s => %d %d %d; mpos = %d ypos = %d", datestr.latin1(), y, m, d, monthPos, dayPos);
+        QDate date ( y,m,d );
+        return date;
+}
+
+VObject* OContactAccessBackend_VCard::safeAddPropValue( VObject *o, const char *prop, const QString &value )
+{
+        VObject *ret = 0;
+        if ( o && !value.isEmpty() )
+                ret = addPropValue( o, prop, value.latin1() );
+        return ret;
+}
+
+VObject* OContactAccessBackend_VCard::safeAddProp( VObject *o, const char *prop)
+{
+        VObject *ret = 0;
+        if ( o )
+                ret = addProp( o, prop );
+        return ret;
+}
diff --git a/libopie/pim/ocontactaccessbackend_vcard.h b/libopie/pim/ocontactaccessbackend_vcard.h
new file mode 100644
index 0000000..c1422b0
--- a/dev/null
+++ b/libopie/pim/ocontactaccessbackend_vcard.h
@@ -0,0 +1,65 @@
+/*
+ * VCard Backend for the OPIE-Contact Database.
+ *
+ * Copyright (c) 2002 by Stefan Eilers (Eilers.Stefan@epost.de)
+ *
+ * =====================================================================
+         *This program 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.
+ * =====================================================================
+ * ToDo:
+ *
+ * =====================================================================
+ * Version: $Id$
+ * =====================================================================
+ * History:
+ * $Log$
+ * Revision 1.1  2002/11/09 14:34:52  eilers
+ * Added VCard Backend.
+ *
+ */
+#ifndef __OCONTACTACCESSBACKEND_VCARD_H_
+#define __OCONTACTACCESSBACKEND_VCARD_H_
+
+#include <opie/ocontact.h>
+
+#include "ocontactaccessbackend.h"
+
+class VObject;
+
+class OContactAccessBackend_VCard : public OContactAccessBackend {
+ public:
+        OContactAccessBackend_VCard ( QString appname, QString filename = 0l );
+
+        bool load ();
+        bool reload();
+        bool save();
+        void clear ();
+
+        bool add ( const OContact& newcontact );
+        bool remove ( int uid );
+        bool replace ( const OContact& contact );
+        
+        OContact find ( int uid ) const;
+        QArray<int> allRecords() const;
+        QArray<int> queryByExample ( const OContact &query, int settings );
+        QArray<int> matchRegexp(  const QRegExp &r ) const;
+
+        const uint querySettings();
+        bool hasQuerySettings (uint querySettings) const;
+        
+private:
+        OContact parseVObject( VObject* obj );
+        VObject* createVObject( const OContact& c );
+        QDate convVCardDateToDate( const QString& datestr );
+        VObject *safeAddPropValue( VObject *o, const char* prop, const QString& value );
+        VObject *safeAddProp( VObject* o, const char* prop);
+        
+        bool m_dirty : 1;
+        QString m_file;
+        QMap<int, OContact> m_map;
+};
+
+#endif
diff --git a/libopie2/opiepim/backend/ocontactaccessbackend_vcard.cpp b/libopie2/opiepim/backend/ocontactaccessbackend_vcard.cpp
new file mode 100644
index 0000000..903c0b7
--- a/dev/null
+++ b/libopie2/opiepim/backend/ocontactaccessbackend_vcard.cpp
@@ -0,0 +1,549 @@
+/*
+ * VCard Backend for the OPIE-Contact Database.
+ *
+ * Copyright (c) 2002 by Stefan Eilers (Eilers.Stefan@epost.de)
+ *
+ * =====================================================================
+         *This program 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.
+ * =====================================================================
+ * ToDo:
+ *
+ * =====================================================================
+ * Version: $Id$
+ * =====================================================================
+ * History:
+ * $Log$
+ * Revision 1.1  2002/11/09 14:34:52  eilers
+ * Added VCard Backend.
+ *
+ */
+#include "ocontactaccessbackend_vcard.h"
+#include "../../library/backend/vobject_p.h"
+#include "../../library/backend/qfiledirect_p.h"
+
+#include <qpe/timeconversion.h>
+
+#include <qfile.h>
+
+OContactAccessBackend_VCard::OContactAccessBackend_VCard ( QString , QString filename = 0l ):
+        m_dirty( false ),
+        m_file( filename )
+{}
+
+
+bool OContactAccessBackend_VCard::load ()
+{   
+        m_map.clear();
+        m_dirty = false;
+        
+        VObject* obj = 0l;
+        obj = Parse_MIME_FromFileName( QFile::encodeName(m_file).data() );
+        if ( !obj )
+                return false;
+
+        while ( obj ) {
+                OContact con = parseVObject( obj );
+                /*
+                 * if uid is 0 assign a new one
+                 * this at least happens on
+                 * Nokia6210
+                 */
+                if ( con.uid() == 0 ){
+                        con.setUid( 1 );
+                        qWarning("assigned new uid %d",con.uid() );
+                }
+
+                m_map.insert( con.uid(), con );
+                
+                VObject *t = obj;
+                obj = nextVObjectInList(obj);
+                cleanVObject( t );
+        }
+
+        return true;
+
+}
+bool OContactAccessBackend_VCard::reload()
+{
+        return load();
+}
+bool OContactAccessBackend_VCard::save()
+{ 
+        if (!m_dirty )
+                return true;
+
+        QFileDirect file( m_file );
+        if (!file.open(IO_WriteOnly ) )
+                return false;
+
+        VObject *obj;
+        obj = newVObject( VCCalProp );
+        addPropValue( obj, VCVersionProp, "1.0" );
+
+        VObject *vo;
+        for(QMap<int, OContact>::ConstIterator it=m_map.begin(); it !=m_map.end(); ++it ){
+                vo = createVObject( *it );
+                addVObjectProp( obj, vo );
+        }
+        writeVObject( file.directHandle() , obj );
+        cleanVObject( obj );
+        
+        cleanStrTbl();
+
+        m_dirty = false;
+        return true;
+        
+
+}
+void OContactAccessBackend_VCard::clear ()
+{
+        m_map.clear();
+        m_dirty = true; // ??? sure ? (se)
+}
+
+bool OContactAccessBackend_VCard::add ( const OContact& newcontact )
+{
+        m_map.insert( newcontact.uid(), newcontact );
+        m_dirty = true;
+        return true;
+}
+
+bool OContactAccessBackend_VCard::remove ( int uid )
+{
+        m_map.remove( uid );
+        m_dirty = true;
+                return true;
+}
+
+bool OContactAccessBackend_VCard::replace ( const OContact &contact )
+{
+        m_map.replace( contact.uid(), contact );
+        m_dirty = true;
+        return true;
+}
+        
+OContact OContactAccessBackend_VCard::find ( int uid ) const
+{
+    return m_map[uid];
+}
+
+QArray<int> OContactAccessBackend_VCard::allRecords() const
+{
+        QArray<int> ar( m_map.count() );
+        QMap<int, OContact>::ConstIterator it;
+        int i = 0;
+        for ( it = m_map.begin(); it != m_map.end(); ++it ) {
+                ar[i] = it.key();
+                i++;
+        }
+        return ar;
+}
+
+// Not implemented
+QArray<int> OContactAccessBackend_VCard::queryByExample ( const OContact&, int )
+{
+        QArray<int> ar(0);
+        return ar;
+}
+
+// Not implemented
+QArray<int> OContactAccessBackend_VCard::matchRegexp(  const QRegExp&  ) const
+{
+        QArray<int> ar(0);
+        return ar;
+}
+
+const uint OContactAccessBackend_VCard::querySettings()
+{
+        return 0; // No search possible
+}
+
+bool OContactAccessBackend_VCard::hasQuerySettings (uint ) const
+{
+        return false; // No search possible, therefore all settings invalid ;)
+}
+
+
+// *** Private stuff ***
+
+
+OContact OContactAccessBackend_VCard::parseVObject( VObject *obj )
+{
+        OContact c;
+        
+        VObjectIterator it;
+        initPropIterator( &it, obj );
+        while( moreIteration( &it ) ) {
+                VObject *o = nextVObject( &it );
+                QCString name = vObjectName( o );
+                QCString value = vObjectStringZValue( o );
+                if ( name == VCNameProp ) {
+                        VObjectIterator nit;
+                        initPropIterator( &nit, o );
+                        while( moreIteration( &nit ) ) {
+                                VObject *o = nextVObject( &nit );
+                                QCString name = vObjectTypeInfo( o );
+                                QString value = vObjectStringZValue( o );
+                                if ( name == VCNamePrefixesProp )
+                                        c.setTitle( value );
+                                else if ( name == VCNameSuffixesProp )
+                                        c.setSuffix( value );
+                                else if ( name == VCFamilyNameProp )
+                                        c.setLastName( value );
+                                else if ( name == VCGivenNameProp )
+                                        c.setFirstName( value );
+                                else if ( name == VCAdditionalNamesProp )
+                                        c.setMiddleName( value );
+                        }
+                }
+                else if ( name == VCAdrProp ) {
+                        bool work = TRUE; // default address is work address
+                        QString street;
+                        QString city;
+                        QString region;
+                        QString postal;
+                        QString country;
+                        
+                        VObjectIterator nit;
+                        initPropIterator( &nit, o );
+                        while( moreIteration( &nit ) ) {
+                                VObject *o = nextVObject( &nit );
+                                QCString name = vObjectName( o );
+                                QString value = vObjectStringZValue( o );
+                                if ( name == VCHomeProp )
+                                        work = FALSE;
+                                else if ( name == VCWorkProp )
+                                        work = TRUE;
+                                else if ( name == VCStreetAddressProp )
+                                        street = value;
+                                else if ( name == VCCityProp )
+                                        city = value;
+                                else if ( name == VCRegionProp )
+                                        region = value;
+                                else if ( name == VCPostalCodeProp )
+                                        postal = value;
+                                else if ( name == VCCountryNameProp )
+                                        country = value;
+                        }
+                        if ( work ) {
+                                c.setBusinessStreet( street );
+                                c.setBusinessCity( city );
+                                c.setBusinessCountry( country );
+                                c.setBusinessZip( postal );
+                                c.setBusinessState( region );
+                        } else {
+                                c.setHomeStreet( street );
+                                c.setHomeCity( city );
+                                c.setHomeCountry( country );
+                                c.setHomeZip( postal );
+                                c.setHomeState( region );
+                        }
+                }
+                else if ( name == VCTelephoneProp ) {
+                        enum {
+                                HOME = 0x01,
+                                WORK = 0x02,
+                                VOICE = 0x04,
+                                CELL = 0x08,
+                                FAX = 0x10,
+                                PAGER = 0x20,
+                                UNKNOWN = 0x80
+                        };
+                        int type = 0;
+                        
+                        VObjectIterator nit;
+                        initPropIterator( &nit, o );
+                        while( moreIteration( &nit ) ) {
+                                VObject *o = nextVObject( &nit );
+                                QCString name = vObjectTypeInfo( o );
+                                if ( name == VCHomeProp )
+                                        type |= HOME;
+                                else if ( name == VCWorkProp )
+                                        type |= WORK;
+                                else if ( name == VCVoiceProp )
+                                        type |= VOICE;
+                                else if ( name == VCCellularProp )
+                                        type |= CELL;
+                                else if ( name == VCFaxProp )
+                                        type |= FAX;
+                                else if ( name == VCPagerProp )
+                                        type |= PAGER;
+                                else  if ( name == VCPreferredProp )
+                                        ;
+                                else
+                                        type |= UNKNOWN;
+                        }
+                        if ( (type & UNKNOWN) != UNKNOWN ) {
+                                if ( ( type & (HOME|WORK) ) == 0 ) // default
+                                        type |= HOME;
+                                if ( ( type & (VOICE|CELL|FAX|PAGER) ) == 0 ) // default
+                                        type |= VOICE;
+                                
+                                if ( (type & (VOICE|HOME) ) == (VOICE|HOME) )
+                                        c.setHomePhone( value );
+                                if ( ( type & (FAX|HOME) ) == (FAX|HOME) )
+                                        c.setHomeFax( value );
+                                if ( ( type & (CELL|HOME) ) == (CELL|HOME) )
+                                        c.setHomeMobile( value );
+                                if ( ( type & (VOICE|WORK) ) == (VOICE|WORK) )
+                                        c.setBusinessPhone( value );
+                                if ( ( type & (FAX|WORK) ) == (FAX|WORK) )
+                                        c.setBusinessFax( value );
+                                if ( ( type & (CELL|WORK) ) == (CELL|WORK) )
+                                        c.setBusinessMobile( value );
+                                if ( ( type & (PAGER|WORK) ) == (PAGER|WORK) )
+                                        c.setBusinessPager( value );
+                        }
+                }
+                else if ( name == VCEmailAddressProp ) {
+                        QString email = vObjectStringZValue( o );
+                        bool valid = TRUE;
+                        VObjectIterator nit;
+                        initPropIterator( &nit, o );
+                        while( moreIteration( &nit ) ) {
+                                VObject *o = nextVObject( &nit );
+                                QCString name = vObjectTypeInfo( o );
+                                if ( name != VCInternetProp && name != VCHomeProp &&
+                                     name != VCWorkProp &&
+                                     name != VCPreferredProp )
+                                        // ### preffered should map to default email
+                                        valid = FALSE;
+                        }
+                        if ( valid ) {
+                                c.insertEmail( email );
+                        }
+                }
+                else if ( name == VCURLProp ) {
+                        VObjectIterator nit;
+                        initPropIterator( &nit, o );
+                        while( moreIteration( &nit ) ) {
+                                VObject *o = nextVObject( &nit );
+                                QCString name = vObjectTypeInfo( o );
+                                if ( name == VCHomeProp )
+                                        c.setHomeWebpage( value );
+                                else if ( name == VCWorkProp )
+                                        c.setBusinessWebpage( value );
+                        }
+                }
+                else if ( name == VCOrgProp ) {
+                        VObjectIterator nit;
+                        initPropIterator( &nit, o );
+                        while( moreIteration( &nit ) ) {
+                                VObject *o = nextVObject( &nit );
+                                QCString name = vObjectName( o );
+                                QString value = vObjectStringZValue( o );
+                                if ( name == VCOrgNameProp )
+                                        c.setCompany( value );
+                                else if ( name == VCOrgUnitProp )
+                                        c.setDepartment( value );
+                                else if ( name == VCOrgUnit2Prop )
+                                        c.setOffice( value );
+                        }
+                }
+                else if ( name == VCTitleProp ) {
+                        c.setJobTitle( value );
+                }
+                else if ( name == "X-Qtopia-Profession" ) {
+                        c.setProfession( value );
+                }
+                else if ( name == "X-Qtopia-Manager" ) {
+                        c.setManager( value );
+                }
+                else if ( name == "X-Qtopia-Assistant" ) {
+                        c.setAssistant( value );
+                }
+                else if ( name == "X-Qtopia-Spouse" ) {
+                        c.setSpouse( value );
+                }
+                else if ( name == "X-Qtopia-Gender" ) {
+                        c.setGender( value );
+                }
+                else if ( name == "X-Qtopia-Anniversary" ) {
+                        c.setAnniversary( TimeConversion::fromString( value ) );
+                }
+                else if ( name == "X-Qtopia-Nickname" ) {
+                        c.setNickname( value );
+                }
+                else if ( name == "X-Qtopia-Children" ) {
+                        c.setChildren( value );
+                }
+                else if ( name == VCBirthDateProp ) {
+                        // Reading Birthdate regarding RFC 2425 (5.8.4)
+                        c.setBirthday( convVCardDateToDate( value ) );
+                        
+                }
+                
+#if 0
+                else {
+                        printf("Name: %s, value=%s\n", name.data(), vObjectStringZValue( o ) );
+                        VObjectIterator nit;
+                        initPropIterator( &nit, o );
+                        while( moreIteration( &nit ) ) {
+                                VObject *o = nextVObject( &nit );
+                                QCString name = vObjectName( o );
+                                QString value = vObjectStringZValue( o );
+                                printf(" subprop: %s = %s\n", name.data(), value.latin1() );
+                        }
+                }
+#endif
+        }
+        c.setFileAs();
+        return c;
+}
+
+
+VObject* OContactAccessBackend_VCard::createVObject( const OContact &c )
+{
+        VObject *vcard = newVObject( VCCardProp );
+        safeAddPropValue( vcard, VCVersionProp, "2.1" );
+        safeAddPropValue( vcard, VCLastRevisedProp, TimeConversion::toISO8601( QDateTime::currentDateTime() ) );
+        safeAddPropValue( vcard, VCUniqueStringProp, QString::number(c.uid()) );
+        
+        // full name
+        safeAddPropValue( vcard, VCFullNameProp, c.fullName() );
+        
+        // name properties
+        VObject *name = safeAddProp( vcard, VCNameProp );
+        safeAddPropValue( name, VCFamilyNameProp, c.lastName() );
+        safeAddPropValue( name, VCGivenNameProp, c.firstName() );
+        safeAddPropValue( name, VCAdditionalNamesProp, c.middleName() );
+        safeAddPropValue( name, VCNamePrefixesProp, c.title() );
+        safeAddPropValue( name, VCNameSuffixesProp, c.suffix() );
+        
+        // home properties
+        VObject *home_adr= safeAddProp( vcard, VCAdrProp );
+        safeAddProp( home_adr, VCHomeProp );
+        safeAddPropValue( home_adr, VCStreetAddressProp, c.homeStreet() );
+        safeAddPropValue( home_adr, VCCityProp, c.homeCity() );
+        safeAddPropValue( home_adr, VCRegionProp, c.homeState() );
+        safeAddPropValue( home_adr, VCPostalCodeProp, c.homeZip() );
+        safeAddPropValue( home_adr, VCCountryNameProp, c.homeCountry() );
+        
+        VObject *home_phone = safeAddPropValue( vcard, VCTelephoneProp, c.homePhone() );
+        safeAddProp( home_phone, VCHomeProp );
+        home_phone = safeAddPropValue( vcard, VCTelephoneProp, c.homeMobile() );
+        safeAddProp( home_phone, VCHomeProp );
+        safeAddProp( home_phone, VCCellularProp );
+        home_phone = safeAddPropValue( vcard, VCTelephoneProp, c.homeFax() );
+        safeAddProp( home_phone, VCHomeProp );
+        safeAddProp( home_phone, VCFaxProp );
+        
+        VObject *url = safeAddPropValue( vcard, VCURLProp, c.homeWebpage() );
+        safeAddProp( url, VCHomeProp );
+        
+        // work properties
+        VObject *work_adr= safeAddProp( vcard, VCAdrProp );
+        safeAddProp( work_adr, VCWorkProp );
+        safeAddPropValue( work_adr, VCStreetAddressProp, c.businessStreet() );
+        safeAddPropValue( work_adr, VCCityProp, c.businessCity() );
+        safeAddPropValue( work_adr, VCRegionProp, c.businessState() );
+        safeAddPropValue( work_adr, VCPostalCodeProp, c.businessZip() );
+        safeAddPropValue( work_adr, VCCountryNameProp, c.businessCountry() );
+        
+        VObject *work_phone = safeAddPropValue( vcard, VCTelephoneProp, c.businessPhone() );
+        safeAddProp( work_phone, VCWorkProp );
+        work_phone = safeAddPropValue( vcard, VCTelephoneProp, c.businessMobile() );
+        safeAddProp( work_phone, VCWorkProp );
+        safeAddProp( work_phone, VCCellularProp );
+        work_phone = safeAddPropValue( vcard, VCTelephoneProp, c.businessFax() );
+        safeAddProp( work_phone, VCWorkProp );
+        safeAddProp( work_phone, VCFaxProp );
+        work_phone = safeAddPropValue( vcard, VCTelephoneProp, c.businessPager() );
+        safeAddProp( work_phone, VCWorkProp );
+        safeAddProp( work_phone, VCPagerProp );
+        
+        url = safeAddPropValue( vcard, VCURLProp, c.businessWebpage() );
+        safeAddProp( url, VCWorkProp );
+        
+        VObject *title = safeAddPropValue( vcard, VCTitleProp, c.jobTitle() );
+        safeAddProp( title, VCWorkProp );
+        
+        
+        QStringList emails = c.emailList();
+        emails.prepend( c.defaultEmail() );
+        for( QStringList::Iterator it = emails.begin(); it != emails.end(); ++it ) {
+                VObject *email = safeAddPropValue( vcard, VCEmailAddressProp, *it );
+                safeAddProp( email, VCInternetProp );
+        }
+        
+        safeAddPropValue( vcard, VCNoteProp, c.notes() );
+        
+        // Exporting Birthday regarding RFC 2425 (5.8.4)
+        if ( c.birthday().isValid() ){
+                QString birthd_rfc2425 = QString("%1-%2-%3")
+                        .arg( c.birthday().year() )
+                        .arg( c.birthday().month(), 2 )
+                        .arg( c.birthday().day(), 2 );
+                // Now replace spaces with "0"...
+                int pos = 0;
+                while ( ( pos = birthd_rfc2425.find (' ')  ) > 0 )
+                        birthd_rfc2425.replace( pos, 1, "0" );
+                
+                qWarning("Exporting birthday as: %s", birthd_rfc2425.latin1());
+                safeAddPropValue( vcard, VCBirthDateProp, birthd_rfc2425.latin1() );
+        }
+        
+        if ( !c.company().isEmpty() || !c.department().isEmpty() || !c.office().isEmpty() ) {
+                VObject *org = safeAddProp( vcard, VCOrgProp );
+                safeAddPropValue( org, VCOrgNameProp, c.company() );
+                safeAddPropValue( org, VCOrgUnitProp, c.department() );
+                safeAddPropValue( org, VCOrgUnit2Prop, c.office() );
+        }
+        
+        // some values we have to export as custom fields
+        safeAddPropValue( vcard, "X-Qtopia-Profession", c.profession() );
+        safeAddPropValue( vcard, "X-Qtopia-Manager", c.manager() );
+        safeAddPropValue( vcard, "X-Qtopia-Assistant", c.assistant() );
+        
+        safeAddPropValue( vcard, "X-Qtopia-Spouse", c.spouse() );
+        safeAddPropValue( vcard, "X-Qtopia-Gender", c.gender() );
+        safeAddPropValue( vcard, "X-Qtopia-Anniversary", TimeConversion::toString( c.anniversary() ) );
+        safeAddPropValue( vcard, "X-Qtopia-Nickname", c.nickname() );
+        safeAddPropValue( vcard, "X-Qtopia-Children", c.children() );
+        
+        return vcard;
+}
+
+QDate OContactAccessBackend_VCard::convVCardDateToDate( const QString& datestr )
+{
+        int monthPos = datestr.find('-');
+        int dayPos = datestr.find('-', monthPos+1 );
+        int sep_ignore = 1;
+        if ( monthPos == -1 || dayPos == -1 ) {
+                qDebug("fromString didn't find - in str = %s; mpos = %d ypos = %d", datestr.latin1(), monthPos, dayPos );
+                // Ok.. No "-" found, therefore we will try to read other format ( YYYYMMDD )
+                if ( datestr.length() == 8 ){
+                        monthPos   = 4;
+                        dayPos     = 6;
+                        sep_ignore = 0;
+                        qDebug("Try with follwing positions str = %s; mpos = %d ypos = %d", datestr.latin1(), monthPos, dayPos );
+                } else {
+                        return QDate();
+                }
+        }
+        int y = datestr.left( monthPos ).toInt();
+        int m = datestr.mid( monthPos + sep_ignore, dayPos - monthPos - sep_ignore ).toInt();
+        int d = datestr.mid( dayPos + sep_ignore ).toInt();
+        qDebug("TimeConversion::fromString ymd = %s => %d %d %d; mpos = %d ypos = %d", datestr.latin1(), y, m, d, monthPos, dayPos);
+        QDate date ( y,m,d );
+        return date;
+}
+
+VObject* OContactAccessBackend_VCard::safeAddPropValue( VObject *o, const char *prop, const QString &value )
+{
+        VObject *ret = 0;
+        if ( o && !value.isEmpty() )
+                ret = addPropValue( o, prop, value.latin1() );
+        return ret;
+}
+
+VObject* OContactAccessBackend_VCard::safeAddProp( VObject *o, const char *prop)
+{
+        VObject *ret = 0;
+        if ( o )
+                ret = addProp( o, prop );
+        return ret;
+}
diff --git a/libopie2/opiepim/backend/ocontactaccessbackend_vcard.h b/libopie2/opiepim/backend/ocontactaccessbackend_vcard.h
new file mode 100644
index 0000000..c1422b0
--- a/dev/null
+++ b/libopie2/opiepim/backend/ocontactaccessbackend_vcard.h
@@ -0,0 +1,65 @@
+/*
+ * VCard Backend for the OPIE-Contact Database.
+ *
+ * Copyright (c) 2002 by Stefan Eilers (Eilers.Stefan@epost.de)
+ *
+ * =====================================================================
+         *This program 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.
+ * =====================================================================
+ * ToDo:
+ *
+ * =====================================================================
+ * Version: $Id$
+ * =====================================================================
+ * History:
+ * $Log$
+ * Revision 1.1  2002/11/09 14:34:52  eilers
+ * Added VCard Backend.
+ *
+ */
+#ifndef __OCONTACTACCESSBACKEND_VCARD_H_
+#define __OCONTACTACCESSBACKEND_VCARD_H_
+
+#include <opie/ocontact.h>
+
+#include "ocontactaccessbackend.h"
+
+class VObject;
+
+class OContactAccessBackend_VCard : public OContactAccessBackend {
+ public:
+        OContactAccessBackend_VCard ( QString appname, QString filename = 0l );
+
+        bool load ();
+        bool reload();
+        bool save();
+        void clear ();
+
+        bool add ( const OContact& newcontact );
+        bool remove ( int uid );
+        bool replace ( const OContact& contact );
+        
+        OContact find ( int uid ) const;
+        QArray<int> allRecords() const;
+        QArray<int> queryByExample ( const OContact &query, int settings );
+        QArray<int> matchRegexp(  const QRegExp &r ) const;
+
+        const uint querySettings();
+        bool hasQuerySettings (uint querySettings) const;
+        
+private:
+        OContact parseVObject( VObject* obj );
+        VObject* createVObject( const OContact& c );
+        QDate convVCardDateToDate( const QString& datestr );
+        VObject *safeAddPropValue( VObject *o, const char* prop, const QString& value );
+        VObject *safeAddProp( VObject* o, const char* prop);
+        
+        bool m_dirty : 1;
+        QString m_file;
+        QMap<int, OContact> m_map;
+};
+
+#endif