/*
Copyright (C) 1999-2007 id Software, Inc. and contributors.
For a list of contributors, see the accompanying CONTRIBUTORS file.

This file is part of GtkRadiant.

GtkRadiant 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.

GtkRadiant 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 GtkRadiant; if not, write to the Free Software
Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
*/

//-----------------------------------------------------------------------------
//
// DESCRIPTION:
// classes used for describing geometry information from q3map feedback
//

#include "stdafx.h"

#include "feedback.h"
#include "glib.h"
#include <assert.h>

CDbgDlg g_DbgDlg;

void CSelectMsg::saxStartElement (message_info_t *ctx, const xmlChar *name, const xmlChar **attrs)
{
  if (strcmp ((char *)name, "select")==0)
  {
    // read the message
    ESelectState = SELECT_MESSAGE;
  }
  else
  {
    // read the brush
    assert (strcmp ((char *)name, "brush")==0);
    assert (ESelectState == SELECT_MESSAGE);
    ESelectState = SELECT_BRUSH;
  }
}

void CSelectMsg::saxEndElement (message_info_t *ctx, const xmlChar *name)
{
  if (strcmp ((char *)name, "select")==0)
  {
    ctx->bGeometry = false;
  }
}

void CSelectMsg::saxCharacters (message_info_t *ctx, const xmlChar *ch, int len)
{
  if (ESelectState == SELECT_MESSAGE)
  {
    message = g_string_sized_new (len+1);
    memcpy (message->str, ch, len);
    message->str[len]='\0';
    Sys_Printf ("%s\n", message->str);
  }
  else
  {
    assert (ESelectState == SELECT_BRUSH);
    sscanf ((char *)ch, "%i %i", &entitynum, &brushnum);
  }
}

void CSelectMsg::Highlight ()
{
  Select_Deselect ();
  SelectBrush (entitynum, brushnum);
}

void CPointMsg::saxStartElement (message_info_t *ctx, const xmlChar *name, const xmlChar **attrs)
{
  if (strcmp ((char *)name, "pointmsg")==0)
  {
    // read the message
    EPointState = POINT_MESSAGE;
  }
  else
  {
    // read the brush
    assert (strcmp ((char *)name, "point")==0);
    assert (EPointState == POINT_MESSAGE);
    EPointState = POINT_POINT;
  }
}

void CPointMsg::saxEndElement (message_info_t *ctx, const xmlChar *name)
{
  if (strcmp ((char *)name, "pointmsg")==0)
  {
    ctx->bGeometry = false;
  }
}

void CPointMsg::saxCharacters (message_info_t *ctx, const xmlChar *ch, int len)
{
  if (EPointState == POINT_MESSAGE)
  {
    message = g_string_sized_new (len+1);
    memcpy (message->str, ch, len);
    message->str[len]='\0';
    Sys_Printf ("%s\n", message->str);
  }
  else
  {
    assert (EPointState == POINT_POINT);
    sscanf ((char *)ch, "%g %g %g", &(pt[0]), &(pt[1]), &(pt[2]));
  }
}

void CPointMsg::Highlight ()
{
  // use the entity API to push a point
  // the API requires a ref count, we do it manually for the current instance
  if (refCount == 0)
  {
    refCount++;
    QERApp_HookGL2DWindow (this);
  }
}

void CPointMsg::DropHighlight ()
{
  assert (refCount > 0);
  QERApp_UnHookGL2DWindow (this);
  // do a refCount-- locally (see Highlight)
  refCount--;
}

void CPointMsg::Draw2D( VIEWTYPE vt )
{
  int nDim1 = (vt == YZ) ? 1 : 0;
  int nDim2 = (vt == XY) ? 1 : 2;
  qglPointSize(4);
  qglColor3f(1.0f,0.0f,0.0f);
  qglBegin (GL_POINTS);
  qglVertex2f (pt[nDim1], pt[nDim2]);
  qglEnd();
  qglBegin (GL_LINE_LOOP);
  qglVertex2f (pt[nDim1]-8, pt[nDim2]-8);
  qglVertex2f (pt[nDim1]+8, pt[nDim2]-8);
  qglVertex2f (pt[nDim1]+8, pt[nDim2]+8);
  qglVertex2f (pt[nDim1]-8, pt[nDim2]+8);
  qglEnd();
}

void CWindingMsg::saxStartElement (message_info_t *ctx, const xmlChar *name, const xmlChar **attrs)
{
  if (strcmp ((char *)name, "windingmsg")==0)
  {
    // read the message
    EPointState = WINDING_MESSAGE;
  }
  else
  {
    // read the brush
    assert (strcmp ((char *)name, "winding")==0);
    assert (EPointState == WINDING_MESSAGE);
    EPointState = WINDING_WINDING;
  }
}

void CWindingMsg::saxEndElement (message_info_t *ctx, const xmlChar *name)
{
  if (strcmp ((char *)name, "windingmsg")==0)
  {
    ctx->bGeometry = false;
  }
}

void CWindingMsg::saxCharacters (message_info_t *ctx, const xmlChar *ch, int len)
{
  if (EPointState == WINDING_MESSAGE)
  {
    message = g_string_sized_new (len+1);
    memcpy (message->str, ch, len);
    message->str[len]='\0';
    Sys_Printf ("%s\n", message->str);
  }
  else
  {
    char* c;
    int i;

    assert (EPointState == WINDING_WINDING);


    c = (char*)ch;
    sscanf (c, "%i ", &numpoints);

    for(i = 0; i < numpoints; i++)
    {
      c = strchr(++c, '(');
      if (c) // even if we are given the number of points when the cycle begins .. don't trust it too much
        sscanf(c, "(%g %g %g)", &wt[i][0], &wt[i][1], &wt[i][2]);
      else
        break;
    }
    numpoints = i;
  }
}

void CWindingMsg::Highlight ()
{
  // use the entity API to push a point
  // the API requires a ref count, we do it manually for the current instance
  if (refCount == 0)
  {
    refCount++;
    QERApp_HookGL2DWindow (this);
  }
}

void CWindingMsg::DropHighlight ()
{
  assert (refCount > 0);
  QERApp_UnHookGL2DWindow (this);
  // do a refCount-- locally (see Highlight)
  refCount--;
}

void CWindingMsg::Draw2D( VIEWTYPE vt )
{
  int i;

  int nDim1 = (vt == YZ) ? 1 : 0;
  int nDim2 = (vt == XY) ? 1 : 2;
  qglColor3f(1.0f,0.f,0.0f);

  qglPointSize(4);
  qglBegin (GL_POINTS);
  for(i = 0; i < numpoints; i++)
  	qglVertex2f (wt[i][nDim1], wt[i][nDim2]);
  qglEnd();
  qglPointSize(1);

  qglEnable (GL_BLEND);
  qglPolygonMode (GL_FRONT_AND_BACK, GL_FILL);
  qglBlendFunc (GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);
  qglColor4f(0.133f,0.4f,1.0f,0.5f);
  qglBegin (GL_POLYGON);
	for(i = 0; i < numpoints; i++)
		qglVertex2f (wt[i][nDim1], wt[i][nDim2]);
  qglEnd();
  qglDisable (GL_BLEND);
}

// triggered when the user selects an entry in the feedback box
static void feedback_selection_changed(GtkTreeSelection* selection, gpointer data)
{
  g_DbgDlg.DropHighlight();

  GtkTreeModel* model;
  GtkTreeIter selected;
  if(gtk_tree_selection_get_selected(selection, &model, &selected))
  {
    GtkTreePath* path = gtk_tree_model_get_path(model, &selected);
      g_DbgDlg.SetHighlight(gtk_tree_path_get_indices(path)[0]);
    gtk_tree_path_free(path);
  }
}

void CDbgDlg::DropHighlight()
{
  if (m_pHighlight)
  {
    m_pHighlight->DropHighlight();
    m_pHighlight = NULL;
  }
}

void CDbgDlg::SetHighlight(gint row)
{
  ISAXHandler *h = GetElement(row);
  if (h != NULL)
  {
    h->Highlight();
    m_pHighlight = h;
  }
}

ISAXHandler *CDbgDlg::GetElement (gint row)
{
  return static_cast<ISAXHandler *>(g_ptr_array_index(m_pFeedbackElements, row));
}

void CDbgDlg::Init ()
{
  DropHighlight();

  // free all the ISAXHandler*, clean it
  while (m_pFeedbackElements->len)
  {
    delete static_cast<ISAXHandler *>(g_ptr_array_index (m_pFeedbackElements, 0));
    g_ptr_array_remove_index (m_pFeedbackElements, 0);
  }

  if (m_clist != NULL)
    gtk_list_store_clear (m_clist);
}

void CDbgDlg::Push (ISAXHandler *pHandler)
{
  // push in the list
  g_ptr_array_add (m_pFeedbackElements, (void *)pHandler);

  if (m_pWidget == NULL)
    Create();
  // put stuff in the list
  gtk_list_store_clear (m_clist);
  for(unsigned int i = 0; i < m_pFeedbackElements->len; ++i)
  {
    GtkTreeIter iter;
    gtk_list_store_append(m_clist, &iter);
    gtk_list_store_set(m_clist, &iter, 0, GetElement(i)->getName(), -1);
  }

  ShowDlg();
}

void CDbgDlg::BuildDialog ()
{
  gtk_window_set_title (GTK_WINDOW (m_pWidget), "Q3Map debug window");

  GtkWidget* scr = gtk_scrolled_window_new (NULL, NULL);
  gtk_widget_show (scr);
  gtk_container_add (GTK_CONTAINER (m_pWidget), GTK_WIDGET (scr));
  gtk_scrolled_window_set_policy (GTK_SCROLLED_WINDOW (scr), GTK_POLICY_NEVER, GTK_POLICY_AUTOMATIC);
  gtk_scrolled_window_set_shadow_type(GTK_SCROLLED_WINDOW(scr), GTK_SHADOW_IN);

  {
    GtkListStore* store = gtk_list_store_new(1, G_TYPE_STRING);

    GtkWidget* view = gtk_tree_view_new_with_model(GTK_TREE_MODEL(store));
    gtk_tree_view_set_headers_visible(GTK_TREE_VIEW(view), FALSE);

    {
      GtkCellRenderer* renderer = gtk_cell_renderer_text_new();
      GtkTreeViewColumn* column = gtk_tree_view_column_new_with_attributes("", renderer, "text", 0, NULL);
      gtk_tree_view_append_column(GTK_TREE_VIEW(view), column);
    }

    {
      GtkTreeSelection* selection = gtk_tree_view_get_selection(GTK_TREE_VIEW(view));
      gtk_tree_selection_set_mode(selection, GTK_SELECTION_BROWSE);
      g_signal_connect(G_OBJECT(selection), "changed", G_CALLBACK(feedback_selection_changed), NULL);
    }

    gtk_widget_show(view);

    gtk_container_add(GTK_CONTAINER (scr), view);

    g_object_unref(G_OBJECT(store));

    m_clist = store;
  }
}