sync code with last improvements from OpenBSD
This commit is contained in:
commit
88965415ff
26235 changed files with 29195616 additions and 0 deletions
316
app/xclipboard/xcutsel.c
Normal file
316
app/xclipboard/xcutsel.c
Normal file
|
@ -0,0 +1,316 @@
|
|||
/*
|
||||
|
||||
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: Ralph Swick, DEC/Project Athena
|
||||
*/
|
||||
|
||||
#ifdef HAVE_CONFIG_H
|
||||
#include "config.h"
|
||||
#endif
|
||||
|
||||
#include <stdio.h>
|
||||
#include <stdlib.h>
|
||||
#include <X11/Intrinsic.h>
|
||||
#include <X11/StringDefs.h>
|
||||
#include <X11/Xatom.h>
|
||||
|
||||
#include <X11/Xmu/Atoms.h>
|
||||
#include <X11/Xmu/StdSel.h>
|
||||
|
||||
#include <X11/Xaw/Command.h>
|
||||
#include <X11/Xaw/Box.h>
|
||||
#include <X11/Xaw/Cardinals.h>
|
||||
#include <X11/Xfuncs.h>
|
||||
|
||||
#ifdef XKB
|
||||
#include <X11/extensions/XKBbells.h>
|
||||
#endif
|
||||
|
||||
static XrmOptionDescRec optionDesc[] = {
|
||||
{"-selection", "selection", XrmoptionSepArg, NULL},
|
||||
{"-select", "selection", XrmoptionSepArg, NULL},
|
||||
{"-sel", "selection", XrmoptionSepArg, NULL},
|
||||
{"-s", "selection", XrmoptionSepArg, NULL},
|
||||
{"-cutbuffer", "cutBuffer", XrmoptionSepArg, NULL},
|
||||
};
|
||||
|
||||
typedef struct {
|
||||
String selection_name;
|
||||
int buffer;
|
||||
Atom selection;
|
||||
char* value;
|
||||
int length;
|
||||
} OptionsRec;
|
||||
|
||||
static OptionsRec options;
|
||||
|
||||
#define Offset(field) XtOffsetOf(OptionsRec, field)
|
||||
|
||||
static XtResource resources[] = {
|
||||
{"selection", "Selection", XtRString, sizeof(String),
|
||||
Offset(selection_name), XtRString, "PRIMARY"},
|
||||
{"cutBuffer", "CutBuffer", XtRInt, sizeof(int),
|
||||
Offset(buffer), XtRImmediate, (XtPointer)0},
|
||||
};
|
||||
|
||||
#undef Offset
|
||||
|
||||
typedef struct {
|
||||
Widget button;
|
||||
Boolean is_on;
|
||||
} ButtonState;
|
||||
|
||||
static ButtonState state;
|
||||
|
||||
static void
|
||||
Syntax(char *call)
|
||||
{
|
||||
fprintf (stderr, "usage: %s [-selection name] [-cutbuffer number]\n",
|
||||
call);
|
||||
exit (1);
|
||||
}
|
||||
|
||||
|
||||
static void
|
||||
StoreBuffer(Widget w, XtPointer client_data, Atom *selection, Atom *type,
|
||||
XtPointer value, unsigned long *length, int *format)
|
||||
{
|
||||
|
||||
if (*type == 0 || *type == XT_CONVERT_FAIL || *length == 0) {
|
||||
#ifdef XKB
|
||||
XkbStdBell( XtDisplay(w), XtWindow(w), 0, XkbBI_MinorError );
|
||||
#else
|
||||
XBell( XtDisplay(w), 0 );
|
||||
#endif
|
||||
return;
|
||||
}
|
||||
|
||||
XStoreBuffer( XtDisplay(w), (char*)value, (int)(*length),
|
||||
options.buffer );
|
||||
|
||||
XtFree(value);
|
||||
}
|
||||
|
||||
|
||||
static Boolean
|
||||
ConvertSelection(Widget w, Atom *selection, Atom *target,
|
||||
Atom *type, XtPointer *value, unsigned long *length,
|
||||
int *format)
|
||||
{
|
||||
Display* d = XtDisplay(w);
|
||||
XSelectionRequestEvent* req =
|
||||
XtGetSelectionRequest(w, *selection, (XtRequestId)NULL);
|
||||
|
||||
if (*target == XA_TARGETS(d)) {
|
||||
Atom* targetP;
|
||||
Atom* std_targets;
|
||||
unsigned long std_length;
|
||||
XmuConvertStandardSelection(w, req->time, selection, target, type,
|
||||
(XPointer*)&std_targets, &std_length,
|
||||
format);
|
||||
*value = XtMalloc(sizeof(Atom)*(std_length + 4));
|
||||
targetP = *(Atom**)value;
|
||||
*length = std_length + 4;
|
||||
*targetP++ = XA_STRING;
|
||||
*targetP++ = XA_TEXT(d);
|
||||
*targetP++ = XA_LENGTH(d);
|
||||
*targetP++ = XA_LIST_LENGTH(d);
|
||||
/*
|
||||
*targetP++ = XA_CHARACTER_POSITION(d);
|
||||
*/
|
||||
memmove( (char*)targetP, (char*)std_targets, sizeof(Atom)*std_length);
|
||||
XtFree((char*)std_targets);
|
||||
*type = XA_ATOM;
|
||||
*format = 32;
|
||||
return True;
|
||||
}
|
||||
if (*target == XA_STRING || *target == XA_TEXT(d)) {
|
||||
*type = XA_STRING;
|
||||
*value = XtMalloc((Cardinal) options.length);
|
||||
memmove( (char *) *value, options.value, options.length);
|
||||
*length = options.length;
|
||||
*format = 8;
|
||||
return True;
|
||||
}
|
||||
if (*target == XA_LIST_LENGTH(d)) {
|
||||
long *temp = (long *) XtMalloc (sizeof(long));
|
||||
*temp = 1L;
|
||||
*value = (XtPointer) temp;
|
||||
*type = XA_INTEGER;
|
||||
*length = 1;
|
||||
*format = 32;
|
||||
return True;
|
||||
}
|
||||
if (*target == XA_LENGTH(d)) {
|
||||
long *temp = (long *) XtMalloc (sizeof(long));
|
||||
*temp = options.length;
|
||||
*value = (XtPointer) temp;
|
||||
*type = XA_INTEGER;
|
||||
*length = 1;
|
||||
*format = 32;
|
||||
return True;
|
||||
}
|
||||
#ifdef notdef
|
||||
if (*target == XA_CHARACTER_POSITION(d)) {
|
||||
long *temp = (long *) XtMalloc (2 * sizeof(long));
|
||||
temp[0] = ctx->text.s.left + 1;
|
||||
temp[1] = ctx->text.s.right;
|
||||
*value = (XtPointer) temp;
|
||||
*type = XA_SPAN(d);
|
||||
*length = 2;
|
||||
*format = 32;
|
||||
return True;
|
||||
}
|
||||
#endif /* notdef */
|
||||
if (XmuConvertStandardSelection(w, req->time, selection, target, type,
|
||||
(XPointer *)value, length, format))
|
||||
return True;
|
||||
|
||||
/* else */
|
||||
return False;
|
||||
}
|
||||
|
||||
|
||||
static void
|
||||
SetButton(ButtonState *statep, Boolean on)
|
||||
{
|
||||
if (statep->is_on != on) {
|
||||
Arg args[2];
|
||||
Pixel fg, bg;
|
||||
XtSetArg( args[0], XtNforeground, &fg );
|
||||
XtSetArg( args[1], XtNbackground, &bg );
|
||||
XtGetValues( statep->button, args, TWO );
|
||||
args[0].value = (XtArgVal)bg;
|
||||
args[1].value = (XtArgVal)fg;
|
||||
XtSetValues( statep->button, args, TWO );
|
||||
statep->is_on = on;
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
static void
|
||||
LoseSelection(Widget w, Atom *selection)
|
||||
{
|
||||
if (options.value) {
|
||||
XFree( options.value );
|
||||
options.value = NULL;
|
||||
}
|
||||
SetButton(&state, False);
|
||||
}
|
||||
|
||||
|
||||
/* ARGSUSED */
|
||||
static void _X_NORETURN
|
||||
Quit(Widget w, XtPointer closure, XtPointer callData)
|
||||
{
|
||||
XtCloseDisplay( XtDisplay(w) );
|
||||
exit(0);
|
||||
}
|
||||
|
||||
|
||||
/* ARGSUSED */
|
||||
static void
|
||||
GetSelection(Widget w, XtPointer closure, XtPointer callData)
|
||||
{
|
||||
XtGetSelectionValue(w, options.selection, XA_STRING,
|
||||
StoreBuffer, NULL,
|
||||
XtLastTimestampProcessed(XtDisplay(w)));
|
||||
}
|
||||
|
||||
|
||||
/* ARGSUSED */
|
||||
static void
|
||||
GetBuffer(Widget w, XtPointer closure, XtPointer callData)
|
||||
{
|
||||
if (options.value) XFree( options.value );
|
||||
options.value =
|
||||
XFetchBuffer(XtDisplay(w), &options.length, options.buffer);
|
||||
if (options.value != NULL) {
|
||||
if (XtOwnSelection(w, options.selection,
|
||||
XtLastTimestampProcessed(XtDisplay(w)),
|
||||
ConvertSelection, LoseSelection, NULL))
|
||||
SetButton((ButtonState*)closure, True);
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
int
|
||||
main(int argc, char *argv[])
|
||||
{
|
||||
char *label;
|
||||
Widget box, button;
|
||||
XtAppContext appcon;
|
||||
Widget shell;
|
||||
XrmDatabase rdb;
|
||||
|
||||
XtSetLanguageProc(NULL, NULL, NULL);
|
||||
|
||||
shell =
|
||||
XtAppInitialize( &appcon, "XCutsel", optionDesc, XtNumber(optionDesc),
|
||||
&argc, argv, NULL, NULL, 0 );
|
||||
rdb = XtDatabase(XtDisplay(shell));
|
||||
|
||||
if (argc != 1) Syntax(argv[0]);
|
||||
|
||||
XtGetApplicationResources( shell, (XtPointer)&options,
|
||||
resources, XtNumber(resources),
|
||||
NULL, ZERO );
|
||||
|
||||
options.value = NULL;
|
||||
XmuInternStrings( XtDisplay(shell), &options.selection_name, ONE,
|
||||
&options.selection );
|
||||
|
||||
box = XtCreateManagedWidget("box", boxWidgetClass, shell, NULL, ZERO);
|
||||
|
||||
button =
|
||||
XtCreateManagedWidget("quit", commandWidgetClass, box, NULL, ZERO);
|
||||
XtAddCallback( button, XtNcallback, Quit, NULL );
|
||||
|
||||
/* %%% hack alert... */
|
||||
XtAsprintf(&label, "*label:copy %s to %d",
|
||||
options.selection_name,
|
||||
options.buffer);
|
||||
XrmPutLineResource( &rdb, label );
|
||||
XtFree(label);
|
||||
|
||||
button =
|
||||
XtCreateManagedWidget("sel-cut", commandWidgetClass, box, NULL, ZERO);
|
||||
XtAddCallback( button, XtNcallback, GetSelection, NULL );
|
||||
|
||||
XtAsprintf(&label, "*label:copy %d to %s",
|
||||
options.buffer,
|
||||
options.selection_name);
|
||||
XrmPutLineResource( &rdb, label );
|
||||
XtFree(label);
|
||||
|
||||
button =
|
||||
XtCreateManagedWidget("cut-sel", commandWidgetClass, box, NULL, ZERO);
|
||||
XtAddCallback( button, XtNcallback, GetBuffer, (XtPointer)&state );
|
||||
state.button = button;
|
||||
state.is_on = False;
|
||||
|
||||
XtRealizeWidget(shell);
|
||||
XtAppMainLoop(appcon);
|
||||
exit(0);
|
||||
}
|
Loading…
Add table
Add a link
Reference in a new issue