/******************************************************************/
/* KCharSelectDia - (c) by Reginald Stadlbauer 1999               */
/* Author: Reginald Stadlbauer                                    */
/* E-Mail: reggie@kde.org                                         */
/*         RTL support by Bryce Nesbitt                           */
/******************************************************************/

#include "kcharselectdia.moc"

#include <stdlib.h>

#include <tqcursor.h>
#include <tqtimer.h>

#include <kdialog.h>
#include <tdeapplication.h>
#include <tdeaccel.h>
#include <tdeconfig.h>
#include <tdelistview.h>
#include <tdelistviewsearchline.h>
#include <tdelocale.h>
#include <tdeaction.h>

/******************************************************************/
/* class KCharSelectDia                                           */
/******************************************************************/

//==================================================================
KCharSelectDia::KCharSelectDia(TQWidget *parent,const char *name,
			       const TQChar &_chr,const TQString &_font,
			       int _tableNum, bool direction)
  : TDEMainWindow(parent,name), vChr(_chr), vFont(_font)
{
  setCaption(TQString()); // Standard caption

  TQWidget *mainWidget = new TQWidget(this);
  setCentralWidget(mainWidget);

  grid = new TQGridLayout( mainWidget, 3, 4, KDialog::marginHint(), KDialog::spacingHint() );

  // Add character selection widget from library tdeui
  charSelect = new KCharSelect(mainWidget,"",vFont,vChr,_tableNum);
  charSelect->resize(charSelect->sizeHint());
  connect(charSelect,TQ_SIGNAL(highlighted(const TQChar &)),
	  TQ_SLOT(charChanged(const TQChar &)));
  connect(charSelect,TQ_SIGNAL(activated(const TQChar &)),
	  TQ_SLOT(add(const TQChar &)));
  connect(charSelect,TQ_SIGNAL(fontChanged(const TQString &)),
	  TQ_SLOT(fontSelected(const TQString &)));
  grid->addMultiCellWidget(charSelect, 0, 0, 0, 3);

  // Add category browser dock widget
  dCategories = new TQDockWindow(this, "categories");

  TQVBox *cvbox = new TQVBox(dCategories);

  categories = new TDEListView(cvbox, "dock_categories");
  categories->addColumn(i18n("Codepoint"));
  categories->addColumn(i18n("Name"));
  categories->setRootIsDecorated(true);
  categories->setResizeMode(TQListView::LastColumn);
  categories->setAllColumnsShowFocus(true);
  connect(categories, TQ_SIGNAL(currentChanged(TQListViewItem*)), this, TQ_SLOT(categorySelected(TQListViewItem*)));

  TDEListViewSearchLineWidget *lvsw = new TDEListViewSearchLineWidget(categories, cvbox);

  dCategories->setWidget(cvbox);
  dCategories->setCaption(i18n("Categories"));
  dCategories->setHorizontallyStretchable(true);
  dCategories->setVerticallyStretchable(true);
  dCategories->setResizeEnabled(true);
  dCategories->setCloseMode(TQDockWindow::Always);

  // BUG TDEMainWindow::saveMainWindowSettings() does not save TQDockWindow settings
  TDEConfig *config = tdeApp->config();
  config->setGroup("Docks");
  TQt::Dock categoriesDock = (TQt::Dock)config->readNumEntry("Categories dock", TQt::DockLeft);
  int categoriesIndex      = config->readNumEntry("Categories index", 0);
  bool categoriesNewline   = config->readBoolEntry("Categories nl", false);
  int categoriesOffset     = config->readNumEntry("Categories offset", 0);
  int categoriesSize       = config->readNumEntry("Categories size", -1);
  bool categoriesShown     = config->readBoolEntry("Categories shown", true);

  addDockWindow(dCategories, i18n("Categories"), categoriesDock);
  moveDockWindow(dCategories, categoriesDock, categoriesNewline, categoriesIndex, categoriesOffset);
  if (categoriesSize >= 0)
  {
      if (dCategories->orientation() == TQt::Horizontal)
      {
          dCategories->setFixedExtentHeight(categoriesSize);
      }
      else
      {
          dCategories->setFixedExtentWidth(categoriesSize);
      }
  }

  TDEToggleAction *tCategories = new TDEToggleAction(i18n("Show categories dock"), 0,
        this, TQ_SLOT(toggleCategoriesDock()), actionCollection(), "show_categories");

  tCategories->setChecked(categoriesShown);
  dCategories->setShown(categoriesShown);

#include "categories.h"

  TQTimer::singleShot(0, this, TQ_SLOT(populateCategories()));

  // Build line editor
  lined = new TQLineEdit(mainWidget);
  lined->resize(lined->sizeHint());

  TQFont font = lined->font();
  font.setFamily( vFont );
  lined->setFont( font );

  connect(lined,TQ_SIGNAL(textChanged(const TQString &)),
	  TQ_SLOT(lineEditChanged()));
  grid->addMultiCellWidget(lined, 1, 1, 0, 3);

  // Build some buttons
  bHelp = new KPushButton( KStdGuiItem::help(), mainWidget );
  connect(bHelp,TQ_SIGNAL(clicked()),this,TQ_SLOT(help()));
  bHelp->setFixedSize( bHelp->sizeHint() );
  grid->addWidget( bHelp, 2, 0 );

  TQSpacerItem *space = new TQSpacerItem( 20, 20, TQSizePolicy::Expanding );
  grid->addItem( space, 2, 1 );

  bClear = new KPushButton( KStdGuiItem::clear(), mainWidget );
  connect(bClear,TQ_SIGNAL(clicked()),this,TQ_SLOT(clear()));
  bClear->setFixedSize( bClear->sizeHint() );
  grid->addWidget( bClear, 2, 2 );

  bClip = new KPushButton( KGuiItem( i18n( "&To Clipboard" ),
            "edit-copy" ), mainWidget );
  bClip->setFixedSize( bClip->sizeHint() );
  connect(bClip,TQ_SIGNAL(clicked()),this,TQ_SLOT(toClip()));
  grid->addWidget( bClip, 2, 3 );

  // Build menu
  KStdAction::quit( this, TQ_SLOT(_exit()), actionCollection() );

  new TDEAction(i18n("&To Clipboard"), "edit-copy",
         TDEStdAccel::shortcut(TDEStdAccel::Copy), this, TQ_SLOT(toClip()), actionCollection(), "copy_clip" );

  (void)new TDEAction(i18n("To Clipboard &UTF-8"), 0, this,
    TQ_SLOT(toClipUTF8()), actionCollection(), "copy_utf_8" );
  (void)new TDEAction(i18n("To Clipboard &HTML"), 0, this,
      TQ_SLOT(toClipHTML()), actionCollection(), "copy_html" );

  new TDEAction(i18n("&From Clipboard"), "edit-paste",
         TDEStdAccel::shortcut(TDEStdAccel::Paste), this, TQ_SLOT(fromClip()), actionCollection(), "from_clip" );
  (void)new TDEAction(i18n("From Clipboard UTF-8"), 0, this,
      TQ_SLOT(fromClipUTF8()), actionCollection(), "from_clip_utf8" );

  i18n("From Clipboard HTML");      // Intended for future use

  KStdAction::clear(this, TQ_SLOT(clear()), actionCollection(), "clear");
  (void)new TDEAction(i18n("&Flip"), 0, this,
      TQ_SLOT(flipText()), actionCollection(), "flip" );
  (void)new TDEAction(i18n("&Alignment"), 0, this,
      TQ_SLOT(toggleEntryDirection()), actionCollection(), "alignment" );

  charSelect->setFocus();

  entryDirection = direction;
  if( entryDirection )
    lined->setAlignment( TQt::AlignRight );
  else
    lined->setAlignment( TQt::AlignLeft );

  setupGUI(Keys|StatusBar|Save|Create);
}

//==================================================================
void KCharSelectDia::charChanged(const TQChar &_chr)
{
  if (vChr == _chr) return;
  vChr = _chr;
  updateCurrentCategory();
}

//==================================================================
void KCharSelectDia::fontSelected(const TQString &_font)
{
  charSelect->setFont(_font);

  TQFont font = lined->font();
  font.setFamily( _font );
  lined->setFont( font );

  vFont = _font;
}

//==================================================================
void KCharSelectDia::add(const TQChar &_chr)
{
  TQString str;
  int cursorPos;

  charChanged(_chr);

  str       = lined->text();
  cursorPos = lined->cursorPosition();
  str.insert( cursorPos, vChr );
  lined->setText(str);
  cursorPos++;
  lined->setCursorPosition( cursorPos );
}

//==================================================================
void KCharSelectDia::toClip()
{
  TQClipboard *cb = TQApplication::clipboard();
  cb->setSelectionMode( true );
  cb->setText(lined->text());
  cb->setSelectionMode( false );
  cb->setText(lined->text());
}

//==================================================================
// UTF-8 is rapidly becoming the favored 8-bit encoding for
// Unicode (iso10646-1).
//
void KCharSelectDia::toClipUTF8()
{
  TQClipboard *cb = TQApplication::clipboard();
  TQString str = lined->text();
  cb->setText(str.utf8());
}

//==================================================================
//  Put valid HTML 4.0 into the clipboard.  Valid ISO-8859-1 Latin 1
//  characters are left undisturbed.  Everything else, including the
//  "c0 control characters" often used by Windows, are clipped
//  as a HTML entity.
//
void KCharSelectDia::toClipHTML()
{
  TQClipboard *cb = TQApplication::clipboard();
  TQString input;
  TQString html;
  TQString tempstring;
  TQChar   tempchar;
  uint i;

  input = lined->text();
  for(i=0; i< input.length(); i++ )
    {
      tempchar = input.at(i);
      if(  tempchar.latin1() && ((tempchar.unicode() < 128) || (tempchar.unicode() >= 128+32)) )
        {
          html.append(input.at(i));
        }
      else
        {
          html.append(tempstring.sprintf("&#x%x;", tempchar.unicode()));
        }
    }
  cb->setText(html);
}

//==================================================================
//
void KCharSelectDia::fromClip()
{
  TQClipboard *cb = TQApplication::clipboard();
  lined->setText( cb->text() );
}

//==================================================================
// UTF-8 is rapidly becoming the favored 8-bit encoding for
// Unicode (iso10646-1).  This function is handy for decoding
// UTF-8 found in legacy applications, consoles, filenames, webpages,
// etc.
//
void KCharSelectDia::fromClipUTF8()
{
  TQClipboard *cb = TQApplication::clipboard();
  TQString str = cb->text();

  lined->setText( str.fromUtf8( str.latin1() ) );
}

//==================================================================
//  Reverse the text held in the line edit buffer.  This is crucial
//  for dealing with visual vs. logical representations of
//  right to left languages, and handy for working around all
//  manner of legacy character order issues.
//
void KCharSelectDia::flipText()
{
  TQString input;
  TQString output;
  uint i;

  input = lined->text();
  for(i=0; i< input.length(); i++ )
    {
      output.prepend( input.at(i) );
    }
  lined->setText(output);
}

//==================================================================
void KCharSelectDia::toggleEntryDirection()
{
    entryDirection ^= 1;
    if( entryDirection )
        lined->setAlignment( TQt::AlignRight );
    else
        lined->setAlignment( TQt::AlignLeft );
}

//==================================================================
void KCharSelectDia::lineEditChanged()
{
    if( entryDirection )
      {
        if(lined->cursorPosition())
            lined->setCursorPosition( lined->cursorPosition() - 1 );
      }
}

//==================================================================
void KCharSelectDia::_exit()
{
  TDEConfig *config = tdeApp->config();

  config->setGroup("General");
  config->writeEntry("selectedFont",vFont);
  config->writeEntry("char",static_cast<int>(vChr.unicode()));
  config->writeEntry("table",charSelect->tableNum());
  config->writeEntry("entryDirection",entryDirection);

  // BUG TDEMainWindow::saveMainWindowSettings() does not save TQDockWindow settings
  TQt::Dock dock; int index, offset; bool nl;
  if (getLocation(dCategories, dock, index, nl, offset))
  {
    config->setGroup("Docks");
    config->writeEntry("Categories dock", dock);
    config->writeEntry("Categories index", index);
    config->writeEntry("Categories nl", nl);
    config->writeEntry("Categories offset", offset);
    config->writeEntry("Categories shown", dCategories->isShown());

    if (dCategories->orientation() == TQt::Horizontal)
    {
      config->writeEntry("Categories size", dCategories->height());
    }
    else
    {
      config->writeEntry("Categories size", dCategories->width());
    }
  }
  config->sync();

  delete this;
  exit(0);
}

//==================================================================
void KCharSelectDia::clear()
{
  lined->clear();
}

//==================================================================
void KCharSelectDia::help()
{
  tdeApp->invokeHelp();
}

//==================================================================
void KCharSelectDia::populateCategories()
{
    categories->setCursor(TQCursor(TQt::BusyCursor));
    categories->setEnabled(false);

    TQMap<int, TQString>::iterator cit;
    for (cit = mCategories.begin(); cit != mCategories.end(); ++cit)
    {
        TQString uc = TQString("%1").arg(cit.key(), 4, 16).replace(' ', '0');
        TQStringList cdata = TQStringList::split("|", cit.data());
        TQString category = cdata[0];
        TQListViewItem *cItem = categories->findItem(category, 1);
        if (!cItem)
        {
            cItem = new TQListViewItem(categories, uc, category);
        }

        if (cdata.count() > 1)
        {
            TQString subcategory = cdata[1];
            new TQListViewItem(cItem, uc, subcategory);
        }

        tqApp->processEvents();
    }

    categories->setEnabled(true);
    categories->setCursor(TQCursor(TQt::ArrowCursor));
    updateCurrentCategory();
}

//==================================================================
void KCharSelectDia::categorySelected(TQListViewItem *category)
{
    bool ok;
    const int uc = category->text(0).toInt(&ok, 16);
    if (!ok) return;

    const int table = uc / 256;
    charSelect->setTableNum(table);

    const TQChar ch(uc);
    charSelect->setChar(ch);
}

//==================================================================
// Returns the category index corresponding to _chr
int KCharSelectDia::categoryIndex(TQChar &_chr)
{
    TQMap<int, TQString>::iterator cit;
    int uc = -1;
    for (cit = mCategories.begin(); cit != mCategories.end(); ++cit)
    {
        if (cit.key() > vChr.unicode()) break;
        uc = cit.key();
    }
    return uc;
}

//==================================================================
// Updates category dock to reflect the category of the currently selected character
void KCharSelectDia::updateCurrentCategory()
{
    int uc = categoryIndex(vChr);
    if (uc < 0) return;

    TQString codepoint = TQString("%1").arg(uc, 4, 16).replace(' ', '0');

    TQListViewItem *lvi = categories->findItem(codepoint, 0);
    if (!lvi) return;

    categories->blockSignals(true);
    categories->setCurrentItem(lvi);
    categories->ensureItemVisible(lvi);
    categories->blockSignals(false);
}

//==================================================================
void KCharSelectDia::toggleCategoriesDock()
{
    dCategories->setShown(static_cast<const TDEToggleAction*>(TQObject::sender())->isChecked());
}