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 = (XtPointer)XtMalloc(sizeof(Atom)*(std_length + 5));
targetP = *(Atom**)value;
*targetP++ = XA_STRING;
*targetP++ = XA_TEXT(d);
*targetP++ = XA_LENGTH(d);
*targetP++ = XA_LIST_LENGTH(d);
*targetP++ = XA_CHARACTER_POSITION(d);
*length = std_length + (targetP - (*(Atom **) value));
memmove( (char*)targetP, (char*)std_targets, sizeof(Atom)*std_length);
XtFree((char*)std_targets);
*type = XA_ATOM;
*format = 32;
return True;
}
if (*target == XA_LIST_LENGTH(d) ||
*target == XA_LENGTH(d))
{
long * temp;
temp = (long *) XtMalloc(sizeof(long));
if (*target == XA_LIST_LENGTH(d))
*temp = 1L;
else /* *target == XA_LENGTH(d) */
*temp = (long) TextLength (text);
*value = (XtPointer) temp;
*type = XA_INTEGER;
*length = 1L;
*format = 32;
return True;
}
if (*target == XA_CHARACTER_POSITION(d))
{
long * temp;
temp = (long *) XtMalloc(2 * sizeof(long));
temp[0] = (long) 0;
temp[1] = TextLength (text);
*value = (XtPointer) temp;
*type = XA_SPAN(d);
*length = 2L;
*format = 32;
return True;
}
if (*target == XA_STRING ||
*target == XA_TEXT(d) ||
*target == XA_COMPOUND_TEXT(d))
{
if (*target == XA_COMPOUND_TEXT(d))
*type = *target;
else
*type = XA_STRING;
*length = TextLength (text);
*value = (XtPointer)_XawTextGetSTRING((TextWidget) text, 0, *length);
*format = 8;
/*
* Drop our connection to the file; the new console program
* will open as soon as it receives the selection contents; there
* is a small window where console output will not be redirected,
* but I see no way of avoiding that without having two programs
* attempt to redirect console output at the same time, which seems
* worse
*/
CloseConsole ();
return True;
}
if (XmuConvertStandardSelection(w, req->time, selection, target, type,
(XPointer *)value, length, format))
return True;
return False;
}
// called when someone requests the selection value
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);
Atom utf8_string = XInternAtom(d, "UTF8_STRING", False);
if (options.debug) {
printf("Window 0x%lx requested %s of selection %s.\n",
req->requestor,
XGetAtomName(d, *target),
XGetAtomName(d, *selection));
}
if (*target == XA_TARGETS(d)) {
Atom *targetP, *atoms;
XPointer std_targets;
unsigned long std_length;
int i;
XmuConvertStandardSelection(w, req->time, selection, target, type,
&std_targets, &std_length, format);
*value = XtMalloc(sizeof(Atom)*(std_length + 4));
targetP = *(Atom**)value;
atoms = targetP;
*length = std_length + 5;
*targetP++ = utf8_string;
*targetP++ = XA_STRING;
*targetP++ = XA_TEXT(d);
*targetP++ = XA_LENGTH(d);
*targetP++ = XA_LIST_LENGTH(d);
memmove( (char*)targetP, (char*)std_targets, sizeof(Atom)*std_length);
XtFree((char*)std_targets);
*type = XA_ATOM;
*format = 32;
if (options.debug) {
printf("Targets are: ");
for (i=0; i<*length; i++)
printf("%s ", XGetAtomName(d, atoms[i]));
printf("\n");
}
return True;
}
if (*target == utf8_string || *target == XA_STRING || *target == XA_TEXT(d)) {
*type = *target;
*value = XtMalloc((Cardinal) options.length);
memmove((char *)*value, options.value, options.length);
*length = options.length;
*format = 8;
if (options.debug) {
printf("Returning %s ", XGetAtomName(d, *target));
PrintValue((char*)*value, *length);
printf("\n");
}
return True;
}
if (*target == XA_LIST_LENGTH(d)) {
CARD32 *temp = (CARD32 *) XtMalloc(sizeof(CARD32));
*temp = 1L;
*value = (XtPointer) temp;
*type = XA_INTEGER;
*length = 1;
*format = 32;
if (options.debug)
printf("Returning %" PRIx32 "\n", *temp);
return True;
}
if (*target == XA_LENGTH(d)) {
CARD32 *temp = (CARD32 *) XtMalloc(sizeof(CARD32));
*temp = options.length;
*value = (XtPointer) temp;
*type = XA_INTEGER;
*length = 1;
*format = 32;
if (options.debug)
printf("Returning %" PRIx32 "\n", *temp);
return True;
}
if (XmuConvertStandardSelection(w, req->time, selection, target, type,
(XPointer *)value, length, format)) {
printf("Returning conversion of standard selection\n");
return True;
}
/* else */
if (options.debug)
printf("Target not supported\n");
return False;
}
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 + 7));
targetP = *(Atom**)value;
*targetP++ = XA_STRING;
*targetP++ = XA_TEXT(d);
*targetP++ = XA_UTF8_STRING(d);
*targetP++ = XA_COMPOUND_TEXT(d);
*targetP++ = XA_LENGTH(d);
*targetP++ = XA_LIST_LENGTH(d);
*targetP++ = XA_CHARACTER_POSITION(d);
*length = std_length + (targetP - (*(Atom **) value));
memmove( (char*)targetP, (char*)std_targets, sizeof(Atom)*std_length);
XtFree((char*)std_targets);
*type = XA_ATOM;
*format = 32;
return True;
}
if (*target == XA_LIST_LENGTH(d) ||
*target == XA_LENGTH(d))
{
long * temp;
temp = (long *) XtMalloc(sizeof(long));
if (*target == XA_LIST_LENGTH(d))
*temp = 1L;
else /* *target == XA_LENGTH(d) */
*temp = (long) TextLength (text);
*value = (XPointer) temp;
*type = XA_INTEGER;
*length = 1L;
*format = 32;
return True;
}
if (*target == XA_CHARACTER_POSITION(d))
{
long * temp;
temp = (long *) XtMalloc(2 * sizeof(long));
temp[0] = (long) 0;
temp[1] = TextLength (text);
*value = (XPointer) temp;
*type = XA_SPAN(d);
*length = 2L;
*format = 32;
return True;
}
if (*target == XA_STRING ||
*target == XA_TEXT(d) ||
*target == XA_UTF8_STRING(d) ||
*target == XA_COMPOUND_TEXT(d))
{
Arg args[1];
Widget source;
XTextProperty prop;
int ret, style = XStdICCTextStyle; /* a safe default for TEXT */
char *data;
source = XawTextGetSource (text);
XtSetArg (args[0], XtNstring, &data);
XtGetValues (source, args, 1);
if (*target == XA_UTF8_STRING(d))
style = XUTF8StringStyle;
else if (*target == XA_COMPOUND_TEXT(d))
style = XCompoundTextStyle;
else if (*target == XA_STRING)
style = XStringStyle;
ret = XmbTextListToTextProperty (d, &data, 1, style, &prop);
if (ret >= Success) {
*length = prop.nitems;
*value = prop.value;
*type = prop.encoding;
*format = prop.format;
return True;
} else
return False;
}
if (XmuConvertStandardSelection(w, req->time, selection, target, type,
(XPointer *) value, length, format))
return True;
return False;
}
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;
}
