/*-*- c++ -*-********************************************************
 * wxLwindow.h : a scrolled Window for displaying/entering rich text*
 *                                                                  *
 * (C) 1998 by Karsten Ballüder (Ballueder@usa.net)                 *
 *                                                                  *
 * $Id$
 *******************************************************************/

#ifdef __GNUG__
#   pragma implementation "wxlwindow.h"
#endif

#include   "wxlwindow.h"

#define   VAR(x)   cout << #x"=" << x << endl;

BEGIN_EVENT_TABLE(wxLayoutWindow,wxScrolledWindow)
   EVT_PAINT  (wxLayoutWindow::OnPaint)
   EVT_CHAR   (wxLayoutWindow::OnChar)
   EVT_LEFT_DOWN(wxLayoutWindow::OnMouse)
END_EVENT_TABLE()

wxLayoutWindow::wxLayoutWindow(wxWindow *parent)
   : wxScrolledWindow(parent)
{
   m_ScrollbarsSet = false;
   m_EventId = 0;
}

void
wxLayoutWindow::OnMouse(wxMouseEvent& event)
{
   if(m_EventId == 0) // nothing to do
      return;
   
   // this is unintuitive
   wxClientDC dc(this);
   PrepareDC( dc );

   m_FindPos.x = dc.DeviceToLogicalX( event.GetX() );
   m_FindPos.y = dc.DeviceToLogicalY( event.GetY() );

   m_FoundObject = NULL;

#ifdef   WXLAYOUT_DEBUG
   cerr << "OnMouse: " << m_FindPos.x << ',' << m_FindPos.y << endl;
#endif
   Refresh();
   if(m_FoundObject)
   {
      if(m_EventId)
      {
         wxCommandEvent commandEvent(wxEVENT_TYPE_MENU_COMMAND, m_EventId);
         commandEvent.SetEventObject( this );
         commandEvent.SetClientData((char *)m_FoundObject);
         m_ClickPosition = wxPoint(event.GetX(), event.GetY());
         GetEventHandler()->ProcessEvent(commandEvent);
      }
   }
}

/*
 * some simple keyboard handling
 */
void
wxLayoutWindow::OnChar(wxKeyEvent& event)
{
   if(! m_llist.IsEditable()) // do nothing
   {
      event.Skip();
      return;
   }
   
   long keyCode = event.KeyCode();
   wxPoint p;
   
   switch(event.KeyCode())
   {
      case WXK_RIGHT:
      m_llist.MoveCursor(1);
      break;
   case WXK_LEFT:
      m_llist.MoveCursor(-1);
      break;
   case WXK_UP:
      m_llist.MoveCursor(0,-1);
      break;
   case WXK_DOWN:
      m_llist.MoveCursor(0,1);
      break;
   case WXK_PRIOR:
      m_llist.MoveCursor(0,-20);
      break;
   case WXK_NEXT:
      m_llist.MoveCursor(0,20);
      break;
   case WXK_HOME:
      p = m_llist.GetCursor();
      p.x = 0;
      m_llist.SetCursor(p);
      break;
   case WXK_END:
      p = m_llist.GetCursor();
      p.x = m_llist.GetLineLength(m_llist.FindCurrentObject(NULL));
      m_llist.SetCursor(p);
      break;
   case WXK_DELETE :
      m_llist.Delete(1);
      break;
   case WXK_BACK: // backspace
      m_llist.MoveCursor(-1);
      m_llist.Delete(1);
      break;
   case WXK_RETURN:
      m_llist.LineBreak();
      break;
#ifdef WXLAYOUT_DEBUG   
   case WXK_F1:
      m_llist.Debug();
      break;
#endif 
   default:
      if(keyCode < 256 && keyCode >= 32)
      {
         String tmp;
         tmp += keyCode;
         m_llist.Insert(tmp);
      }
      break;
   }
   Refresh();
   UpdateScrollbars();
}

void
wxLayoutWindow::OnPaint( wxPaintEvent &WXUNUSED(event)w)  // or: OnDraw(wxDC& dc)
{
   wxPaintDC dc( this );  // only when used as OnPaint for OnDraw we
   PrepareDC( dc );       // can skip the first two lines

   if(m_EventId) // look for keyclicks
      m_FoundObject = m_llist.Draw(dc,true,m_FindPos);
   else
      m_llist.Draw(dc);
   if(! m_ScrollbarsSet)
   {
      m_ScrollbarsSet = true; // avoid recursion
      UpdateScrollbars();
   }
}

void
wxLayoutWindow::UpdateScrollbars(void)
{
   CoordType
      max_x, max_y, lineHeight;
   
   m_llist.GetSize(&max_x, &max_y, &lineHeight);
   SetScrollbars(10, lineHeight, max_x/10+1, max_y/lineHeight+1);
   EnableScrolling(true,true);
}

void
wxLayoutWindow::Print(void)
{
   VAR(wxThePrintSetupData);

   wxPostScriptDC   dc("layout.ps",true,this);
   if (dc.Ok() && dc.StartDoc((char *)_("Printing message...")))
   {
      //dc.SetUserScale(1.0, 1.0);
      m_llist.Draw(dc);
      dc.EndDoc();
   }
}