/* -*- mode: C++; c-file-style: "gnu" -*-
 * kmail: KDE mail client
 * Copyright (c) 1996-1998 Stefan Taferner <taferner@kde.org>
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 2 of the License, or
 * (at your option) any later version.
 *
 * This program 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 General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License along
 * with this program; if not, write to the Free Software Foundation, Inc.,
 * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
 *
 */
#include "kmaddrbook.h"
#include "kcursorsaver.h"

#include <akonadi/contact/contactsearchjob.h>
#include <akonadi/contact/contactgroupsearchjob.h>

#include <kdebug.h>
#include <klocale.h>
#include <kmessagebox.h>

#include <QtCore/QRegExp>

#include <unistd.h>

void KabcBridge::addresses(QStringList& result) // includes lists
{
  KCursorSaver busy(KBusyPtr::busy()); // loading might take a while

  Akonadi::ContactSearchJob *job = new Akonadi::ContactSearchJob();
  if ( !job->exec() )
    return;

  const KABC::Addressee::List contacts = job->contacts();
  foreach ( const KABC::Addressee &contact, contacts ) {
    const QStringList emails = contact.emails();
    QString n = contact.prefix() + ' ' +
                contact.givenName() + ' ' +
                contact.additionalName() + ' ' +
                contact.familyName() + ' ' +
                contact.suffix();
    n = n.simplified();

    QRegExp needQuotes("[^ 0-9A-Za-z\\x0080-\\xFFFF]");
    QString endQuote = "\" ";
    QStringList::ConstIterator mit;
    QString addr, email;

    for ( mit = emails.begin(); mit != emails.end(); ++mit ) {
      email = *mit;
      if (!email.isEmpty()) {
        if (n.isEmpty() || (email.contains( '<' ) ))
          addr.clear();
        else { // do we really need quotes around this name ?
          if (n.contains(needQuotes) )
            addr = '"' + n + endQuote;
          else
            addr = n + ' ';
        }

        if (!addr.isEmpty() && !(email.contains( '<' ) )
            && !(email.contains( '>' ) )
            && !(email.contains( ',' ) ))
          addr += '<' + email + '>';
        else
          addr += email;
        addr = addr.trimmed();
        result.append( addr );
      }
    }
  }

  Akonadi::ContactGroupSearchJob *groupJob = new Akonadi::ContactGroupSearchJob();
  if ( !groupJob->exec() )
    return;

  const KABC::ContactGroup::List contactGroups = groupJob->contactGroups();
  foreach ( const KABC::ContactGroup &group, contactGroups )
    result.append( group.name() );

  result.sort();
}

QStringList KabcBridge::addresses()
{
  QStringList entries;

  Akonadi::ContactSearchJob *job = new Akonadi::ContactSearchJob();
  if ( !job->exec() )
    return QStringList();

  const KABC::Addressee::List contacts = job->contacts();
  foreach ( const KABC::Addressee &contact, contacts )
    entries.append( contact.fullEmail() );

  return entries;
}

//-----------------------------------------------------------------------------
QString KabcBridge::expandNickName( const QString& nickName )
{
  if ( nickName.isEmpty() )
    return QString();

  const QString lowerNickName = nickName.toLower();

  Akonadi::ContactSearchJob *job = new Akonadi::ContactSearchJob();
  job->setQuery( Akonadi::ContactSearchJob::NickName, lowerNickName );
  if ( !job->exec() )
    return QString();

  const KABC::Addressee::List contacts = job->contacts();
  foreach ( const KABC::Addressee &contact, contacts ) {
    if ( contact.nickName().toLower() == lowerNickName )
      return contact.fullEmail();
  }

  return QString();
}


//-----------------------------------------------------------------------------

QStringList KabcBridge::categories()
{
  QStringList allcategories, aux;

  //TODO: Retrieve the categories from Nepomuk directly?!?
  Akonadi::ContactSearchJob *job = new Akonadi::ContactSearchJob();
  if ( !job->exec() )
    return QStringList();

  const KABC::Addressee::List contacts = job->contacts();
  foreach ( const KABC::Addressee &contact, contacts ) {
    aux = contact.categories();
    for ( QStringList::ConstIterator itAux = aux.constBegin();
          itAux != aux.constEnd(); ++itAux ) {
      // don't have duplicates in allcategories
      if ( !allcategories.contains( *itAux )  )
        allcategories += *itAux;
    }
  }

  return allcategories;
}