--- sourceforge.net/trunk/rdesktop/cliprdr.c 2003/06/06 09:23:28 385 +++ sourceforge.net/trunk/rdesktop/cliprdr.c 2003/12/09 22:07:47 556 @@ -2,6 +2,7 @@ rdesktop: A Remote Desktop Protocol client. Protocol services - Clipboard functions Copyright (C) Erik Forsberg 2003 + Copyright (C) Matthew Chapman 2003 This program is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by @@ -18,438 +19,136 @@ Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */ -#include -#include #include "rdesktop.h" -extern BOOL encryption; -extern Display *display; -extern Window wnd; -extern Time last_keyrelease; - -static Atom clipboard_atom, primary_atom, targets_atom, timestamp_atom; -static cliprdr_dataformat *server_formats = NULL; -static uint16 num_server_formats = 0; -static XSelectionEvent selection_event; +#define CLIPRDR_CONNECT 1 +#define CLIPRDR_FORMAT_ANNOUNCE 2 +#define CLIPRDR_FORMAT_ACK 3 +#define CLIPRDR_DATA_REQUEST 4 +#define CLIPRDR_DATA_RESPONSE 5 + +#define CLIPRDR_REQUEST 0 +#define CLIPRDR_RESPONSE 1 +#define CLIPRDR_ERROR 2 -static void -cliprdr_print_server_formats(void) -{ -#ifdef WITH_DEBUG_CLIPBOARD - cliprdr_dataformat *this; - uint16 i = 0; - this = server_formats; - DEBUG_CLIPBOARD(("There should be %d server formats.\n", num_server_formats)); - while (NULL != this) - { - DEBUG_CLIPBOARD(("Format code %d\n", this->identifier)); - i++; - this = this->next; - } - DEBUG_CLIPBOARD(("There were %d server formats.\n", i)); -#endif -} - -void -cliprdr_handle_SelectionNotify(void) -{ - DEBUG_CLIPBOARD(("cliprdr_handle_SelectionNotify\n")); -} - -void -cliprdr_handle_SelectionClear(void) -{ - DEBUG_CLIPBOARD(("cliprdr_handle_SelectionClear\n")); -} - -void print_X_error(int res) -{ - switch(res) { - case Success: - DEBUG_CLIPBOARD(("Success\n")); - break; - - case BadAtom: - DEBUG_CLIPBOARD(("BadAtom\n")); - break; - - case BadRequest: - DEBUG_CLIPBOARD(("BadRequest\n")); - break; - - case BadAlloc: - DEBUG_CLIPBOARD(("BadAlloc\n")); - break; - - case BadMatch: - DEBUG_CLIPBOARD(("BadMatch\n")); - break; - - case BadValue: - DEBUG_CLIPBOARD(("BadValue\n")); - break; - - case BadWindow: - DEBUG_CLIPBOARD(("BadWindow\n")); - break; - - default: - DEBUG_CLIPBOARD(("Unknown X error code %d\n", res)); - } -} +static VCHANNEL *cliprdr_channel; static void -cliprdr_request_clipboard_data(uint32 formatcode) +cliprdr_send_packet(uint16 type, uint16 status, uint8 * data, uint32 length) { STREAM s; - s = sec_init(encryption ? SEC_ENCRYPT : 0, 24); - out_uint32_le(s, 16); - out_uint32_le(s, 0x13); - out_uint16_le(s, 4); - out_uint16_le(s, 0); - out_uint32_le(s, 4); // Remaining length - out_uint32_le(s, formatcode); - out_uint32_le(s, 0); // Unknown. Garbage pad? - s_mark_end(s); + DEBUG_CLIPBOARD(("CLIPRDR send: type=%d, status=%d, length=%d\n", type, status, length)); - sec_send_to_channel(s, encryption ? SEC_ENCRYPT : 0, 1005); // FIXME: Don't hardcode channel! + s = channel_init(cliprdr_channel, length + 12); + out_uint16_le(s, type); + out_uint16_le(s, status); + out_uint32_le(s, length); + out_uint8p(s, data, length); + out_uint32(s, 0); /* pad? */ + s_mark_end(s); + channel_send(s, cliprdr_channel); } - void -cliprdr_handle_SelectionRequest(XSelectionRequestEvent *xevent) +cliprdr_send_text_format_announce(void) { + uint8 buffer[36]; - Atom *targets; - int res; - - XSelectionEvent xev; - DEBUG_CLIPBOARD(("cliprdr_handle_SelectionRequest\n")); - DEBUG_CLIPBOARD(("Requestor window id 0x%x ", - (unsigned)xevent->requestor)); - if (clipboard_atom == xevent->selection) { - DEBUG_CLIPBOARD(("wants CLIPBOARD\n")); - } - if (primary_atom == xevent->selection) { - DEBUG_CLIPBOARD(("wants PRIMARY\n")); - } - DEBUG_CLIPBOARD(("Target is %s (0x%x), property is %s (0x%x)\n", - XGetAtomName(display, xevent->target), - (unsigned)xevent->target, - XGetAtomName(display, xevent->property), - (unsigned)xevent->property)); - - xev.type = SelectionNotify; - xev.serial = 0; - xev.send_event = True; - xev.requestor = xevent->requestor; - xev.selection = xevent->selection; - xev.target = xevent->target; - xev.property = xevent->property; - xev.time = xevent->time; - - if (targets_atom == xevent->target) - { - DEBUG_CLIPBOARD(("TARGETS requested, sending list..\n")); - targets = xmalloc(4*sizeof(Atom)); - targets[0] = xevent->target; - targets[1] = XInternAtom(display, "TEXT", True); - targets[2] = XInternAtom(display, "UTF8_STRING", True); - targets[3] = XInternAtom(display, "TIMESTAMP", True); - res = XChangeProperty(display, - xevent->requestor, - xevent->property, - XA_ATOM, - 32, - PropModeAppend, - (unsigned char *)targets, - 3); - DEBUG_CLIPBOARD(("res after XChangeProperty is ")); - print_X_error(res); - - res = XSendEvent(display, - xevent->requestor, - False, - NoEventMask, - (XEvent *)&xev); - return; - } else if (timestamp_atom == xevent->target) - { - DEBUG_CLIPBOARD(("TIMESTAMP requested... sending 0x%x\n", - (unsigned)last_keyrelease)); - res = XChangeProperty(display, - xevent->requestor, - xevent->property, - XA_INTEGER, - 32, - PropModeAppend, - (unsigned char *)&last_keyrelease, - 1); - res = XSendEvent(display, - xevent->requestor, - False, - NoEventMask, - (XEvent *)&xev); - } else /* Some other target */ - { - cliprdr_request_clipboard_data(CF_TEXT); - memcpy(&selection_event, &xev, sizeof(xev)); - /* Return and wait for data, handled by - cliprdr_handle_server_data */ - } + buf_out_uint32(buffer, CF_TEXT); + memset(buffer + 4, 0, sizeof(buffer) - 4); /* description */ + cliprdr_send_packet(CLIPRDR_FORMAT_ANNOUNCE, CLIPRDR_REQUEST, buffer, sizeof(buffer)); } - -static void -cliprdr_ack_format_list(void) +void +cliprdr_send_blah_format_announce(void) { - STREAM s; - s = sec_init(encryption ? SEC_ENCRYPT : 0, 20); - out_uint32_le(s, 12); - out_uint32_le(s, 0x13); - out_uint16_le(s, 3); - out_uint16_le(s, 1); - out_uint32_le(s, 0); - out_uint32_le(s, 0x0000c0da); - - s_mark_end(s); - - sec_send_to_channel(s, encryption ? SEC_ENCRYPT : 0, 1005); // FIXME: Don't hardcode channel! -} - - - + uint8 buffer[36]; - -static void -cliprdr_register_server_formats(STREAM s) -{ - uint32 remaining_length, pad; - uint16 num_formats; - cliprdr_dataformat *this, *next; - - DEBUG_CLIPBOARD(("cliprdr_register_server_formats\n")); - in_uint32_le(s, remaining_length); - - num_formats = remaining_length / 36; - if (NULL != server_formats) { - this = server_formats; - next = this->next; - while (NULL != next) { - xfree(this); - this = NULL; - this = next; - next = this->next; - } - } - this = xmalloc(sizeof(cliprdr_dataformat)); - this->next = NULL; - server_formats = this; - num_server_formats = num_formats; - while (1 < num_formats) { - in_uint32_le(s, this->identifier); - in_uint8a(s, this->textual_description, 32); - DEBUG_CLIPBOARD(("Stored format description with numeric id %d\n", - this->identifier)); - this-> next = xmalloc(sizeof(cliprdr_dataformat)); - this = this->next; - num_formats--; - } - in_uint32_le(s, this->identifier); - DEBUG_CLIPBOARD(("Stored format description with numeric id %d\n", this->identifier)); - in_uint8a(s, this->textual_description, 32); - this -> next = NULL; - in_uint32_le(s, pad); - cliprdr_print_server_formats(); + buf_out_uint32(buffer, CF_OEMTEXT); + memset(buffer + 4, 0, sizeof(buffer) - 4); /* description */ + cliprdr_send_packet(CLIPRDR_FORMAT_ANNOUNCE, CLIPRDR_REQUEST, buffer, sizeof(buffer)); } -static void -cliprdr_select_X_clipboards(void) +void +cliprdr_send_native_format_announce(uint8 * data, uint32 length) { - XSetSelectionOwner(display, primary_atom, wnd, last_keyrelease); - if (wnd != XGetSelectionOwner(display, primary_atom)) - { - warning("Failed to aquire ownership of PRIMARY clipboard\n"); - } - XSetSelectionOwner(display, clipboard_atom, wnd, CurrentTime); - if (wnd != XGetSelectionOwner(display, clipboard_atom)) - { - warning("Failed to aquire ownership of CLIPBOARD clipboard\n"); - } - + cliprdr_send_packet(CLIPRDR_FORMAT_ANNOUNCE, CLIPRDR_REQUEST, data, length); } - - -static void -cliprdr_send_format_announce(void) +void +cliprdr_send_data_request(uint32 format) { - STREAM s; - int number_of_formats = 1; - s = sec_init(encryption ? SEC_ENCRYPT : 0, number_of_formats*36+12+4+4); - out_uint32_le(s, number_of_formats*36+12); - out_uint32_le(s, 0x13); - out_uint16_le(s, 2); - out_uint16_le(s, 0); - out_uint32_le(s, number_of_formats*36); - - // out_uint32_le(s, 0xd); // FIXME: This is a rather bogus unicode text description.. - // rdp_out_unistr(s, "", 16); - // out_uint8s(s, 32); - + uint8 buffer[4]; - out_uint32_le(s, 1); // FIXME: This is a rather bogus text description.. - out_uint8s(s, 32); - - out_uint32_le(s, 0); - - s_mark_end(s); - sec_send_to_channel(s, encryption ? SEC_ENCRYPT : 0, 1005); // FIXME: Don't hardcode channel! -} - - -static void -cliprdr_handle_first_handshake(STREAM s) -{ - uint32 remaining_length, pad; - in_uint32_le(s, remaining_length); - in_uint32_le(s, pad); - DEBUG_CLIPBOARD(("Remaining length in first handshake frm server is %d, pad is %d\n", - remaining_length, pad)); - cliprdr_send_format_announce(); + buf_out_uint32(buffer, format); + cliprdr_send_packet(CLIPRDR_DATA_REQUEST, CLIPRDR_REQUEST, buffer, sizeof(buffer)); } -void cliprdr_handle_server_data(uint32 length, STREAM s) +void +cliprdr_send_data(uint8 * data, uint32 length) { - uint32 remaining_length; - char *data; - int res; - in_uint32_le(s, remaining_length); - data = s->p; - res = XChangeProperty(display, - selection_event.requestor, - selection_event.property, - XInternAtom(display, "STRING", False), - 8, - PropModeAppend, - data, - remaining_length); - - DEBUG_CLIPBOARD(("res after XChangeProperty is ")); - print_X_error(res); - - res = XSendEvent(display, - selection_event.requestor, - False, - NoEventMask, - (XEvent *)&selection_event); - - DEBUG_CLIPBOARD(("res after XSendEvent is ")); - print_X_error(res); - + cliprdr_send_packet(CLIPRDR_DATA_RESPONSE, CLIPRDR_RESPONSE, data, length); } -void cliprdr_handle_server_data_request(STREAM s) +static void +cliprdr_process(STREAM s) { - uint32 remaining_length; - uint32 wanted_formatcode, pad; - int ret; - STREAM out; - - in_uint32_le(s, remaining_length); - in_uint32_le(s, wanted_formatcode); - in_uint32_le(s, pad); - - /* FIXME: Check that we support this formatcode */ - - DEBUG_CLIPBOARD(("Request from server for format %d\n", - wanted_formatcode)); - - out = sec_init(encryption ? SEC_ENCRYPT : 0, - 26); - out_uint32_le(out, 18); - out_uint32_le(out, 0x13); - out_uint16_le(out, 5); - out_uint16_le(out, 1); - out_uint32_le(out, 6); - out_uint8p(out, "fnorp", 6); - out_uint32_le(out, 0); - - s_mark_end(out); - - sec_send_to_channel(out, encryption ? SEC_ENCRYPT : 0, 1005); // FIXME: Don't hardcode channel! - - /* - if (1 != wanted_formatcode) - { - out = sec_init(encryption ? SEC_ENCRYPT : 0, - 20); - out_uint32_le(s, 12); - out_uint32_le(s, 0x13); - out_uint16_le(s, 5); - out_uint16_le(s, 2); - out_uint32_le(s, 0); - out_uint32_le(s, 0); - s_mark_end(s); - sec_send_to_channel(s, encryption ? SEC_ENCRYPT : 0, 1005); // FIXME: Don't hardcode channel! - } - */ -} - + uint16 type, status; + uint32 length, format; + uint8 *data; -void cliprdr_callback(STREAM s) -{ - uint32 length, flags; - uint16 ptype0, ptype1; - DEBUG_CLIPBOARD(("cliprdr_callback called, clipboard data:\n")); -#ifdef WITH_DEBUG_CLIPBOARD - hexdump(s->p, s->end - s->p); -#endif + in_uint16_le(s, type); + in_uint16_le(s, status); in_uint32_le(s, length); - in_uint32_le(s, flags); + data = s->p; - DEBUG_CLIPBOARD(("length is %d, flags are %d\n", length, flags)); + DEBUG_CLIPBOARD(("CLIPRDR recv: type=%d, status=%d, length=%d\n", type, status, length)); - if (flags & 0x03 || flags & 0x01) /* Single-write op or first-packet-of-several op */ + if (status == CLIPRDR_ERROR) { - in_uint16_le(s, ptype0); - in_uint16_le(s, ptype1); - DEBUG_CLIPBOARD(("ptype0 is %d, ptype1 is %d\n", ptype0, ptype1)); - if (1 == ptype0 && 0 == ptype1) { - cliprdr_handle_first_handshake(s); - return; - } else if (3 == ptype0 && 1 == ptype1) - { - // Acknowledgment on our format announce. Do we care? Not right now. - // There is a strange pad in this packet that we might need some time, - // but probably not. - DEBUG_CLIPBOARD(("Received format announce ACK\n")); - return; - - } else if (2 == ptype0 && 0 == ptype1) + if (type == CLIPRDR_FORMAT_ACK) { - cliprdr_register_server_formats(s); - cliprdr_select_X_clipboards(); - cliprdr_ack_format_list(); + /* FIXME: We seem to get this when we send an announce while the server is + still processing a paste. Try sending another announce. */ + cliprdr_send_text_format_announce(); return; - } else if (5 == ptype0 && 1 == ptype1) - { - cliprdr_handle_server_data(length, s); - } else if (4 == ptype0 && 0 == ptype1) - { - cliprdr_handle_server_data_request(s); } - + DEBUG_CLIPBOARD(("CLIPRDR error (type=%d)\n", type)); + return; } -} + switch (type) + { + case CLIPRDR_CONNECT: + ui_clip_sync(); + break; + case CLIPRDR_FORMAT_ANNOUNCE: + ui_clip_format_announce(data, length); + cliprdr_send_packet(CLIPRDR_FORMAT_ACK, CLIPRDR_RESPONSE, NULL, 0); + return; + case CLIPRDR_FORMAT_ACK: + break; + case CLIPRDR_DATA_REQUEST: + in_uint32_le(s, format); + ui_clip_request_data(format); + break; + case CLIPRDR_DATA_RESPONSE: + ui_clip_handle_data(data, length); + break; + default: + unimpl("CLIPRDR packet type %d\n", type); + } +} -void cliprdr_init(void) -{ - primary_atom = XInternAtom(display, "PRIMARY", False); - clipboard_atom = XInternAtom(display, "CLIPBOARD", False); - targets_atom = XInternAtom(display, "TARGETS", True); - timestamp_atom = XInternAtom(display, "TIMESTAMP", True); +BOOL +cliprdr_init(void) +{ + cliprdr_channel = + channel_register("cliprdr", + CHANNEL_OPTION_INITIALIZED | CHANNEL_OPTION_ENCRYPT_RDP | + CHANNEL_OPTION_COMPRESS_RDP | CHANNEL_OPTION_SHOW_PROTOCOL, + cliprdr_process); + return (cliprdr_channel != NULL); }