Added widgets/e-paned/Makefile.

2000-05-24  Christopher James Lahey  <clahey@helixcode.com>

	* configure.in: Added widgets/e-paned/Makefile.

	* tests/ui-tests/message-browser.c: Switched from GtkPaned to
	EPaned.

	* widgets/Makefile.am: Added e-paned directory.

	* widgets/e-paned/, widgets/e-paned/.cvsignore,
	widgets/e-paned/Makefile.am, widgets/e-paned/e-hpaned.c,
	widgets/e-paned/e-hpaned.h, widgets/e-paned/e-paned.c,
	widgets/e-paned/e-paned.h, widgets/e-paned/e-vpaned.c,
	widgets/e-paned/e-vpaned.h: New widget based completely on
	GtkPaned from 1.4.  This will be more advanced soon.

From calendar/ChangeLog:

2000-05-24  Christopher James Lahey  <clahey@helixcode.com>

	* gui/Makefile.am: Added libepaned.a.

	* gui/gnome-cal.c: Switched from GtkPaned to EPaned.

From mail/ChangeLog:

2000-05-24  Christopher James Lahey  <clahey@helixcode.com>

	* Makefile.am: Added libepaned.a.

	* folder-browser.c: Switched from GtkPaned to EPaned.

From shell/ChangeLog:

2000-05-24  Christopher James Lahey  <clahey@helixcode.com>

	* Makefile.am: Added libepaned.a.

	* e-shell-view.c: Switched from GtkPaned to EPaned.

From widgets/shortcut-bar/ChangeLog:

2000-05-24  Christopher James Lahey  <clahey@helixcode.com>

	* Makefile.am: Added libepaned.a.

	* test-shortcut-bar.c: Switched from GtkPaned to EPaned.

svn path=/trunk/; revision=3191

1 files changed, 403 insertions, 0 deletions

diff --git a/widgets/e-paned/e-vpaned.c b/widgets/e-paned/e-vpaned.c
new file mode 100644
index 0000000000..9a71b9acd9
--- /dev/null
+++ b/widgets/e-paned/e-vpaned.c
@@ -0,0 +1,403 @@
+/* EPaned - A slightly more advanced paned widget.
+ * Copyright (C) 2000 Helix Code, Inc.
+ *
+ * Author: Christopher James Lahey <clahey@helixcode.com>
+ *
+ * based on GtkPaned from Gtk+.  Gtk+ Copyright notice follows.
+ */
+
+/* GTK - The GIMP Toolkit
+ * Copyright (C) 1995-1997 Peter Mattis, Spencer Kimball and Josh MacDonald
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Library General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library 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
+ * Library General Public License for more details.
+ *
+ * You should have received a copy of the GNU Library General Public
+ * License along with this library; if not, write to the
+ * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+ * Boston, MA 02111-1307, USA.
+ */
+
+/*
+ * Modified by the GTK+ Team and others 1997-1999.  See the AUTHORS
+ * file for a list of people on the GTK+ Team.  See the ChangeLog
+ * files for a list of changes.  These files are distributed with
+ * GTK+ at ftp://ftp.gtk.org/pub/gtk/. 
+ */
+
+#include "e-vpaned.h"
+
+static void     e_vpaned_class_init     (EVPanedClass   *klass);
+static void     e_vpaned_init           (EVPaned        *vpaned);
+static void     e_vpaned_size_request   (GtkWidget      *widget,
+					 GtkRequisition *requisition);
+static void     e_vpaned_size_allocate  (GtkWidget      *widget,
+					 GtkAllocation  *allocation);
+static void     e_vpaned_draw           (GtkWidget      *widget,
+					 GdkRectangle   *area);
+static void     e_vpaned_xor_line       (EPaned         *paned);
+static gboolean e_vpaned_button_press   (GtkWidget      *widget,
+					 GdkEventButton *event);
+static gboolean e_vpaned_button_release (GtkWidget      *widget,
+					 GdkEventButton *event);
+static gboolean e_vpaned_motion         (GtkWidget      *widget,
+					 GdkEventMotion *event);
+
+GtkType
+e_vpaned_get_type (void)
+{
+  static GtkType vpaned_type = 0;
+
+  if (!vpaned_type)
+    {
+      static const GtkTypeInfo vpaned_info =
+      {
+	"EVPaned",
+	sizeof (EVPaned),
+	sizeof (EVPanedClass),
+	(GtkClassInitFunc) e_vpaned_class_init,
+	(GtkObjectInitFunc) e_vpaned_init,
+	/* reserved_1 */ NULL,
+	/* reserved_2 */ NULL,
+	(GtkClassInitFunc) NULL,
+      };
+
+      vpaned_type = gtk_type_unique (E_TYPE_PANED, &vpaned_info);
+    }
+
+  return vpaned_type;
+}
+
+static void
+e_vpaned_class_init (EVPanedClass *class)
+{
+  GtkWidgetClass *widget_class;
+
+  widget_class = (GtkWidgetClass *) class;
+
+  widget_class->size_request = e_vpaned_size_request;
+  widget_class->size_allocate = e_vpaned_size_allocate;
+  widget_class->draw = e_vpaned_draw;
+  widget_class->button_press_event = e_vpaned_button_press;
+  widget_class->button_release_event = e_vpaned_button_release;
+  widget_class->motion_notify_event = e_vpaned_motion;
+}
+
+static void
+e_vpaned_init (EVPaned *vpaned)
+{
+  EPaned *paned;
+
+  g_return_if_fail (vpaned != NULL);
+  g_return_if_fail (E_IS_PANED (vpaned));
+
+  paned = E_PANED (vpaned);
+
+  paned->cursor_type = GDK_SB_V_DOUBLE_ARROW;
+}
+
+GtkWidget *
+e_vpaned_new (void)
+{
+  EVPaned *vpaned;
+
+  vpaned = gtk_type_new (E_TYPE_VPANED);
+
+  return GTK_WIDGET (vpaned);
+}
+
+static void
+e_vpaned_size_request (GtkWidget      *widget,
+			 GtkRequisition *requisition)
+{
+  EPaned *paned;
+  GtkRequisition child_requisition;
+
+  g_return_if_fail (widget != NULL);
+  g_return_if_fail (E_IS_VPANED (widget));
+  g_return_if_fail (requisition != NULL);
+
+  paned = E_PANED (widget);
+  requisition->width = 0;
+  requisition->height = 0;
+
+  if (paned->child1 && GTK_WIDGET_VISIBLE (paned->child1))
+    {
+      gtk_widget_size_request (paned->child1, &child_requisition);
+
+      requisition->height = child_requisition.height;
+      requisition->width = child_requisition.width;
+    }
+
+  if (paned->child2 && GTK_WIDGET_VISIBLE (paned->child2))
+    {
+      gtk_widget_size_request (paned->child2, &child_requisition);
+
+      requisition->width = MAX (requisition->width, child_requisition.width);
+      requisition->height += child_requisition.height;
+    }
+
+  requisition->height += GTK_CONTAINER (paned)->border_width * 2 + paned->handle_size;
+  requisition->width += GTK_CONTAINER (paned)->border_width * 2;
+}
+
+static void
+e_vpaned_size_allocate (GtkWidget     *widget,
+			  GtkAllocation *allocation)
+{
+  EPaned *paned;
+  GtkRequisition child1_requisition;
+  GtkRequisition child2_requisition;
+  GtkAllocation child1_allocation;
+  GtkAllocation child2_allocation;
+  gint border_width;
+
+  g_return_if_fail (widget != NULL);
+  g_return_if_fail (E_IS_VPANED (widget));
+  g_return_if_fail (allocation != NULL);
+  
+  widget->allocation = *allocation;
+  paned = E_PANED (widget);
+  border_width = GTK_CONTAINER (widget)->border_width;
+
+  if (paned->child1)
+    gtk_widget_get_child_requisition (paned->child1, &child1_requisition);
+  else
+    child1_requisition.height = 0;
+
+  if (paned->child2)
+    gtk_widget_get_child_requisition (paned->child2, &child2_requisition);
+  else
+    child2_requisition.height = 0;
+    
+  e_paned_compute_position (paned,
+			      MAX (1, (gint) widget->allocation.height
+				   - (gint) paned->handle_size
+				   - 2 * border_width),
+			      child1_requisition.height,
+			      child2_requisition.height);
+
+  /* Move the handle before the children so we don't get extra expose events */
+
+  paned->handle_xpos = border_width;
+  paned->handle_ypos = paned->child1_size + border_width;
+  paned->handle_width = MAX (1, (gint) widget->allocation.width - 2 * border_width);
+  paned->handle_height = paned->handle_size;
+
+  if (GTK_WIDGET_REALIZED(widget))
+    {
+      gdk_window_move_resize (widget->window,
+			      allocation->x, allocation->y,
+			      allocation->width,
+			      allocation->height);
+
+      gdk_window_move_resize (paned->handle,
+			      paned->handle_xpos,
+			      paned->handle_ypos,
+			      paned->handle_width,
+			      paned->handle_size);
+    }
+
+  child1_allocation.width = child2_allocation.width = MAX (1, (gint) allocation->width - border_width * 2);
+  child1_allocation.height = paned->child1_size;
+  child1_allocation.x = child2_allocation.x = border_width;
+  child1_allocation.y = border_width;
+
+  child2_allocation.y = child1_allocation.y + child1_allocation.height + paned->handle_height;
+  child2_allocation.height = MAX(1, (gint) allocation->height - child2_allocation.y - border_width);
+
+  /* Now allocate the childen, making sure, when resizing not to
+   * overlap the windows */
+  if (GTK_WIDGET_MAPPED (widget) &&
+      paned->child1 && GTK_WIDGET_VISIBLE (paned->child1) &&
+      paned->child1->allocation.height < child1_allocation.height)
+    {
+      if (paned->child2 && GTK_WIDGET_VISIBLE (paned->child2))
+	gtk_widget_size_allocate(paned->child2, &child2_allocation);
+      gtk_widget_size_allocate(paned->child1, &child1_allocation);
+    }
+  else
+    {
+      if (paned->child1 && GTK_WIDGET_VISIBLE (paned->child1))
+	gtk_widget_size_allocate(paned->child1, &child1_allocation);
+      if (paned->child2 && GTK_WIDGET_VISIBLE (paned->child2))
+	gtk_widget_size_allocate(paned->child2, &child2_allocation);
+    }
+}
+
+static void
+e_vpaned_draw (GtkWidget    *widget,
+		 GdkRectangle *area)
+{
+  EPaned *paned;
+  GdkRectangle handle_area, child_area;
+  guint16 border_width;
+
+  g_return_if_fail (widget != NULL);
+  g_return_if_fail (E_IS_PANED (widget));
+
+  if (GTK_WIDGET_VISIBLE (widget) && GTK_WIDGET_MAPPED (widget))
+    {
+      paned = E_PANED (widget);
+      border_width = GTK_CONTAINER (paned)->border_width;
+
+      gdk_window_clear_area (widget->window,
+			     area->x, area->y, area->width,
+			     area->height);
+
+      handle_area.x = paned->handle_xpos;
+      handle_area.y = paned->handle_ypos;
+      handle_area.width = paned->handle_width;
+      handle_area.height = paned->handle_size;
+
+      if (gdk_rectangle_intersect (&handle_area, area, &child_area))
+	{
+	  child_area.x -= paned->handle_xpos;
+	  child_area.y -= paned->handle_ypos;
+
+	  gtk_paint_handle (widget->style,
+			    paned->handle,
+			    GTK_STATE_NORMAL,
+			    GTK_SHADOW_NONE,
+			    &child_area,
+			    widget,
+			    "paned",
+			    0, 0, -1, -1,
+			    GTK_ORIENTATION_HORIZONTAL);
+
+	}
+      /* Redraw the children
+       */
+      if (paned->child1 && gtk_widget_intersect (paned->child1, area, &child_area))
+	gtk_widget_draw (paned->child1, &child_area);
+      if (paned->child2 && gtk_widget_intersect (paned->child2, area, &child_area))
+	gtk_widget_draw (paned->child2, &child_area);
+    }
+}
+
+static void
+e_vpaned_xor_line (EPaned *paned)
+{
+  GtkWidget *widget;
+  GdkGCValues values;
+  guint16 ypos;
+
+  widget = GTK_WIDGET (paned);
+
+  if (!paned->xor_gc)
+    {
+      values.function = GDK_INVERT;
+      values.subwindow_mode = GDK_INCLUDE_INFERIORS;
+      paned->xor_gc = gdk_gc_new_with_values (widget->window,
+					      &values,
+					      GDK_GC_FUNCTION | GDK_GC_SUBWINDOW);
+    }
+
+  gdk_gc_set_line_attributes (paned->xor_gc, 2, GDK_LINE_SOLID,
+			      GDK_CAP_NOT_LAST, GDK_JOIN_BEVEL);
+
+  ypos = paned->child1_size
+    + GTK_CONTAINER (paned)->border_width + paned->handle_size / 2;
+
+  gdk_draw_line (widget->window, paned->xor_gc,
+		 0,
+		 ypos,
+		 widget->allocation.width - 1,
+		 ypos);
+}
+
+static gboolean
+e_vpaned_button_press (GtkWidget      *widget,
+			 GdkEventButton *event)
+{
+  EPaned *paned;
+
+  g_return_val_if_fail (widget != NULL, FALSE);
+  g_return_val_if_fail (E_IS_PANED (widget), FALSE);
+
+  paned = E_PANED (widget);
+
+  if (!paned->in_drag &&
+      (event->window == paned->handle) && (event->button == 1))
+    {
+      paned->in_drag = TRUE;
+      /* We need a server grab here, not gtk_grab_add(), since
+       * we don't want to pass events on to the widget's children */
+      gdk_pointer_grab (paned->handle, FALSE,
+			GDK_POINTER_MOTION_HINT_MASK
+			| GDK_BUTTON1_MOTION_MASK
+			| GDK_BUTTON_RELEASE_MASK, NULL, NULL,
+			event->time);
+      paned->child1_size += event->y - paned->handle_size / 2;
+      paned->child1_size = CLAMP (paned->child1_size, 0,
+				  widget->allocation.height -
+				  paned->handle_size -
+				  2 * GTK_CONTAINER (paned)->border_width);
+      e_vpaned_xor_line(paned);
+
+      return TRUE;
+    }
+
+  return FALSE;
+}
+
+static gboolean
+e_vpaned_button_release (GtkWidget      *widget,
+			   GdkEventButton *event)
+{
+  EPaned *paned;
+
+  g_return_val_if_fail (widget != NULL, FALSE);
+  g_return_val_if_fail (E_IS_PANED (widget), FALSE);
+
+  paned = E_PANED (widget);
+
+  if (paned->in_drag && (event->button == 1))
+    {
+      e_vpaned_xor_line (paned);
+      paned->in_drag = FALSE;
+      paned->position_set = TRUE;
+      gdk_pointer_ungrab (event->time);
+      gtk_widget_queue_resize (GTK_WIDGET (paned));
+
+      return TRUE;
+    }
+
+  return FALSE;
+}
+
+static gboolean
+e_vpaned_motion (GtkWidget      *widget,
+		   GdkEventMotion *event)
+{
+  EPaned *paned;
+  gint y;
+
+  g_return_val_if_fail (widget != NULL, FALSE);
+  g_return_val_if_fail (E_IS_PANED (widget), FALSE);
+
+  if (event->is_hint || event->window != widget->window)
+    gtk_widget_get_pointer (widget, NULL, &y);
+  else
+    y = event->y;
+
+  paned = E_PANED (widget);
+
+  if (paned->in_drag)
+    {
+      gint size = y - GTK_CONTAINER(paned)->border_width - paned->handle_size / 2;
+
+      e_vpaned_xor_line (paned);
+      paned->child1_size = CLAMP (size, paned->min_position, paned->max_position);
+      e_vpaned_xor_line(paned);
+    }
+
+  return TRUE;
+}