sync code with last improvements from OpenBSD

2023-08-28 05:57:34 +00:00 · 2023-08-28 05:57:34 +00:00 · 88965415ff
commit 88965415ff
26235 changed files with 29195616 additions and 0 deletions
--- a/app/bitmap/CutPaste.c
+++ b/app/bitmap/CutPaste.c
@ -0,0 +1,204 @@
+/*
+
+Copyright 1989, 1998  The Open Group
+
+Permission to use, copy, modify, distribute, and sell this software and its
+documentation for any purpose is hereby granted without fee, provided that
+the above copyright notice appear in all copies and that both that
+copyright notice and this permission notice appear in supporting
+documentation.
+
+The above copyright notice and this permission notice shall be included
+in all copies or substantial portions of the Software.
+
+THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
+OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.
+IN NO EVENT SHALL THE OPEN GROUP BE LIABLE FOR ANY CLAIM, DAMAGES OR
+OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE,
+ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR
+OTHER DEALINGS IN THE SOFTWARE.
+
+Except as contained in this notice, the name of The Open Group shall
+not be used in advertising or otherwise to promote the sale, use or
+other dealings in this Software without prior written authorization
+from The Open Group.
+
+*/
+
+/*
+ * Author:  Davor Matic, MIT X Consortium
+ */
+
+#include <X11/IntrinsicP.h>
+#include <X11/StringDefs.h>
+#include <X11/Xatom.h>
+#include "BitmapP.h"
+
+#include <stdio.h>
+#include <math.h>
+
+#define min(x, y)                     (((x) < (y)) ? (x) : (y))
+#define max(x, y)                     (((x) > (y)) ? (x) : (y))
+
+
+
+/*****************************************************************************
+ *                               Cut and Paste                               *
+ *****************************************************************************/
+
+/* ARGSUSED */
+static Boolean
+ConvertSelection(Widget w, Atom *selection, Atom *target, Atom *type,
+		 XtPointer *val_ret, unsigned long *length, int *format)
+{
+    XPointer *value = (XPointer *)val_ret;
+    BitmapWidget BW = (BitmapWidget) w;
+    Pixmap *pixmap;
+    char *data;
+    XImage *image;
+    Dimension width, height;
+
+    switch (*target) {
+
+/*  XA_TARGETS undefined ?!?
+
+    case XA_TARGETS:
+	*type = XA_ATOM;
+	*value = (XPointer) bitmapClassRec.bitmap_class.targets;
+	*length = bitmapClassRec.bitmap_class.num_targets;
+	*format = 32;
+	return True;
+
+*/
+
+    case XA_BITMAP:
+    case XA_PIXMAP:
+	if (BWQueryMarked(w)) {
+	  width = BW->bitmap.mark.to_x - BW->bitmap.mark.from_x + 1;
+	  height = BW->bitmap.mark.to_y - BW->bitmap.mark.from_y + 1;
+	  data = CreateCleanData(Length(width, height));
+	  image = CreateBitmapImage(BW, data, width, height);
+	  CopyImageData(BW->bitmap.image, image,
+			BW->bitmap.mark.from_x, BW->bitmap.mark.from_y,
+			BW->bitmap.mark.to_x, BW->bitmap.mark.to_y, 0, 0);
+	  pixmap = (Pixmap *) XtMalloc(sizeof(Pixmap));
+	  *pixmap = GetPixmap(BW, image);
+	  DestroyBitmapImage(&image);
+	}
+	else if (BWQueryStored(w)) {
+	  pixmap = (Pixmap *) XtMalloc(sizeof(Pixmap));
+	  *pixmap = GetPixmap(BW, BW->bitmap.storage);
+	}
+	else return False;
+	*type = XA_PIXMAP;
+	*value = (XPointer) pixmap;
+	*length = 1;
+	*format = 32;
+	return True;
+
+    default:
+	return False;
+    }
+}
+
+/* ARGSUSED */
+static void
+LoseSelection(Widget w, Atom selection)
+{
+    BitmapWidget BW = (BitmapWidget) w;
+
+    if (DEBUG)
+	fprintf(stderr, "Lost Selection\n");
+    BW->bitmap.selection.own = False;
+
+    BWUnmark(w);
+}
+
+/* ARGSUSED */
+static void
+SelectionDone(Widget w, Atom *selection, Atom *target)
+{
+/*  Done Automatically ?!?
+
+    BitmapWidget BW = (BitmapWidget) w;
+
+    if (*target != XA_TARGETS)
+	XtFree(BW->bitmap.value);
+
+*/
+}
+
+void
+BWGrabSelection(Widget w, Time btime)
+{
+    BitmapWidget BW = (BitmapWidget) w;
+
+    BW->bitmap.selection.own = XtOwnSelection(w, XA_PRIMARY, btime,
+					      ConvertSelection,
+					      (XtLoseSelectionProc)LoseSelection,
+					      SelectionDone);
+	if (DEBUG && BW->bitmap.selection.own)
+	    fprintf(stderr, "Own the selection\n");
+}
+
+
+/* ARGSUSED */
+static void
+SelectionCallback(Widget w, XtPointer cldat, Atom *selection, Atom *type,
+		  XtPointer val, unsigned long *length, int *format)
+{
+    XPointer value = (XPointer)val;
+    BitmapWidget BW = (BitmapWidget) w;
+    Pixmap *pixmap;
+
+   switch (*type) {
+
+    case XA_BITMAP:
+    case XA_PIXMAP:
+	DestroyBitmapImage(&BW->bitmap.storage);
+	pixmap = (Pixmap *) value;
+	BW->bitmap.storage = GetImage(BW, *pixmap);
+	XFree((char *)pixmap);
+	break;
+
+    default:
+	XtWarning(" selection request failed.  BitmapWidget");
+	break;
+    }
+
+    BW->bitmap.selection.limbo = FALSE;
+}
+
+void
+BWRequestSelection(Widget w, Time btime, Boolean wait)
+{
+  BitmapWidget BW = (BitmapWidget) w;
+
+  if (BW->bitmap.selection.own)
+    BWStore(w);
+  else {
+    XtGetSelectionValue(w, XA_PRIMARY, XA_PIXMAP,
+			SelectionCallback, NULL, btime);
+
+    BW->bitmap.selection.limbo = TRUE;
+
+    if (wait)
+      while (BW->bitmap.selection.limbo) {
+	XEvent event;
+	XtNextEvent(&event);
+	XtDispatchEvent(&event);
+      }
+  }
+}
+
+/* ARGSUSED */
+/* Returns true if there is a transferable selection */
+Boolean
+BWQuerySelection(Widget w, Time btime)
+{
+/* To be written.  XA_TARGETS to be used.  So far undefined ?!? */
+
+  return True;
+}
+/*****************************************************************************/