Back-ported cut & paste code from fltk2.0.

This code splits the cut & paste into two buffers. The "SELECTION" is
used for the currently highlighted text and for middle-mouse paste and
(if possible) for handling drag & drop. The "CLIPBOARD" is for Ctrl+C
and Ctrl+V style cut & paste.

This matches how Motif, GTK, and KDE 3.0 work. But many older X
applications (including KDE 2) can only see SELECTION, this results in
cut & paste incompatability that is familiar to X users. However this
now moves fltk over to the majority camp.  On all systems this
eliminates the annoying inability to select a region and replace it
with Ctrl+V.

On Mac and Win32 the SELECTION is local to the application, so
middle-mouse paste only works between fields in the application. There
may be tricks (special clipboard data types? use drag & drop?) to make
it communicate, but unless there are standards it would be fltk-only.

The file Fl_cutpaste.cxx has been deleted, so update the IDE files!
The Win32 and Mac versions have NOT BEEN TESTED! I tried to be careful
editing them but they may need some work.


git-svn-id: file:///fltk/svn/fltk/branches/branch-1.1@1989 ea41ed52-d2ee-0310-a9c1-e6b18d33e121

1 files changed, 0 insertions, 213 deletions

diff --git a/src/Fl_cutpaste.cxx b/src/Fl_cutpaste.cxx
deleted file mode 100644
index 80ca75b7f..000000000
--- a/src/Fl_cutpaste.cxx
+++ /dev/null
@@ -1,213 +0,0 @@
-//
-// "$Id: Fl_cutpaste.cxx,v 1.6.2.4.2.4 2002/01/09 21:50:02 easysw Exp $"
-//
-// Cut/paste code for the Fast Light Tool Kit (FLTK).
-//
-// Copyright 1998-2002 by Bill Spitzak and others.
-//
-// 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.
-//
-// Please report all bugs and problems to "fltk-bugs@fltk.org".
-//
-
-// Implementation of cut and paste.
-
-// This is seperated from Fl.cxx mostly to test Fl::add_handler().
-// But this will save a small amount of code size in a program that
-// has no text editing fields or other things that call cut or paste.
-
-#ifdef WIN32
-#  include "Fl_cutpaste_win32.cxx"
-#elif defined(__APPLE__)
-#  include "Fl_cutpaste_mac.cxx"
-#else
-
-#  include <FL/Fl.H>
-#  include <FL/x.H>
-#  include <FL/Fl_Window.H>
-#  include <string.h>
-#  include <stdlib.h>
-
-static char *selection_buffer;
-static int selection_length;
-static int selection_buffer_length;
-static char beenhere;
-static Atom TARGETS;
-
-extern Fl_Widget *fl_selection_requestor; // widget doing request_paste()
-extern Atom fl_XdndAware;
-extern Atom fl_XdndSelection;
-extern Atom fl_XdndEnter;
-extern Atom fl_XdndTypeList;
-extern Atom fl_XdndPosition;
-extern Atom fl_XdndLeave;
-extern Atom fl_XdndDrop;
-extern Atom fl_XdndStatus;
-extern Atom fl_XdndActionCopy;
-extern Atom fl_XdndFinished;
-//extern Atom fl_XdndProxy;
-
-extern Window fl_dnd_source_window;
-extern Atom *fl_dnd_source_types; // null-terminated list of data types being supplied
-extern Atom fl_dnd_type;
-extern Atom fl_dnd_source_action;
-extern Atom fl_dnd_action;
-
-extern void fl_sendClientMessage(Window window, Atom message,
-                                 unsigned long d0,
-                                 unsigned long d1=0,
-                                 unsigned long d2=0,
-                                 unsigned long d3=0,
-                                 unsigned long d4=0);
-
-static int selection_xevent_handler(int) {
-
-  switch (fl_xevent->type) {
-
-  case SelectionNotify: {
-    if (!fl_selection_requestor) return 0;
-    static unsigned char* buffer;
-    if (buffer) {XFree(buffer); buffer = 0;}
-    long read = 0;
-    if (fl_xevent->xselection.property) for (;;) {
-      // The Xdnd code pastes 64K chunks together, possibly to avoid
-      // bugs in X servers, or maybe to avoid an extra round-trip to
-      // get the property length.  I copy this here:
-      Atom actual; int format; unsigned long count, remaining;
-      unsigned char* portion;
-      if (XGetWindowProperty(fl_display,
-			     fl_xevent->xselection.requestor,
-			     fl_xevent->xselection.property,
-			     read/4, 65536, 1, 0,
-			     &actual, &format, &count, &remaining,
-			     &portion)) break; // quit on error
-      if (read) { // append to the accumulated buffer
-	buffer = (unsigned char*)realloc(buffer, read+count*format/8+remaining);
-	memcpy(buffer+read, portion, count*format/8);
-	XFree(portion);
-      } else {	// Use the first section without moving the memory:
-	buffer = portion;
-      }
-      read += count*format/8;
-      if (!remaining) break;
-    }
-    Fl::e_text = (char*)buffer;
-    Fl::e_length = read;
-    fl_selection_requestor->handle(FL_PASTE);
-    // Detect if this paste is due to Xdnd by the property name (I use
-    // XA_SECONDARY for that) and send an XdndFinished message. It is not
-    // clear if this has to be delayed until now or if it can be done
-    // immediatly after calling XConvertSelection.
-    if (fl_xevent->xselection.property == XA_SECONDARY &&
-	fl_dnd_source_window) {
-      fl_sendClientMessage(fl_dnd_source_window, fl_XdndFinished,
-                           fl_xevent->xselection.requestor);
-      fl_dnd_source_window = 0; // don't send a second time
-    }
-    return 1;}
-
-  case SelectionClear:
-    Fl::selection_owner(0);
-    return 1;
-
-  case SelectionRequest: {
-    XSelectionEvent e;
-    e.type = SelectionNotify;
-    e.display = fl_display;
-    e.requestor = fl_xevent->xselectionrequest.requestor;
-    e.selection = fl_xevent->xselectionrequest.selection;
-    e.target = fl_xevent->xselectionrequest.target;
-    e.time = fl_xevent->xselectionrequest.time;
-    e.property = fl_xevent->xselectionrequest.property;
-    if (e.target == TARGETS) {
-      Atom a = XA_STRING;
-      XChangeProperty(fl_display, e.requestor, e.property,
-		      XA_ATOM, sizeof(Atom)*8, 0, (unsigned char*)&a,
-		      sizeof(Atom));
-    } else if (e.target == XA_STRING && selection_length) {
-      XChangeProperty(fl_display, e.requestor, e.property,
-		      XA_STRING, 8, 0, (unsigned char *)selection_buffer,
-		      selection_length);
-    } else {
-//    char* x = XGetAtomName(fl_display,e.target);
-//    fprintf(stderr,"selection request of %s\n",x);
-//    XFree(x);
-      e.property = 0;
-    }
-    XSendEvent(fl_display, e.requestor, 0, 0, (XEvent *)&e);}
-    return 1;
-
-  default:
-    return 0;
-  }
-}
-
-////////////////////////////////////////////////////////////////
-
-static void setup_crap() {
-  if (!beenhere) {
-    beenhere = 1;
-    TARGETS = XInternAtom(fl_display, "TARGETS", 0);
-    Fl::add_handler(selection_xevent_handler);
-  }
-}
-
-// Call this when a "paste" operation happens:
-void Fl::paste(Fl_Widget &receiver) {
-  if (selection_owner()) {
-    // We already have it, do it quickly without window server.
-    // Notice that the text is clobbered if set_selection is
-    // called in response to FL_PASTE!
-    Fl::e_text = selection_buffer;
-    Fl::e_length = selection_length;
-    receiver.handle(FL_PASTE);
-    return;
-  }
-  // otherwise get the window server to return it:
-  fl_selection_requestor = &receiver;
-  XConvertSelection(fl_display, XA_PRIMARY, XA_STRING, XA_PRIMARY,
-		    fl_xid(Fl::first_window()), fl_event_time);
-  setup_crap();
-}
-
-////////////////////////////////////////////////////////////////
-
-// call this when you create a selection:
-void Fl::selection(Fl_Widget &owner, const char *stuff, int len) {
-  if (!stuff || len<0) return;
-  if (len+1 > selection_buffer_length) {
-    delete[] selection_buffer;
-    selection_buffer = new char[len+100];
-    selection_buffer_length = len+100;
-  }
-  memcpy(selection_buffer, stuff, len);
-  selection_buffer[len] = 0; // needed for direct paste
-  selection_length = len;
-  selection_owner(&owner);
-  static Window selxid; // window X thinks selection belongs to
-  if (!selxid) selxid =
-		 XCreateSimpleWindow(fl_display, 
-				     RootWindow(fl_display, fl_screen),
-				     0,0,1,1,0,0,0);
-  XSetSelectionOwner(fl_display, XA_PRIMARY, selxid, fl_event_time);
-  setup_crap();
-}
-
-#endif
-
-//
-// End of "$Id: Fl_cutpaste.cxx,v 1.6.2.4.2.4 2002/01/09 21:50:02 easysw Exp $".
-//