/[rdesktop]/sourceforge.net/trunk/rdesktop/cliprdr.c
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /sourceforge.net/trunk/rdesktop/cliprdr.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 383 by forsberg, Fri Jun 6 09:20:53 2003 UTC revision 435 by astrand, Wed Jul 9 09:18:20 2003 UTC
# Line 2  Line 2 
2     rdesktop: A Remote Desktop Protocol client.     rdesktop: A Remote Desktop Protocol client.
3     Protocol services - Clipboard functions     Protocol services - Clipboard functions
4     Copyright (C) Erik Forsberg <forsberg@cendio.se> 2003     Copyright (C) Erik Forsberg <forsberg@cendio.se> 2003
5       Copyright (C) Matthew Chapman 2003
6    
7     This program is free software; you can redistribute it and/or modify     This program is free software; you can redistribute it and/or modify
8     it under the terms of the GNU General Public License as published by     it under the terms of the GNU General Public License as published by
# Line 18  Line 19 
19     Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.     Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
20  */  */
21    
 #include <X11/Xlib.h>  
 #include <X11/Xatom.h>  
22  #include "rdesktop.h"  #include "rdesktop.h"
23    
24  extern BOOL encryption;  #define CLIPRDR_CONNECT                 1
25  extern Display *display;  #define CLIPRDR_FORMAT_ANNOUNCE         2
26  extern Window wnd;  #define CLIPRDR_FORMAT_ACK              3
27  extern Time last_keyrelease;  #define CLIPRDR_DATA_REQUEST            4
28    #define CLIPRDR_DATA_RESPONSE           5
29  static Atom clipboard_atom, primary_atom, targets_atom, timestamp_atom;  
30  static cliprdr_dataformat *server_formats = NULL;  #define CLIPRDR_REQUEST                 0
31  static uint16 num_server_formats = 0;  #define CLIPRDR_RESPONSE                1
32    #define CLIPRDR_ERROR                   2
33    
34    static VCHANNEL *cliprdr_channel;
35    
36  static void  static void
37  cliprdr_print_server_formats(void)  cliprdr_send_packet(uint16 type, uint16 status, uint8 * data, uint32 length)
38  {  {
39  #ifdef WITH_DEBUG_CLIPBOARD          STREAM s;
         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 was %d server formats.\n", i));  
 #endif  
 }  
40    
41  void          DEBUG_CLIPBOARD(("CLIPRDR send: type=%d, status=%d, length=%d\n", type, status, length));
 cliprdr_handle_SelectionNotify(void)  
 {  
         DEBUG_CLIPBOARD(("cliprdr_handle_SelectionNotify\n"));  
 }  
42    
43  void          s = channel_init(cliprdr_channel, length + 12);
44  cliprdr_handle_SelectionClear(void)          out_uint16_le(s, type);
45  {          out_uint16_le(s, status);
46          DEBUG_CLIPBOARD(("cliprdr_handle_SelectionClear\n"));          out_uint32_le(s, length);
47            out_uint8p(s, data, length);
48            out_uint32(s, 0);       /* pad? */
49            s_mark_end(s);
50            channel_send(s, cliprdr_channel);
51  }  }
52    
53  void print_X_error(int res)  void
54    cliprdr_send_text_format_announce(void)
55  {  {
56          switch(res) {          uint8 buffer[36];
         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(("BadWindo\n"));  
                 break;  
57    
58          default:          buf_out_uint32(buffer, CF_TEXT);
59                  DEBUG_CLIPBOARD(("Unknown X error code %d\n", res));          memset(buffer + 4, 0, sizeof(buffer) - 4);      /* description */
60          }          cliprdr_send_packet(CLIPRDR_FORMAT_ANNOUNCE, CLIPRDR_REQUEST, buffer, sizeof(buffer));
61  }  }
62    
63  void  void
64  cliprdr_handle_SelectionRequest(XSelectionRequestEvent *xevent)  cliprdr_send_blah_format_announce(void)
65  {  {
66            uint8 buffer[36];
67    
68          Atom type_return;          buf_out_uint32(buffer, CF_OEMTEXT);
69          Atom *targets;          memset(buffer + 4, 0, sizeof(buffer) - 4);      /* description */
70          int format_return;          cliprdr_send_packet(CLIPRDR_FORMAT_ANNOUNCE, CLIPRDR_REQUEST, buffer, sizeof(buffer));
         long nitems_return;  
         long bytes_after_return;  
         char **prop_return;  
         int res;  
   
         XSelectionEvent xev;  
         DEBUG_CLIPBOARD(("cliprdr_handle_SelectionRequest\n"));  
         DEBUG_CLIPBOARD(("Requestor window id 0x%x ", 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),  
                          xevent->target,  
                          XGetAtomName(display, xevent->property),  
                          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",  
                                  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 */  
         {  
                 res = XChangeProperty(display,  
                                       xevent->requestor,  
                                       xevent->property,  
                                       XInternAtom(display, "STRING", False),  
                                       8,  
                                       PropModeAppend,  
                                       "krattoflabkat",  
                                       13);  
   
                 DEBUG_CLIPBOARD(("res after XChangeProperty is "));  
                 print_X_error(res);      
           
                 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;  
   
                 res = XSendEvent(display,  
                                  xevent->requestor,  
                                  False,  
                                  NoEventMask,  
                                  (XEvent *)&xev);  
           
                 DEBUG_CLIPBOARD(("res after XSendEvent is "));  
                 print_X_error(res);  
         }  
 }  
   
   
 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();  
71  }  }
72    
73  static void  void
74  cliprdr_select_X_clipboards(void)  cliprdr_send_native_format_announce(uint8 * data, uint32 length)
75  {  {
76          XSetSelectionOwner(display, primary_atom, wnd, last_keyrelease);          cliprdr_send_packet(CLIPRDR_FORMAT_ANNOUNCE, CLIPRDR_REQUEST, data, length);
         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");  
         }                
           
77  }  }
78    
79  static void  void
80  cliprdr_send_format_announce(void)  cliprdr_send_data_request(uint32 format)
81  {  {
82          STREAM s;          uint8 buffer[4];
         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);  
83    
84          out_uint32_le(s, 0);          buf_out_uint32(buffer, format);
85            cliprdr_send_packet(CLIPRDR_DATA_REQUEST, CLIPRDR_REQUEST, buffer, sizeof(buffer));
         s_mark_end(s);  
         sec_send_to_channel(s, encryption ? SEC_ENCRYPT : 0, 1005); // FIXME: Don't hardcode channel!  
86  }  }
                   
87    
88  static void  void
89  cliprdr_handle_first_handshake(STREAM s)  cliprdr_send_data(uint8 * data, uint32 length)
90  {  {
91          uint32 remaining_length, pad;          cliprdr_send_packet(CLIPRDR_DATA_RESPONSE, CLIPRDR_RESPONSE, data, length);
         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();  
92  }  }
93    
94  void cliprdr_callback(STREAM s)  static void
95    cliprdr_process(STREAM s)
96  {  {
97          uint32 length, flags;          uint16 type, status;
98          uint16 ptype0, ptype1;          uint32 length, format;
99          DEBUG_CLIPBOARD(("cliprdr_callback called, clipboard data:\n"));          char *data;
100  #ifdef WITH_DEBUG_CLIPBOARD  
101          hexdump(s->p, s->end - s->p);          in_uint16_le(s, type);
102  #endif          in_uint16_le(s, status);
103          in_uint32_le(s, length);          in_uint32_le(s, length);
104          in_uint32_le(s, flags);          data = s->p;
105    
106          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));
107    
108          if (flags & 0x03 || flags & 0x01) /* Single-write op or first-packet-of-several op */          if (status == CLIPRDR_ERROR)
109          {          {
110                  in_uint16_le(s, ptype0);                  if (type == CLIPRDR_FORMAT_ACK)
                 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)  
111                  {                  {
112                          // Acknowledgment on our format announce. Do we care? Not right now.                          /* FIXME: We seem to get this when we send an announce while the server is
113                          // There is a strange pad in this packet that we might need some time,                             still processing a paste. Try sending another announce. */
114                          // but probably not.                          cliprdr_send_text_format_announce();
                         DEBUG_CLIPBOARD(("Received format announce ACK\n"));  
                         return;  
                 } else if (2 == ptype0 && 0 == ptype1)  
                 {  
                         cliprdr_register_server_formats(s);  
                         cliprdr_select_X_clipboards();  
115                          return;                          return;
116                  }                  }
117                    
118                    error("CLIPRDR error (type=%d)\n", type);
119                    return;
120            }
121    
122            switch (type)
123            {
124                    case CLIPRDR_CONNECT:
125                            ui_clip_sync();
126                            break;
127                    case CLIPRDR_FORMAT_ANNOUNCE:
128                            ui_clip_format_announce(data, length);
129                            cliprdr_send_packet(CLIPRDR_FORMAT_ACK, CLIPRDR_RESPONSE, NULL, 0);
130                            return;
131                    case CLIPRDR_FORMAT_ACK:
132                            break;
133                    case CLIPRDR_DATA_REQUEST:
134                            in_uint32_le(s, format);
135                            ui_clip_request_data(format);
136                            break;
137                    case CLIPRDR_DATA_RESPONSE:
138                            ui_clip_handle_data(data, length);
139                            break;
140                    default:
141                            unimpl("CLIPRDR packet type %d\n", type);
142          }          }
143  }  }
144    
145  void cliprdr_init(void)  BOOL
146  {  cliprdr_init(void)
147          primary_atom = XInternAtom(display, "PRIMARY", False);  {
148          clipboard_atom = XInternAtom(display, "CLIPBOARD", False);          cliprdr_channel =
149          targets_atom = XInternAtom(display, "TARGETS", True);                  channel_register("cliprdr",
150          timestamp_atom = XInternAtom(display, "TIMESTAMP", True);                                   CHANNEL_OPTION_INITIALIZED | CHANNEL_OPTION_ENCRYPT_RDP |
151                                     CHANNEL_OPTION_COMPRESS_RDP | CHANNEL_OPTION_SHOW_PROTOCOL,
152                                     cliprdr_process);
153            return (cliprdr_channel != NULL);
154  }  }
Legend:
Removed from v.383  
changed lines
  Added in v.435
  ViewVC Help
Powered by ViewVC 1.1.26