+/* Operations on children
+ */
+
+static void
+gtk_myfixed_position_child (GtkMyFixed *myfixed,
+ GtkMyFixedChild *child)
+{
+ gint x;
+ gint y;
+
+ x = child->x - myfixed->xoffset;
+ y = child->y - myfixed->yoffset;
+
+ if (IS_ONSCREEN (x,y))
+ {
+ if (GTK_WIDGET_MAPPED (myfixed) &&
+ GTK_WIDGET_VISIBLE (child->widget))
+ {
+ if (!GTK_WIDGET_MAPPED (child->widget))
+ gtk_widget_map (child->widget);
+ }
+
+ if (GTK_WIDGET_IS_OFFSCREEN (child->widget))
+ GTK_PRIVATE_UNSET_FLAG (child->widget, GTK_IS_OFFSCREEN);
+ }
+ else
+ {
+ if (!GTK_WIDGET_IS_OFFSCREEN (child->widget))
+ GTK_PRIVATE_SET_FLAG (child->widget, GTK_IS_OFFSCREEN);
+
+ if (GTK_WIDGET_MAPPED (child->widget))
+ gtk_widget_unmap (child->widget);
+ }
+}
+
+static void
+gtk_myfixed_allocate_child (GtkMyFixed *myfixed,
+ GtkMyFixedChild *child)
+{
+ GtkAllocation allocation;
+ GtkRequisition requisition;
+
+ allocation.x = child->x - myfixed->xoffset;
+ allocation.y = child->y - myfixed->yoffset;
+ gtk_widget_get_child_requisition (child->widget, &requisition);
+ allocation.width = requisition.width;
+ allocation.height = requisition.height;
+
+ gtk_widget_size_allocate (child->widget, &allocation);
+}
+
+static void
+gtk_myfixed_position_children (GtkMyFixed *myfixed)
+{
+ GList *tmp_list;
+
+ tmp_list = myfixed->children;
+ while (tmp_list)
+ {
+ GtkMyFixedChild *child = tmp_list->data;
+ tmp_list = tmp_list->next;
+
+ gtk_myfixed_position_child (myfixed, child);
+ }
+}
+
+static void
+gtk_myfixed_adjust_allocations_recurse (GtkWidget *widget,
+ gpointer cb_data)
+{
+ GtkMyFixedAdjData *data = cb_data;
+
+ widget->allocation.x += data->dx;
+ widget->allocation.y += data->dy;
+
+ if (GTK_WIDGET_NO_WINDOW (widget) &&
+ GTK_IS_CONTAINER (widget))
+ gtk_container_forall (GTK_CONTAINER (widget),
+ gtk_myfixed_adjust_allocations_recurse,
+ cb_data);
+}
+
+static void
+gtk_myfixed_adjust_allocations (GtkMyFixed *myfixed,
+ gint dx,
+ gint dy)
+{
+ GList *tmp_list;
+ GtkMyFixedAdjData data;
+
+ data.dx = dx;
+ data.dy = dy;
+
+ tmp_list = myfixed->children;
+ while (tmp_list)
+ {
+ GtkMyFixedChild *child = tmp_list->data;
+ tmp_list = tmp_list->next;
+
+ child->widget->allocation.x += dx;
+ child->widget->allocation.y += dy;
+
+ if (GTK_WIDGET_NO_WINDOW (child->widget) &&
+ GTK_IS_CONTAINER (child->widget))
+ gtk_container_forall (GTK_CONTAINER (child->widget),
+ gtk_myfixed_adjust_allocations_recurse,
+ &data);
+ }
+}
+
+/* Callbacks */
+
+/* Send a synthetic expose event to the widget
+ */
+static void
+gtk_myfixed_expose_area (GtkMyFixed *myfixed,
+ gint x, gint y, gint width, gint height)
+{
+ if (myfixed->visibility == GDK_VISIBILITY_UNOBSCURED)
+ {
+ GdkEventExpose event;
+
+ event.type = GDK_EXPOSE;
+ event.send_event = TRUE;
+ event.window = myfixed->bin_window;
+ event.count = 0;
+
+ event.area.x = x;
+ event.area.y = y;
+ event.area.width = width;
+ event.area.height = height;
+
+ gdk_window_ref (event.window);
+ gtk_widget_event (GTK_WIDGET (myfixed), (GdkEvent *)&event);
+ gdk_window_unref (event.window);
+ }
+}
+
+/* This function is used to find events to process while scrolling
+ */
+
+static Bool
+gtk_myfixed_expose_predicate (Display *display,
+ XEvent *xevent,
+ XPointer arg)
+{
+ if ((xevent->type == Expose) ||
+ ((xevent->xany.window == *(Window *)arg) &&
+ (xevent->type == ConfigureNotify)))
+ return True;
+ else
+ return False;
+}
+
+/* This is the main routine to do the scrolling. Scrolling is
+ * done by "Guffaw" scrolling, as in the Mozilla XFE, with
+ * a few modifications.
+ *
+ * The main improvement is that we keep track of whether we
+ * are obscured or not. If not, we ignore the generated expose
+ * events and instead do the exposes ourself, without having
+ * to wait for a roundtrip to the server. This also provides
+ * a limited form of expose-event compression, since we do
+ * the affected area as one big chunk.
+ */
+
+void
+gtk_myfixed_scroll (GtkMyFixed *myfixed, gint dx, gint dy)
+{
+ GtkWidget *widget;
+ XEvent xevent;
+
+ gint x,y,w,h,border;
+
+ widget = GTK_WIDGET (myfixed);
+
+ myfixed->xoffset += dx;
+ myfixed->yoffset += dy;
+
+ if (!GTK_WIDGET_MAPPED (myfixed))
+ {
+ gtk_myfixed_position_children (myfixed);
+ return;
+ }
+
+ gtk_myfixed_adjust_allocations (myfixed, -dx, -dy);
+
+ if (myfixed->shadow_type == GTK_MYSHADOW_NONE)
+ border = 0;
+ else
+ if (myfixed->shadow_type == GTK_MYSHADOW_THIN)
+ border = 1;
+ else
+ border = 2;
+
+ x = 0;
+ y = 0;
+ w = widget->allocation.width - 2*border;
+ h = widget->allocation.height - 2*border;
+
+ if (dx > 0)
+ {
+ if (gravity_works)
+ {
+ gdk_window_resize (myfixed->bin_window,
+ w + dx,
+ h);
+ gdk_window_move (myfixed->bin_window, x-dx, y);
+ gdk_window_move_resize (myfixed->bin_window, x, y, w, h );
+ }
+ else
+ {
+ /* FIXME */
+ }
+
+ gtk_myfixed_expose_area (myfixed,
+ MAX ((gint)w - dx, 0),
+ 0,
+ MIN (dx, w),
+ h);
+ }
+ else if (dx < 0)
+ {
+ if (gravity_works)
+ {
+ gdk_window_move_resize (myfixed->bin_window,
+ x + dx,
+ y,
+ w - dx,
+ h);
+ gdk_window_move (myfixed->bin_window, x, y);
+ gdk_window_resize (myfixed->bin_window, w, h );
+ }
+ else
+ {
+ /* FIXME */
+ }
+
+ gtk_myfixed_expose_area (myfixed,
+ 0,
+ 0,
+ MIN (-dx, w),
+ h);
+ }
+
+ if (dy > 0)
+ {
+ if (gravity_works)
+ {
+ gdk_window_resize (myfixed->bin_window, w, h + dy);
+ gdk_window_move (myfixed->bin_window, x, y-dy);
+ gdk_window_move_resize (myfixed->bin_window,
+ x, y, w, h );
+ }
+ else
+ {
+ /* FIXME */
+ }
+
+ gtk_myfixed_expose_area (myfixed,
+ 0,
+ MAX ((gint)h - dy, 0),
+ w,
+ MIN (dy, h));
+ }
+ else if (dy < 0)
+ {
+ if (gravity_works)
+ {
+ gdk_window_move_resize (myfixed->bin_window,
+ x, y+dy, w, h - dy );
+ gdk_window_move (myfixed->bin_window, x, y);
+ gdk_window_resize (myfixed->bin_window, w, h );
+ }
+ else
+ {
+ /* FIXME */
+ }
+ gtk_myfixed_expose_area (myfixed,
+ 0,
+ 0,
+ w,
+ MIN (-dy, (gint)h));
+ }
+
+ gtk_myfixed_position_children (myfixed);
+
+ /* We have to make sure that all exposes from this scroll get
+ * processed before we scroll again, or the expose events will
+ * have invalid coordinates.
+ *
+ * We also do expose events for other windows, since otherwise
+ * their updating will fall behind the scrolling
+ *
+ * This also avoids a problem in pre-1.0 GTK where filters don't
+ * have access to configure events that were compressed.
+ */
+
+ gdk_flush();
+ while (XCheckIfEvent(GDK_WINDOW_XDISPLAY (myfixed->bin_window),
+ &xevent,
+ gtk_myfixed_expose_predicate,
+ (XPointer)&GDK_WINDOW_XWINDOW (myfixed->bin_window)))
+ {
+ GdkEvent event;
+ GtkWidget *event_widget;
+
+ if ((xevent.xany.window == GDK_WINDOW_XWINDOW (myfixed->bin_window)) &&
+ (gtk_myfixed_filter (&xevent, &event, myfixed) == GDK_FILTER_REMOVE))
+ continue;
+
+ if (xevent.type == Expose)
+ {
+ event.expose.window = gdk_window_lookup (xevent.xany.window);
+ gdk_window_get_user_data (event.expose.window,
+ (gpointer *)&event_widget);
+
+ if (event_widget)
+ {
+ event.expose.type = GDK_EXPOSE;
+ event.expose.area.x = xevent.xexpose.x;
+ event.expose.area.y = xevent.xexpose.y;
+ event.expose.area.width = xevent.xexpose.width;
+ event.expose.area.height = xevent.xexpose.height;
+ event.expose.count = xevent.xexpose.count;
+
+ gdk_window_ref (event.expose.window);
+ gtk_widget_event (event_widget, &event);
+ gdk_window_unref (event.expose.window);
+ }
+ }
+ }
+}
+
+/* The main event filter. Actually, we probably don't really need
+ * to install this as a filter at all, since we are calling it
+ * directly above in the expose-handling hack. But in case scrollbars
+ * are fixed up in some manner...
+ *
+ * This routine identifies expose events that are generated when
+ * we've temporarily moved the bin_window_origin, and translates
+ * them or discards them, depending on whether we are obscured
+ * or not.
+ */
+static GdkFilterReturn
+gtk_myfixed_filter (GdkXEvent *gdk_xevent,
+ GdkEvent *event,
+ gpointer data)
+{
+ XEvent *xevent;
+ GtkMyFixed *myfixed;
+
+ xevent = (XEvent *)gdk_xevent;
+ myfixed = GTK_MYFIXED (data);
+
+ switch (xevent->type)
+ {
+ case Expose:
+ if (xevent->xexpose.serial == myfixed->configure_serial)
+ {
+ if (myfixed->visibility == GDK_VISIBILITY_UNOBSCURED)
+ return GDK_FILTER_REMOVE;
+ else
+ {
+ xevent->xexpose.x += myfixed->scroll_x;
+ xevent->xexpose.y += myfixed->scroll_y;
+
+ break;
+ }
+ }
+ break;
+
+ case ConfigureNotify:
+ if ((xevent->xconfigure.x != 0) || (xevent->xconfigure.y != 0))
+ {
+ myfixed->configure_serial = xevent->xconfigure.serial;
+ myfixed->scroll_x = xevent->xconfigure.x;
+ myfixed->scroll_y = xevent->xconfigure.y;
+ }
+ break;
+ }
+
+ return GDK_FILTER_CONTINUE;
+}
+
+/* Although GDK does have a GDK_VISIBILITY_NOTIFY event,
+ * there is no corresponding event in GTK, so we have
+ * to get the events from a filter
+ */
+static GdkFilterReturn
+gtk_myfixed_main_filter (GdkXEvent *gdk_xevent,
+ GdkEvent *event,
+ gpointer data)
+{
+ XEvent *xevent;
+ GtkMyFixed *myfixed;
+
+ xevent = (XEvent *)gdk_xevent;
+ myfixed = GTK_MYFIXED (data);
+
+ if (xevent->type == VisibilityNotify)
+ {
+ switch (xevent->xvisibility.state)
+ {
+ case VisibilityFullyObscured:
+ myfixed->visibility = GDK_VISIBILITY_FULLY_OBSCURED;
+ break;
+
+ case VisibilityPartiallyObscured:
+ myfixed->visibility = GDK_VISIBILITY_PARTIAL;
+ break;
+
+ case VisibilityUnobscured:
+ myfixed->visibility = GDK_VISIBILITY_UNOBSCURED;
+ break;
+ }
+
+ return GDK_FILTER_REMOVE;
+ }
+
+
+ return GDK_FILTER_CONTINUE;
+}
+
+
+
+