/*
  This file is part of KOrganizer.

  Copyright (c) 1999 Preston Brown <pbrown@kde.org>
  Copyright (c) 2000,2001 Cornelius Schumacher <schumacher@kde.org>
  Copyright (C) 2003-2004 Reinhold Kainhofer <reinhold@kainhofer.com>

  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.

  As a special exception, permission is given to link this program
  with any edition of Qt, and distribute the resulting executable,
  without including the source code for Qt in the source distribution.
*/

#include "kolistview.h"
#include "koeventpopupmenu.h"
#include "koglobals.h"
#include "kohelper.h"
#include "koprefs.h"

#include <KCal/IncidenceFormatter>
#include <KCal/Calendar>
#include <KCal/Todo>
#include <KCal/Journal>

#include <QBoxLayout>

#ifdef __GNUC__
#warning Port me!
#endif
#if 0
KOListViewToolTip::KOListViewToolTip( QWidget *parent, K3ListView *lv )
  :QToolTip( parent )
{
  eventlist = lv;
}

void KOListViewToolTip::maybeTip( const QPoint &pos )
{
  QRect r;
  Q3ListViewItem *it = eventlist->itemAt( pos );
  KOListViewItem *i = static_cast<KOListViewItem*>( it );

  if ( i && KOPrefs::instance()->mEnableToolTips ) {
    /* Calculate the rectangle. */
    r = eventlist->itemRect( it );

    /* Show the tip */
    QString tipText( IncidenceFormatter::toolTipString( i->data() ) );
    if ( !tipText.isEmpty() ) {
      tip( r, tipText );
    }
  }
}
#endif

/**
  This class provides the initialization of a KOListViewItem for calendar
  components using the Incidence::Visitor.
*/
class KOListView::ListItemVisitor : public IncidenceBase::Visitor
{
  public:
    ListItemVisitor( KOListViewItem *item ) : mItem( item ) {}
    ~ListItemVisitor() {}

    bool visit( Event * );
    bool visit( Todo * );
    bool visit( Journal * );
    bool visit( FreeBusy * ) { // to inhibit hidden virtual compile warning
      return true;
    };
  private:
    KOListViewItem *mItem;
};

bool KOListView::ListItemVisitor::visit( Event *e )
{
  mItem->setText( 0, e->summary() );
  if ( e->isAlarmEnabled() ) {
    static const QPixmap alarmPxmp = KOGlobals::self()->smallIcon( "appointment-reminder" );
    mItem->setPixmap( 1, alarmPxmp );
    mItem->setSortKey( 1, "1" );
  } else {
    mItem->setSortKey( 1, "0" );
  }

  if ( e->recurs() ) {
    static const QPixmap recurPxmp = KOGlobals::self()->smallIcon( "appointment-recurring" );
    mItem->setPixmap( 2, recurPxmp );
    mItem->setSortKey( 2, "1" );
  } else {
    mItem->setSortKey( 2, "0" );
  }

  QPixmap eventPxmp;
  if ( e->customProperty( "KABC", "BIRTHDAY" ) == "YES" ) {
    if ( e->customProperty( "KABC", "ANNIVERSARY" ) == "YES" ) {
      eventPxmp = KOGlobals::self()->smallIcon( "view-calendar-wedding-anniversary" );
    } else {
      eventPxmp = KOGlobals::self()->smallIcon( "view-calendar-birthday" );
    }
  } else {
    eventPxmp = KOGlobals::self()->smallIcon( "view-calendar-day" );
  }

  mItem->setPixmap( 0, eventPxmp );

  mItem->setText( 3, IncidenceFormatter::dateToString(
                    e->dtStart(), true, KOPrefs::instance()->timeSpec() ) );
  mItem->setSortKey( 3, e->dtStart().toTimeSpec(
                       KOPrefs::instance()->timeSpec() ).toString( KDateTime::ISODate ) );
  if ( e->allDay() ) {
    mItem->setText( 4, "---" );
  } else {
    mItem->setText( 4, IncidenceFormatter::timeToString(
                      e->dtStart(), true, KOPrefs::instance()->timeSpec() ) );
    mItem->setSortKey( 4, e->dtStart().toTimeSpec(
                         KOPrefs::instance()->timeSpec() ).time().toString( Qt::ISODate ) );
  }
  mItem->setText( 5, IncidenceFormatter::dateToString(
                    e->dtEnd(), true, KOPrefs::instance()->timeSpec() ) );
  mItem->setSortKey( 5, e->dtEnd().toTimeSpec(
                       KOPrefs::instance()->timeSpec() ).toString( KDateTime::ISODate ) );
  if ( e->allDay() ) {
    mItem->setText( 6, "---" );
  } else {
    mItem->setText( 6, IncidenceFormatter::timeToString(
                      e->dtEnd(), true, KOPrefs::instance()->timeSpec() ) );
    mItem->setSortKey( 6, e->dtEnd().toTimeSpec(
                         KOPrefs::instance()->timeSpec() ).time().toString( Qt::ISODate ) );
  }
  mItem->setText( 7, e->categoriesStr() );

  return true;
}

bool KOListView::ListItemVisitor::visit( Todo *t )
{
  static const QPixmap todoPxmp = KOGlobals::self()->smallIcon( "view-calendar-tasks" );
  static const QPixmap todoDonePxmp = KOGlobals::self()->smallIcon( "task-complete" );
  mItem->setPixmap( 0, t->isCompleted() ? todoDonePxmp : todoPxmp );
  mItem->setText( 0, t->summary() );
  if ( t->isAlarmEnabled() ) {
    static const QPixmap alarmPxmp = KOGlobals::self()->smallIcon( "appointment-reminder" );
    mItem->setPixmap( 1, alarmPxmp );
    mItem->setSortKey( 1, "1" );
  } else {
    mItem->setSortKey( 1, "0" );
  }

  if ( t->recurs() ) {
    static const QPixmap recurPxmp = KOGlobals::self()->smallIcon( "appointment-recurring" );
    mItem->setPixmap( 2, recurPxmp );
    mItem->setSortKey( 2, "1" );
  } else {
    mItem->setSortKey( 2, "0" );
  }

  if ( t->hasStartDate() ) {
    mItem->setText( 3, IncidenceFormatter::dateToString(
                      t->dtStart(), true, KOPrefs::instance()->timeSpec() ) );
    mItem->setSortKey( 3, t->dtStart().toTimeSpec(
                         KOPrefs::instance()->timeSpec() ).toString( KDateTime::ISODate ) );
    if ( t->allDay() ) {
      mItem->setText( 4, "---" );
    } else {
      mItem->setText( 4, IncidenceFormatter::timeToString(
                        t->dtStart(), true, KOPrefs::instance()->timeSpec() ) );
      mItem->setSortKey( 4, t->dtStart().toTimeSpec(
                           KOPrefs::instance()->timeSpec() ).time().toString( Qt::ISODate ) );
    }
  } else {
    mItem->setText( 3, "---" );
    mItem->setText( 4, "---" );
  }

  if ( t->hasDueDate() ) {
    mItem->setText( 5, IncidenceFormatter::dateToString(
                      t->dtDue(), true, KOPrefs::instance()->timeSpec() ) );
    mItem->setSortKey( 5, t->dtDue().toTimeSpec(
                         KOPrefs::instance()->timeSpec() ).toString( KDateTime::ISODate ) );
    if ( t->allDay() ) {
      mItem->setText( 6, "---" );
    } else {
      mItem->setText( 6, IncidenceFormatter::timeToString(
                        t->dtDue(), true, KOPrefs::instance()->timeSpec() ) );
      mItem->setSortKey( 6, t->dtDue().time().toString( Qt::ISODate ) );
    }
  } else {
    mItem->setText( 5, "---" );
    mItem->setText( 6, "---" );
  }
  mItem->setText( 7, t->categoriesStr() );

  return true;
}

bool KOListView::ListItemVisitor::visit( Journal *t )
{
  static const QPixmap jrnalPxmp = KOGlobals::self()->smallIcon( "view-pim-journal" );
  mItem->setPixmap( 0, jrnalPxmp );
  if ( t->summary().isEmpty() ) {
    mItem->setText( 0, t->description().section( '\n', 0, 0 ) );
  } else {
    mItem->setText( 0, t->summary() );
  }
  mItem->setText( 3, IncidenceFormatter::dateToString(
                    t->dtStart(), true, KOPrefs::instance()->timeSpec() ) );
  mItem->setSortKey( 3, t->dtStart().toString( KDateTime::ISODate ) );

  return true;
}

KOListView::KOListView( Calendar *calendar, QWidget *parent )
  : KOEventView( calendar, parent )
{
  mActiveItem = 0;

  mListView = new K3ListView( this );
  mListView->addColumn( i18n( "Summary" ) );
  mListView->addColumn( i18n( "Reminder" ) ); // alarm set?
  mListView->addColumn( i18n( "Recurs" ) ); // recurs?
  mListView->addColumn( i18n( "Start Date" ) );
  mListView->setColumnAlignment( 3, Qt::AlignHCenter );
  mListView->addColumn( i18n( "Start Time" ) );
  mListView->setColumnAlignment( 4, Qt::AlignHCenter );
  mListView->addColumn( i18n( "End Date" ) );
  mListView->setColumnAlignment( 5, Qt::AlignHCenter );
  mListView->addColumn( i18n( "End Time" ) );
  mListView->setColumnAlignment( 6, Qt::AlignHCenter );
  mListView->addColumn( i18n( "Categories" ) );

  QBoxLayout *layoutTop = new QVBoxLayout( this );
  layoutTop->setMargin( 0 );
  layoutTop->addWidget( mListView );

  mPopupMenu = eventPopup();
/*
  mPopupMenu->addSeparator();
  mPopupMenu->insertItem(i18n("Show Dates"), this,
                      SLOT(showDates()));
  mPopupMenu->insertItem(i18n("Hide Dates"), this,
                      SLOT(hideDates()));
*/

  QObject::connect( mListView, SIGNAL(doubleClicked(Q3ListViewItem *)),
                    SLOT(defaultItemAction(Q3ListViewItem *)) );
  QObject::connect( mListView, SIGNAL(returnPressed(Q3ListViewItem *)),
                    SLOT(defaultItemAction(Q3ListViewItem *)) );
  QObject::connect( mListView,
                    SIGNAL(rightButtonClicked(Q3ListViewItem *,const QPoint &,int)),
                    SLOT(popupMenu(Q3ListViewItem *,const QPoint &,int)) );
  QObject::connect( mListView, SIGNAL(selectionChanged()),
                    SLOT(processSelectionChange()) );

  mListView->restoreLayout( KOGlobals::self()->config(), "KOListView Layout" );

#ifdef __GNUC__
#warning Port me!
#endif
//  new KOListViewToolTip( mListView->viewport(), mListView );

  mSelectedDates.append( QDate::currentDate() );
}

KOListView::~KOListView()
{
  delete mPopupMenu;
}

int KOListView::maxDatesHint()
{
  return 0;
}

int KOListView::currentDateCount()
{
  return mSelectedDates.count();
}

Incidence::List KOListView::selectedIncidences()
{
  Incidence::List eventList;

  Q3ListViewItem *item = mListView->selectedItem();
  if ( item ) {
    KOListViewItem *i = static_cast<KOListViewItem *>( item );
    eventList.append( i->data() );
  }

  return eventList;
}

DateList KOListView::selectedIncidenceDates()
{
  return mSelectedDates;
}

void KOListView::showDates( bool show )
{
  // Shouldn't we set it to a value greater 0? When showDates is called with
  // show == true at first, then the columnwidths are set to zero.
  static int oldColWidth1 = 0;
  static int oldColWidth3 = 0;

  if ( !show ) {
    oldColWidth1 = mListView->columnWidth( 1 );
    oldColWidth3 = mListView->columnWidth( 3 );
    mListView->setColumnWidth( 1, 0 );
    mListView->setColumnWidth( 3, 0 );
  } else {
    mListView->setColumnWidth( 1, oldColWidth1 );
    mListView->setColumnWidth( 3, oldColWidth3 );
  }
  mListView->repaint();
}

void KOListView::showDates()
{
  showDates( true );
}

void KOListView::hideDates()
{
  showDates( false );
}

void KOListView::updateView()
{
  kDebug() << "not implemented yet";
}

void KOListView::showDates( const QDate &start, const QDate &end )
{
  clear();

  mStartDate = start;
  mEndDate = end;

  QDate date = start;
  while ( date <= end ) {
    addIncidences( calendar()->incidences( date ), date );
    mSelectedDates.append( date );
    date = date.addDays( 1 );
  }

  emit incidenceSelected( 0, QDate() );
}

void KOListView::addIncidences( const Incidence::List &incidenceList, const QDate &date )
{
  Incidence::List::ConstIterator it;
  for ( it = incidenceList.begin(); it != incidenceList.end(); ++it ) {
    addIncidence( *it, date );
  }
}

void KOListView::addIncidence( Incidence *incidence, const QDate &date )
{
  if ( mUidList.contains( incidence->uid() ) ) {
    return;
  }

  mDateList[incidence->uid()] = date;
  mUidList.append( incidence->uid() );

  Incidence *tinc = incidence;
  if ( tinc->customProperty( "KABC", "BIRTHDAY" ) == "YES" ||
       tinc->customProperty( "KABC", "ANNIVERSARY" ) == "YES" ) {
    int years = KOHelper::yearDiff( tinc->dtStart().date(), mEndDate );
    if ( years > 0 ) {
      tinc = incidence->clone();
      tinc->setReadOnly( false );
      tinc->setSummary( i18np( "%2 (1 year)", "%2 (%1 years)", years, incidence->summary() ) );
      tinc->setReadOnly( true );
    }
  }

  KOListViewItem *item = new KOListViewItem( tinc, mListView );
  ListItemVisitor v( item );
  if ( tinc->accept( v ) ) {
    return;
  } else {
    delete item;
  }
}

void KOListView::showIncidences( const Incidence::List &incidenceList, const QDate &date )
{
  clear();

  addIncidences( incidenceList, date );

  // After new creation of list view no events are selected.
  emit incidenceSelected( 0, date );
}

void KOListView::changeIncidenceDisplay( Incidence *incidence, int action )
{
  KOListViewItem *item;
  QDate f = mSelectedDates.first();
  QDate l = mSelectedDates.last();

  QDate date;
  if ( incidence->type() == "Todo" ) {
    date = static_cast<Todo *>( incidence )->dtDue().
           toTimeSpec( KOPrefs::instance()->timeSpec() ).date();
  } else {
    date = incidence->dtStart().
           toTimeSpec( KOPrefs::instance()->timeSpec() ).date();
  }

  switch( action ) {
  case KOGlobals::INCIDENCEADDED:
  {
    if ( date >= f && date <= l ) {
      addIncidence( incidence, date );
    }
    break;
  }
  case KOGlobals::INCIDENCEEDITED:
  {
    item = getItemForIncidence( incidence );
    if ( item ) {
      delete item;
      mUidList.removeAll( incidence->uid() );
      mDateList.remove( incidence->uid() );
    }
    if ( date >= f && date <= l ) {
      addIncidence( incidence, date );
    }
    break;
  }
  case KOGlobals::INCIDENCEDELETED:
  {
    item = getItemForIncidence( incidence );
    if ( item ) {
      delete item;
    }
    break;
  }
  default:
    kDebug() << "Illegal action" << action;
  }
}

KOListViewItem *KOListView::getItemForIncidence( Incidence *incidence )
{
  KOListViewItem *item = (KOListViewItem *)mListView->firstChild();
  while ( item ) {
    if ( item->data() == incidence ) {
      return item;
    }
    item = static_cast<KOListViewItem *>( item->nextSibling() );
  }
  return 0;
}

void KOListView::defaultItemAction( Q3ListViewItem *i )
{
  KOListViewItem *item = static_cast<KOListViewItem *>( i );
  if ( item ) {
    defaultAction( item->data() );
  }
}

void KOListView::popupMenu( Q3ListViewItem *item, const QPoint &, int )
{
  mActiveItem = static_cast<KOListViewItem *>( item );
  if ( mActiveItem ) {
    Incidence *incidence = mActiveItem->data();
    // FIXME: For recurring incidences we don't know the date of this
    // occurrence, there's no reference to it at all!
    mPopupMenu->showIncidencePopup( calendar(), incidence, incidence->dtStart().date() );
  } else {
    showNewEventPopup();
  }
}

void KOListView::readSettings( KConfig *config )
{
  mListView->restoreLayout( config, "KOListView Layout" );
}

void KOListView::writeSettings( KConfig *config )
{
  mListView->saveLayout( config, "KOListView Layout" );
}

void KOListView::processSelectionChange()
{
  KOListViewItem *item = static_cast<KOListViewItem *>( mListView->selectedItem() );

  if ( !item ) {
    emit incidenceSelected( 0, QDate() );
  } else {
    Incidence *incidence = static_cast<Incidence *>( item->data() );
    emit incidenceSelected( incidence, mDateList[incidence->uid()] );
  }
}

void KOListView::clearSelection()
{
  mListView->selectAll( false );
}

void KOListView::clear()
{
  mSelectedDates.clear();
  mListView->clear();
  mDateList.clear();
  mUidList.clear();
}

KOrg::CalPrinterBase::PrintType KOListView::printType()
{
  return KOrg::CalPrinterBase::Incidence;
}

#include "kolistview.moc"
