/[rdesktop]/sourceforge.net/trunk/rdesktop/rdpdr.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/rdpdr.c

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

revision 435 by astrand, Wed Jul 9 09:18:20 2003 UTC revision 1372 by jsorg71, Mon Jan 8 04:47:06 2007 UTC
# Line 1  Line 1 
1    /* -*- c-basic-offset: 8 -*-
2       rdesktop: A Remote Desktop Protocol client.
3       Copyright (C) Matthew Chapman 1999-2007
4    
5       This program is free software; you can redistribute it and/or modify
6       it under the terms of the GNU General Public License as published by
7       the Free Software Foundation; either version 2 of the License, or
8       (at your option) any later version.
9    
10       This program is distributed in the hope that it will be useful,
11       but WITHOUT ANY WARRANTY; without even the implied warranty of
12       MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
13       GNU General Public License for more details.
14    
15       You should have received a copy of the GNU General Public License
16       along with this program; if not, write to the Free Software
17       Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
18    */
19    
20    /*
21      Here are some resources, for your IRP hacking pleasure:
22    
23      http://cvs.sourceforge.net/viewcvs.py/mingw/w32api/include/ddk/winddk.h?view=markup
24    
25      http://win32.mvps.org/ntfs/streams.cpp
26    
27      http://www.acc.umu.se/~bosse/ntifs.h
28    
29      http://undocumented.ntinternals.net/UserMode/Undocumented%20Functions/NT%20Objects/File/
30    
31      http://us1.samba.org/samba/ftp/specs/smb-nt01.txt
32    
33      http://www.osronline.com/
34    */
35    
36    #include <unistd.h>
37    #include <sys/types.h>
38    #include <sys/time.h>
39    #include <dirent.h>             /* opendir, closedir, readdir */
40    #include <time.h>
41    #include <errno.h>
42  #include "rdesktop.h"  #include "rdesktop.h"
43    
44  #define IRP_MJ_CREATE           0x00  #define IRP_MJ_CREATE                   0x00
45  #define IRP_MJ_CLOSE            0x02  #define IRP_MJ_CLOSE                    0x02
46  #define IRP_MJ_READ             0x03  #define IRP_MJ_READ                     0x03
47  #define IRP_MJ_WRITE            0x04  #define IRP_MJ_WRITE                    0x04
48  #define IRP_MJ_DEVICE_CONTROL   0x0e  #define IRP_MJ_QUERY_INFORMATION        0x05
49    #define IRP_MJ_SET_INFORMATION          0x06
50    #define IRP_MJ_QUERY_VOLUME_INFORMATION 0x0a
51    #define IRP_MJ_DIRECTORY_CONTROL        0x0c
52    #define IRP_MJ_DEVICE_CONTROL           0x0e
53    #define IRP_MJ_LOCK_CONTROL             0x11
54    
55  extern char hostname[16];  #define IRP_MN_QUERY_DIRECTORY          0x01
56    #define IRP_MN_NOTIFY_CHANGE_DIRECTORY  0x02
57    
58    extern char g_hostname[16];
59  extern DEVICE_FNS serial_fns;  extern DEVICE_FNS serial_fns;
60  extern DEVICE_FNS printer_fns;  extern DEVICE_FNS printer_fns;
61    extern DEVICE_FNS parallel_fns;
62    extern DEVICE_FNS disk_fns;
63    #ifdef WITH_SCARD
64    extern DEVICE_FNS scard_fns;
65    #endif
66    extern FILEINFO g_fileinfo[];
67    extern RD_BOOL g_notify_stamp;
68    
69  static VCHANNEL *rdpdr_channel;  static VCHANNEL *rdpdr_channel;
70    
71    /* If select() times out, the request for the device with handle g_min_timeout_fd is aborted */
72    RD_NTHANDLE g_min_timeout_fd;
73    uint32 g_num_devices;
74    
75    /* Table with information about rdpdr devices */
76    RDPDR_DEVICE g_rdpdr_device[RDPDR_MAX_DEVICES];
77    char *g_rdpdr_clientname = NULL;
78    
79    /* Used to store incoming io request, until they are ready to be completed */
80    /* using a linked list ensures that they are processed in the right order, */
81    /* if multiple ios are being done on the same fd */
82    struct async_iorequest
83    {
84            uint32 fd, major, minor, offset, device, id, length, partial_len;
85            long timeout,           /* Total timeout */
86              itv_timeout;          /* Interval timeout (between serial characters) */
87            uint8 *buffer;
88            DEVICE_FNS *fns;
89    
90            struct async_iorequest *next;   /* next element in list */
91    };
92    
93    struct async_iorequest *g_iorequest;
94    
95    /* Return device_id for a given handle */
96    int
97    get_device_index(RD_NTHANDLE handle)
98    {
99            int i;
100            for (i = 0; i < RDPDR_MAX_DEVICES; i++)
101            {
102                    if (g_rdpdr_device[i].handle == handle)
103                            return i;
104            }
105            return -1;
106    }
107    
108    /* Converts a windows path to a unix path */
109  void  void
110    convert_to_unix_filename(char *filename)
111    {
112            char *p;
113    
114            while ((p = strchr(filename, '\\')))
115            {
116                    *p = '/';
117            }
118    }
119    
120    static RD_BOOL
121    rdpdr_handle_ok(int device, int handle)
122    {
123            switch (g_rdpdr_device[device].device_type)
124            {
125                    case DEVICE_TYPE_PARALLEL:
126                    case DEVICE_TYPE_SERIAL:
127                    case DEVICE_TYPE_PRINTER:
128                    case DEVICE_TYPE_SCARD:
129                            if (g_rdpdr_device[device].handle != handle)
130                                    return False;
131                            break;
132                    case DEVICE_TYPE_DISK:
133                            if (g_fileinfo[handle].device_id != device)
134                                    return False;
135                            break;
136            }
137            return True;
138    }
139    
140    /* Add a new io request to the table containing pending io requests so it won't block rdesktop */
141    static RD_BOOL
142    add_async_iorequest(uint32 device, uint32 file, uint32 id, uint32 major, uint32 length,
143                        DEVICE_FNS * fns, uint32 total_timeout, uint32 interval_timeout, uint8 * buffer,
144                        uint32 offset)
145    {
146            struct async_iorequest *iorq;
147    
148            if (g_iorequest == NULL)
149            {
150                    g_iorequest = (struct async_iorequest *) xmalloc(sizeof(struct async_iorequest));
151                    if (!g_iorequest)
152                            return False;
153                    g_iorequest->fd = 0;
154                    g_iorequest->next = NULL;
155            }
156    
157            iorq = g_iorequest;
158    
159            while (iorq->fd != 0)
160            {
161                    /* create new element if needed */
162                    if (iorq->next == NULL)
163                    {
164                            iorq->next =
165                                    (struct async_iorequest *) xmalloc(sizeof(struct async_iorequest));
166                            if (!iorq->next)
167                                    return False;
168                            iorq->next->fd = 0;
169                            iorq->next->next = NULL;
170                    }
171                    iorq = iorq->next;
172            }
173            iorq->device = device;
174            iorq->fd = file;
175            iorq->id = id;
176            iorq->major = major;
177            iorq->length = length;
178            iorq->partial_len = 0;
179            iorq->fns = fns;
180            iorq->timeout = total_timeout;
181            iorq->itv_timeout = interval_timeout;
182            iorq->buffer = buffer;
183            iorq->offset = offset;
184            return True;
185    }
186    
187    static void
188  rdpdr_send_connect(void)  rdpdr_send_connect(void)
189  {  {
190          uint8 magic[4] = "rDCC";          uint8 magic[4] = "rDCC";
# Line 27  rdpdr_send_connect(void) Line 199  rdpdr_send_connect(void)
199          channel_send(s, rdpdr_channel);          channel_send(s, rdpdr_channel);
200  }  }
201    
202  void  
203    static void
204  rdpdr_send_name(void)  rdpdr_send_name(void)
205  {  {
206          uint8 magic[4] = "rDNC";          uint8 magic[4] = "rDNC";
         uint32 hostlen = (strlen(hostname) + 1) * 2;  
207          STREAM s;          STREAM s;
208            uint32 hostlen;
209    
210            if (NULL == g_rdpdr_clientname)
211            {
212                    g_rdpdr_clientname = g_hostname;
213            }
214            hostlen = (strlen(g_rdpdr_clientname) + 1) * 2;
215    
216          s = channel_init(rdpdr_channel, 16 + hostlen);          s = channel_init(rdpdr_channel, 16 + hostlen);
217          out_uint8a(s, magic, 4);          out_uint8a(s, magic, 4);
# Line 40  rdpdr_send_name(void) Line 219  rdpdr_send_name(void)
219          out_uint16_le(s, 0x72);          out_uint16_le(s, 0x72);
220          out_uint32(s, 0);          out_uint32(s, 0);
221          out_uint32_le(s, hostlen);          out_uint32_le(s, hostlen);
222          rdp_out_unistr(s, hostname, hostlen - 2);          rdp_out_unistr(s, g_rdpdr_clientname, hostlen - 2);
223          s_mark_end(s);          s_mark_end(s);
224          channel_send(s, rdpdr_channel);          channel_send(s, rdpdr_channel);
225  }  }
226    
227  void  /* Returns the size of the payload of the announce packet */
228    static int
229    announcedata_size()
230    {
231            int size, i;
232            PRINTER *printerinfo;
233    
234            size = 8;               /* static announce size */
235            size += g_num_devices * 0x14;
236    
237            for (i = 0; i < g_num_devices; i++)
238            {
239                    if (g_rdpdr_device[i].device_type == DEVICE_TYPE_PRINTER)
240                    {
241                            printerinfo = (PRINTER *) g_rdpdr_device[i].pdevice_data;
242                            printerinfo->bloblen =
243                                    printercache_load_blob(printerinfo->printer, &(printerinfo->blob));
244    
245                            size += 0x18;
246                            size += 2 * strlen(printerinfo->driver) + 2;
247                            size += 2 * strlen(printerinfo->printer) + 2;
248                            size += printerinfo->bloblen;
249                    }
250            }
251    
252            return size;
253    }
254    
255    static void
256  rdpdr_send_available(void)  rdpdr_send_available(void)
257  {  {
258    
259          uint8 magic[4] = "rDAD";          uint8 magic[4] = "rDAD";
260          char *driver = "Digital turbo PrintServer 20";  /* Fairly generic PostScript driver */          uint32 driverlen, printerlen, bloblen;
261          char *printer = "PostScript";          int i;
         uint32 driverlen = (strlen(driver) + 1) * 2;  
         uint32 printerlen = (strlen(printer) + 1) * 2;  
262          STREAM s;          STREAM s;
263            PRINTER *printerinfo;
264    
265          s = channel_init(rdpdr_channel, 8 + 20);          s = channel_init(rdpdr_channel, announcedata_size());
266          out_uint8a(s, magic, 4);          out_uint8a(s, magic, 4);
267          out_uint32_le(s, 1);    /* Number of devices */          out_uint32_le(s, g_num_devices);
268    
269  #if 1          for (i = 0; i < g_num_devices; i++)
270          out_uint32_le(s, 0x1);  /* Device type 0x1 - serial */          {
271          out_uint32_le(s, 0);    /* Handle */                  out_uint32_le(s, g_rdpdr_device[i].device_type);
272          out_uint8p(s, "COM2", 4);                  out_uint32_le(s, i);    /* RDP Device ID */
273          out_uint8s(s, 4);       /* Pad to 8 */                  /* Is it possible to use share names longer than 8 chars?
274          out_uint32(s, 0);                     /astrand */
275  #endif                  out_uint8p(s, g_rdpdr_device[i].name, 8);
276  #if 0  
277          out_uint32_le(s, 0x2);  /* Device type 0x2 - parallel */                  switch (g_rdpdr_device[i].device_type)
278          out_uint32_le(s, 0);                  {
279          out_uint8p(s, "LPT2", 4);                          case DEVICE_TYPE_PRINTER:
280          out_uint8s(s, 4);                                  printerinfo = (PRINTER *) g_rdpdr_device[i].pdevice_data;
281          out_uint32(s, 0);  
282  #endif                                  driverlen = 2 * strlen(printerinfo->driver) + 2;
283  #if 1                                  printerlen = 2 * strlen(printerinfo->printer) + 2;
284          out_uint32_le(s, 0x4);  /* Device type 0x4 - printer */                                  bloblen = printerinfo->bloblen;
285          out_uint32_le(s, 1);  
286          out_uint8p(s, "PRN1", 4);                                  out_uint32_le(s, 24 + driverlen + printerlen + bloblen);        /* length of extra info */
287          out_uint8s(s, 4);                                  out_uint32_le(s, printerinfo->default_printer ? 2 : 0);
288          out_uint32_le(s, 24 + driverlen + printerlen);  /* length of extra info */                                  out_uint8s(s, 8);       /* unknown */
289          out_uint32_le(s, 2);    /* unknown */                                  out_uint32_le(s, driverlen);
290          out_uint8s(s, 8);       /* unknown */                                  out_uint32_le(s, printerlen);
291          out_uint32_le(s, driverlen);    /* length of driver name */                                  out_uint32_le(s, bloblen);
292          out_uint32_le(s, printerlen);   /* length of printer name */                                  rdp_out_unistr(s, printerinfo->driver, driverlen - 2);
293          out_uint32(s, 0);       /* unknown */                                  rdp_out_unistr(s, printerinfo->printer, printerlen - 2);
294          rdp_out_unistr(s, driver, driverlen - 2);                                  out_uint8a(s, printerinfo->blob, bloblen);
295          rdp_out_unistr(s, printer, printerlen - 2);  
296  #endif                                  if (printerinfo->blob)
297  #if 0                                          xfree(printerinfo->blob);       /* Blob is sent twice if reconnecting */
298          out_uint32_le(s, 0x8);  /* Device type 0x8 - disk */                                  break;
299          out_uint32_le(s, 0);                          default:
300          out_uint8p(s, "Z:", 2);                                  out_uint32(s, 0);
301          out_uint8s(s, 6);                  }
302          out_uint32(s, 0);          }
 #endif  
303  #if 0  #if 0
304          out_uint32_le(s, 0x20); /* Device type 0x20 - smart card */          out_uint32_le(s, 0x20); /* Device type 0x20 - smart card */
305          out_uint32_le(s, 0);          out_uint32_le(s, 0);
# Line 113  rdpdr_send_completion(uint32 device, uin Line 319  rdpdr_send_completion(uint32 device, uin
319          uint8 magic[4] = "rDCI";          uint8 magic[4] = "rDCI";
320          STREAM s;          STREAM s;
321    
322    #ifdef WITH_SCARD
323            scard_lock(SCARD_LOCK_RDPDR);
324    #endif
325          s = channel_init(rdpdr_channel, 20 + length);          s = channel_init(rdpdr_channel, 20 + length);
326          out_uint8a(s, magic, 4);          out_uint8a(s, magic, 4);
327          out_uint32_le(s, device);          out_uint32_le(s, device);
# Line 121  rdpdr_send_completion(uint32 device, uin Line 330  rdpdr_send_completion(uint32 device, uin
330          out_uint32_le(s, result);          out_uint32_le(s, result);
331          out_uint8p(s, buffer, length);          out_uint8p(s, buffer, length);
332          s_mark_end(s);          s_mark_end(s);
333          hexdump(s->channel_hdr + 8, s->end - s->channel_hdr - 8);          /* JIF */
334    #ifdef WITH_DEBUG_RDP5
335            printf("--> rdpdr_send_completion\n");
336            /* hexdump(s->channel_hdr + 8, s->end - s->channel_hdr - 8); */
337    #endif
338          channel_send(s, rdpdr_channel);          channel_send(s, rdpdr_channel);
339    #ifdef WITH_SCARD
340            scard_unlock(SCARD_LOCK_RDPDR);
341    #endif
342  }  }
343    
344  static void  static void
345  rdpdr_process_irp(STREAM s)  rdpdr_process_irp(STREAM s)
346  {  {
347          uint32 device, file, id, major, minor;          uint32 result = 0,
348          NTSTATUS status = STATUS_INVALID_DEVICE_REQUEST;                  length = 0,
349          uint32 result = 0, length, request, bytes_in, bytes_out;                  desired_access = 0,
350          uint8 buffer[256];                  request,
351          uint32 buffer_len = 1;                  file,
352                    info_level,
353                    buffer_len,
354                    id,
355                    major,
356                    minor,
357                    device,
358                    offset,
359                    bytes_in,
360                    bytes_out,
361                    error_mode,
362                    share_mode, disposition, total_timeout, interval_timeout, flags_and_attributes = 0;
363    
364            char filename[PATH_MAX];
365            uint8 *buffer, *pst_buf;
366          struct stream out;          struct stream out;
367          DEVICE_FNS *fns;          DEVICE_FNS *fns;
368            RD_BOOL rw_blocking = True;
369            RD_NTSTATUS status = RD_STATUS_INVALID_DEVICE_REQUEST;
370    
371          in_uint32_le(s, device);          in_uint32_le(s, device);
372          in_uint32_le(s, file);          in_uint32_le(s, file);
# Line 142  rdpdr_process_irp(STREAM s) Line 374  rdpdr_process_irp(STREAM s)
374          in_uint32_le(s, major);          in_uint32_le(s, major);
375          in_uint32_le(s, minor);          in_uint32_le(s, minor);
376    
377          memset(buffer, 0, sizeof(buffer));          buffer_len = 0;
378            buffer = (uint8 *) xmalloc(1024);
379            buffer[0] = 0;
380    
381          /* FIXME: this should probably be a more dynamic mapping */          switch (g_rdpdr_device[device].device_type)
         switch (device)  
382          {          {
383                  case 0:                  case DEVICE_TYPE_SERIAL:
384    
385                          fns = &serial_fns;                          fns = &serial_fns;
386                  case 1:                          rw_blocking = False;
387                            break;
388    
389                    case DEVICE_TYPE_PARALLEL:
390    
391                            fns = &parallel_fns;
392                            rw_blocking = False;
393                            break;
394    
395                    case DEVICE_TYPE_PRINTER:
396    
397                          fns = &printer_fns;                          fns = &printer_fns;
398                            break;
399    
400                    case DEVICE_TYPE_DISK:
401    
402                            fns = &disk_fns;
403                            rw_blocking = False;
404                            break;
405    
406                    case DEVICE_TYPE_SCARD:
407    #ifdef WITH_SCARD
408                            fns = &scard_fns;
409                            rw_blocking = False;
410                            break;
411    #endif
412                  default:                  default:
413    
414                          error("IRP for bad device %ld\n", device);                          error("IRP for bad device %ld\n", device);
415                          return;                          return;
416          }          }
# Line 159  rdpdr_process_irp(STREAM s) Line 418  rdpdr_process_irp(STREAM s)
418          switch (major)          switch (major)
419          {          {
420                  case IRP_MJ_CREATE:                  case IRP_MJ_CREATE:
421                          if (fns->create)  
422                                  status = fns->create(&result);                          in_uint32_be(s, desired_access);
423                            in_uint8s(s, 0x08);     /* unknown */
424                            in_uint32_le(s, error_mode);
425                            in_uint32_le(s, share_mode);
426                            in_uint32_le(s, disposition);
427                            in_uint32_le(s, flags_and_attributes);
428                            in_uint32_le(s, length);
429    
430                            if (length && (length / 2) < 256)
431                            {
432                                    rdp_in_unistr(s, filename, length);
433                                    convert_to_unix_filename(filename);
434                            }
435                            else
436                            {
437                                    filename[0] = 0;
438                            }
439    
440                            if (!fns->create)
441                            {
442                                    status = RD_STATUS_NOT_SUPPORTED;
443                                    break;
444                            }
445    
446                            status = fns->create(device, desired_access, share_mode, disposition,
447                                                 flags_and_attributes, filename, &result);
448                            buffer_len = 1;
449                          break;                          break;
450    
451                  case IRP_MJ_CLOSE:                  case IRP_MJ_CLOSE:
452                          if (fns->close)                          if (!fns->close)
453                                  status = fns->close(file);                          {
454                                    status = RD_STATUS_NOT_SUPPORTED;
455                                    break;
456                            }
457    
458                            status = fns->close(file);
459                          break;                          break;
460    
461                  case IRP_MJ_READ:                  case IRP_MJ_READ:
462                          if (fns->read)  
463                            if (!fns->read)
464                            {
465                                    status = RD_STATUS_NOT_SUPPORTED;
466                                    break;
467                            }
468    
469                            in_uint32_le(s, length);
470                            in_uint32_le(s, offset);
471    #if WITH_DEBUG_RDP5
472                            DEBUG(("RDPDR IRP Read (length: %d, offset: %d)\n", length, offset));
473    #endif
474                            if (!rdpdr_handle_ok(device, file))
475                            {
476                                    status = RD_STATUS_INVALID_HANDLE;
477                                    break;
478                            }
479    
480                            if (rw_blocking)        /* Complete read immediately */
481                          {                          {
482                                  if (length > sizeof(buffer))                                  buffer = (uint8 *) xrealloc((void *) buffer, length);
483                                          length = sizeof(buffer);                                  if (!buffer)
484                                  status = fns->read(file, buffer, length, &result);                                  {
485                                            status = RD_STATUS_CANCELLED;
486                                            break;
487                                    }
488                                    status = fns->read(file, buffer, length, offset, &result);
489                                  buffer_len = result;                                  buffer_len = result;
490                                    break;
491                          }                          }
                         break;  
492    
493                            /* Add request to table */
494                            pst_buf = (uint8 *) xmalloc(length);
495                            if (!pst_buf)
496                            {
497                                    status = RD_STATUS_CANCELLED;
498                                    break;
499                            }
500                            serial_get_timeout(file, length, &total_timeout, &interval_timeout);
501                            if (add_async_iorequest
502                                (device, file, id, major, length, fns, total_timeout, interval_timeout,
503                                 pst_buf, offset))
504                            {
505                                    status = RD_STATUS_PENDING;
506                                    break;
507                            }
508    
509                            status = RD_STATUS_CANCELLED;
510                            break;
511                  case IRP_MJ_WRITE:                  case IRP_MJ_WRITE:
512                          if (fns->write)  
513                                  status = fns->write(file, s->p, length, &result);                          buffer_len = 1;
514    
515                            if (!fns->write)
516                            {
517                                    status = RD_STATUS_NOT_SUPPORTED;
518                                    break;
519                            }
520    
521                            in_uint32_le(s, length);
522                            in_uint32_le(s, offset);
523                            in_uint8s(s, 0x18);
524    #if WITH_DEBUG_RDP5
525                            DEBUG(("RDPDR IRP Write (length: %d)\n", result));
526    #endif
527                            if (!rdpdr_handle_ok(device, file))
528                            {
529                                    status = RD_STATUS_INVALID_HANDLE;
530                                    break;
531                            }
532    
533                            if (rw_blocking)        /* Complete immediately */
534                            {
535                                    status = fns->write(file, s->p, length, offset, &result);
536                                    break;
537                            }
538    
539                            /* Add to table */
540                            pst_buf = (uint8 *) xmalloc(length);
541                            if (!pst_buf)
542                            {
543                                    status = RD_STATUS_CANCELLED;
544                                    break;
545                            }
546    
547                            in_uint8a(s, pst_buf, length);
548    
549                            if (add_async_iorequest
550                                (device, file, id, major, length, fns, 0, 0, pst_buf, offset))
551                            {
552                                    status = RD_STATUS_PENDING;
553                                    break;
554                            }
555    
556                            status = RD_STATUS_CANCELLED;
557                            break;
558    
559                    case IRP_MJ_QUERY_INFORMATION:
560    
561                            if (g_rdpdr_device[device].device_type != DEVICE_TYPE_DISK)
562                            {
563                                    status = RD_STATUS_INVALID_HANDLE;
564                                    break;
565                            }
566                            in_uint32_le(s, info_level);
567    
568                            out.data = out.p = buffer;
569                            out.size = sizeof(buffer);
570                            status = disk_query_information(file, info_level, &out);
571                            result = buffer_len = out.p - out.data;
572    
573                            break;
574    
575                    case IRP_MJ_SET_INFORMATION:
576    
577                            if (g_rdpdr_device[device].device_type != DEVICE_TYPE_DISK)
578                            {
579                                    status = RD_STATUS_INVALID_HANDLE;
580                                    break;
581                            }
582    
583                            in_uint32_le(s, info_level);
584    
585                            out.data = out.p = buffer;
586                            out.size = sizeof(buffer);
587                            status = disk_set_information(file, info_level, s, &out);
588                            result = buffer_len = out.p - out.data;
589                            break;
590    
591                    case IRP_MJ_QUERY_VOLUME_INFORMATION:
592    
593                            if (g_rdpdr_device[device].device_type != DEVICE_TYPE_DISK)
594                            {
595                                    status = RD_STATUS_INVALID_HANDLE;
596                                    break;
597                            }
598    
599                            in_uint32_le(s, info_level);
600    
601                            out.data = out.p = buffer;
602                            out.size = sizeof(buffer);
603                            status = disk_query_volume_information(file, info_level, &out);
604                            result = buffer_len = out.p - out.data;
605                            break;
606    
607                    case IRP_MJ_DIRECTORY_CONTROL:
608    
609                            if (g_rdpdr_device[device].device_type != DEVICE_TYPE_DISK)
610                            {
611                                    status = RD_STATUS_INVALID_HANDLE;
612                                    break;
613                            }
614    
615                            switch (minor)
616                            {
617                                    case IRP_MN_QUERY_DIRECTORY:
618    
619                                            in_uint32_le(s, info_level);
620                                            in_uint8s(s, 1);
621                                            in_uint32_le(s, length);
622                                            in_uint8s(s, 0x17);
623                                            if (length && length < 2 * 255)
624                                            {
625                                                    rdp_in_unistr(s, filename, length);
626                                                    convert_to_unix_filename(filename);
627                                            }
628                                            else
629                                            {
630                                                    filename[0] = 0;
631                                            }
632                                            out.data = out.p = buffer;
633                                            out.size = sizeof(buffer);
634                                            status = disk_query_directory(file, info_level, filename,
635                                                                          &out);
636                                            result = buffer_len = out.p - out.data;
637                                            if (!buffer_len)
638                                                    buffer_len++;
639                                            break;
640    
641                                    case IRP_MN_NOTIFY_CHANGE_DIRECTORY:
642    
643                                            /* JIF
644                                               unimpl("IRP major=0x%x minor=0x%x: IRP_MN_NOTIFY_CHANGE_DIRECTORY\n", major, minor);  */
645    
646                                            in_uint32_le(s, info_level);    /* notify mask */
647    
648                                            g_notify_stamp = True;
649    
650                                            status = disk_create_notify(file, info_level);
651                                            result = 0;
652    
653                                            if (status == RD_STATUS_PENDING)
654                                                    add_async_iorequest(device, file, id, major, length,
655                                                                        fns, 0, 0, NULL, 0);
656                                            break;
657    
658                                    default:
659    
660                                            status = RD_STATUS_INVALID_PARAMETER;
661                                            /* JIF */
662                                            unimpl("IRP major=0x%x minor=0x%x\n", major, minor);
663                            }
664                          break;                          break;
665    
666                  case IRP_MJ_DEVICE_CONTROL:                  case IRP_MJ_DEVICE_CONTROL:
667                          if (fns->device_control)  
668                            if (!fns->device_control)
669                            {
670                                    status = RD_STATUS_NOT_SUPPORTED;
671                                    break;
672                            }
673    
674                            in_uint32_le(s, bytes_out);
675                            in_uint32_le(s, bytes_in);
676                            in_uint32_le(s, request);
677                            in_uint8s(s, 0x14);
678    
679                            buffer = (uint8 *) xrealloc((void *) buffer, bytes_out + 0x14);
680                            if (!buffer)
681                          {                          {
682                                  in_uint32_le(s, bytes_out);                                  status = RD_STATUS_CANCELLED;
683                                  in_uint32_le(s, bytes_in);                                  break;
                                 in_uint32_le(s, request);  
                                 in_uint8s(s, 0x14);  
                                 out.data = out.p = buffer;  
                                 out.size = sizeof(buffer);  
                                 status = fns->device_control(file, request, s, &out);  
                                 result = buffer_len = out.p - out.data;  
684                          }                          }
685    
686                            out.data = out.p = buffer;
687                            out.size = sizeof(buffer);
688    
689                            DEBUG_SCARD(("[SMART-CARD TRACE]\n"));
690                            DEBUG_SCARD(("device 0x%.8x\n", device));
691                            DEBUG_SCARD(("file   0x%.8x\n", file));
692                            DEBUG_SCARD(("id     0x%.8x\n", id));
693    #ifdef WITH_SCARD
694                            scardSetInfo(device, id, bytes_out + 0x14);
695    #endif
696                            status = fns->device_control(file, request, s, &out);
697                            result = buffer_len = out.p - out.data;
698    
699                            DEBUG_SCARD(("[SMART-CARD TRACE] OUT 0x%.8x\n", status));
700    
701                            /* Serial SERIAL_WAIT_ON_MASK */
702                            if (status == RD_STATUS_PENDING)
703                            {
704                                    if (add_async_iorequest
705                                        (device, file, id, major, length, fns, 0, 0, NULL, 0))
706                                    {
707                                            status = RD_STATUS_PENDING;
708                                            break;
709                                    }
710                            }
711    #ifdef WITH_SCARD
712                            else if (status == (RD_STATUS_PENDING | 0xC0000000))
713                                    status = RD_STATUS_PENDING;
714    #endif
715                            break;
716    
717    
718                    case IRP_MJ_LOCK_CONTROL:
719    
720                            if (g_rdpdr_device[device].device_type != DEVICE_TYPE_DISK)
721                            {
722                                    status = RD_STATUS_INVALID_HANDLE;
723                                    break;
724                            }
725    
726                            in_uint32_le(s, info_level);
727    
728                            out.data = out.p = buffer;
729                            out.size = sizeof(buffer);
730                            /* FIXME: Perhaps consider actually *do*
731                               something here :-) */
732                            status = RD_STATUS_SUCCESS;
733                            result = buffer_len = out.p - out.data;
734                          break;                          break;
735    
736                  default:                  default:
# Line 202  rdpdr_process_irp(STREAM s) Line 738  rdpdr_process_irp(STREAM s)
738                          break;                          break;
739          }          }
740    
741          rdpdr_send_completion(device, id, status, result, buffer, buffer_len);          if (status != RD_STATUS_PENDING)
742            {
743                    rdpdr_send_completion(device, id, status, result, buffer, buffer_len);
744            }
745            if (buffer)
746                    xfree(buffer);
747            buffer = NULL;
748    }
749    
750    static void
751    rdpdr_send_clientcapabilty(void)
752    {
753            uint8 magic[4] = "rDPC";
754            STREAM s;
755    
756            s = channel_init(rdpdr_channel, 0x50);
757            out_uint8a(s, magic, 4);
758            out_uint32_le(s, 5);    /* count */
759            out_uint16_le(s, 1);    /* first */
760            out_uint16_le(s, 0x28); /* length */
761            out_uint32_le(s, 1);
762            out_uint32_le(s, 2);
763            out_uint16_le(s, 2);
764            out_uint16_le(s, 5);
765            out_uint16_le(s, 1);
766            out_uint16_le(s, 5);
767            out_uint16_le(s, 0xFFFF);
768            out_uint16_le(s, 0);
769            out_uint32_le(s, 0);
770            out_uint32_le(s, 3);
771            out_uint32_le(s, 0);
772            out_uint32_le(s, 0);
773            out_uint16_le(s, 2);    /* second */
774            out_uint16_le(s, 8);    /* length */
775            out_uint32_le(s, 1);
776            out_uint16_le(s, 3);    /* third */
777            out_uint16_le(s, 8);    /* length */
778            out_uint32_le(s, 1);
779            out_uint16_le(s, 4);    /* fourth */
780            out_uint16_le(s, 8);    /* length */
781            out_uint32_le(s, 1);
782            out_uint16_le(s, 5);    /* fifth */
783            out_uint16_le(s, 8);    /* length */
784            out_uint32_le(s, 1);
785    
786            s_mark_end(s);
787            channel_send(s, rdpdr_channel);
788  }  }
789    
790  static void  static void
791  rdpdr_process(STREAM s)  rdpdr_process(STREAM s)
792  {  {
793          uint32 handle;          uint32 handle;
794          char *magic;          uint8 *magic;
795    
796          printf("rdpdr_process\n");  #if WITH_DEBUG_RDP5
797            printf("--- rdpdr_process ---\n");
798          hexdump(s->p, s->end - s->p);          hexdump(s->p, s->end - s->p);
799    #endif
800          in_uint8p(s, magic, 4);          in_uint8p(s, magic, 4);
801    
802          if ((magic[0] == 'r') && (magic[1] == 'D'))          if ((magic[0] == 'r') && (magic[1] == 'D'))
# Line 226  rdpdr_process(STREAM s) Line 810  rdpdr_process(STREAM s)
810                  {                  {
811                          rdpdr_send_connect();                          rdpdr_send_connect();
812                          rdpdr_send_name();                          rdpdr_send_name();
                         rdpdr_send_available();  
813                          return;                          return;
814                  }                  }
815                  else if ((magic[2] == 'C') && (magic[3] == 'C'))                  if ((magic[2] == 'C') && (magic[3] == 'C'))
816                  {                  {
817                          /* connect from server */                          /* connect from server */
818                            rdpdr_send_clientcapabilty();
819                            rdpdr_send_available();
820                          return;                          return;
821                  }                  }
822                  else if ((magic[2] == 'r') && (magic[3] == 'd'))                  if ((magic[2] == 'r') && (magic[3] == 'd'))
823                  {                  {
824                          /* connect to a specific resource */                          /* connect to a specific resource */
825                          in_uint32(s, handle);                          in_uint32(s, handle);
826                          printf("Server connected to resource %d\n", handle);  #if WITH_DEBUG_RDP5
827                            DEBUG(("RDPDR: Server connected to resource %d\n", handle));
828    #endif
829                            return;
830                    }
831                    if ((magic[2] == 'P') && (magic[3] == 'S'))
832                    {
833                            /* server capability */
834                            return;
835                    }
836            }
837            if ((magic[0] == 'R') && (magic[1] == 'P'))
838            {
839                    if ((magic[2] == 'C') && (magic[3] == 'P'))
840                    {
841                            printercache_process(s);
842                          return;                          return;
843                  }                  }
844          }          }
845          unimpl("RDPDR packet type %c%c%c%c\n", magic[0], magic[1], magic[2], magic[3]);          unimpl("RDPDR packet type %c%c%c%c\n", magic[0], magic[1], magic[2], magic[3]);
846  }  }
847    
848  BOOL  RD_BOOL
849  rdpdr_init(void)  rdpdr_init()
850  {  {
851          rdpdr_channel =          if (g_num_devices > 0)
852                  channel_register("rdpdr", CHANNEL_OPTION_INITIALIZED | CHANNEL_OPTION_COMPRESS_RDP,          {
853                                   rdpdr_process);                  rdpdr_channel =
854                            channel_register("rdpdr",
855                                             CHANNEL_OPTION_INITIALIZED | CHANNEL_OPTION_COMPRESS_RDP,
856                                             rdpdr_process);
857            }
858    
859          return (rdpdr_channel != NULL);          return (rdpdr_channel != NULL);
860  }  }
861    
862    /* Add file descriptors of pending io request to select() */
863    void
864    rdpdr_add_fds(int *n, fd_set * rfds, fd_set * wfds, struct timeval *tv, RD_BOOL * timeout)
865    {
866            uint32 select_timeout = 0;      /* Timeout value to be used for select() (in millisecons). */
867            struct async_iorequest *iorq;
868            char c;
869    
870            iorq = g_iorequest;
871            while (iorq != NULL)
872            {
873                    if (iorq->fd != 0)
874                    {
875                            switch (iorq->major)
876                            {
877                                    case IRP_MJ_READ:
878                                            /* Is this FD valid? FDs will
879                                               be invalid when
880                                               reconnecting. FIXME: Real
881                                               support for reconnects. */
882    
883                                            FD_SET(iorq->fd, rfds);
884                                            *n = MAX(*n, iorq->fd);
885    
886                                            /* Check if io request timeout is smaller than current (but not 0). */
887                                            if (iorq->timeout
888                                                && (select_timeout == 0
889                                                    || iorq->timeout < select_timeout))
890                                            {
891                                                    /* Set new timeout */
892                                                    select_timeout = iorq->timeout;
893                                                    g_min_timeout_fd = iorq->fd;    /* Remember fd */
894                                                    tv->tv_sec = select_timeout / 1000;
895                                                    tv->tv_usec = (select_timeout % 1000) * 1000;
896                                                    *timeout = True;
897                                                    break;
898                                            }
899                                            if (iorq->itv_timeout && iorq->partial_len > 0
900                                                && (select_timeout == 0
901                                                    || iorq->itv_timeout < select_timeout))
902                                            {
903                                                    /* Set new timeout */
904                                                    select_timeout = iorq->itv_timeout;
905                                                    g_min_timeout_fd = iorq->fd;    /* Remember fd */
906                                                    tv->tv_sec = select_timeout / 1000;
907                                                    tv->tv_usec = (select_timeout % 1000) * 1000;
908                                                    *timeout = True;
909                                                    break;
910                                            }
911                                            break;
912    
913                                    case IRP_MJ_WRITE:
914                                            /* FD still valid? See above. */
915                                            if ((write(iorq->fd, &c, 0) != 0) && (errno == EBADF))
916                                                    break;
917    
918                                            FD_SET(iorq->fd, wfds);
919                                            *n = MAX(*n, iorq->fd);
920                                            break;
921    
922                                    case IRP_MJ_DEVICE_CONTROL:
923                                            if (select_timeout > 5)
924                                                    select_timeout = 5;     /* serial event queue */
925                                            break;
926    
927                            }
928    
929                    }
930    
931                    iorq = iorq->next;
932            }
933    }
934    
935    struct async_iorequest *
936    rdpdr_remove_iorequest(struct async_iorequest *prev, struct async_iorequest *iorq)
937    {
938            if (!iorq)
939                    return NULL;
940    
941            if (iorq->buffer)
942                    xfree(iorq->buffer);
943            if (prev)
944            {
945                    prev->next = iorq->next;
946                    xfree(iorq);
947                    iorq = prev->next;
948            }
949            else
950            {
951                    /* Even if NULL */
952                    g_iorequest = iorq->next;
953                    xfree(iorq);
954                    iorq = NULL;
955            }
956            return iorq;
957    }
958    
959    /* Check if select() returned with one of the rdpdr file descriptors, and complete io if it did */
960    static void
961    _rdpdr_check_fds(fd_set * rfds, fd_set * wfds, RD_BOOL timed_out)
962    {
963            RD_NTSTATUS status;
964            uint32 result = 0;
965            DEVICE_FNS *fns;
966            struct async_iorequest *iorq;
967            struct async_iorequest *prev;
968            uint32 req_size = 0;
969            uint32 buffer_len;
970            struct stream out;
971            uint8 *buffer = NULL;
972    
973    
974            if (timed_out)
975            {
976                    /* check serial iv_timeout */
977    
978                    iorq = g_iorequest;
979                    prev = NULL;
980                    while (iorq != NULL)
981                    {
982                            if (iorq->fd == g_min_timeout_fd)
983                            {
984                                    if ((iorq->partial_len > 0) &&
985                                        (g_rdpdr_device[iorq->device].device_type ==
986                                         DEVICE_TYPE_SERIAL))
987                                    {
988    
989                                            /* iv_timeout between 2 chars, send partial_len */
990                                            /*printf("RDPDR: IVT total %u bytes read of %u\n", iorq->partial_len, iorq->length); */
991                                            rdpdr_send_completion(iorq->device,
992                                                                  iorq->id, RD_STATUS_SUCCESS,
993                                                                  iorq->partial_len,
994                                                                  iorq->buffer, iorq->partial_len);
995                                            iorq = rdpdr_remove_iorequest(prev, iorq);
996                                            return;
997                                    }
998                                    else
999                                    {
1000                                            break;
1001                                    }
1002    
1003                            }
1004                            else
1005                            {
1006                                    break;
1007                            }
1008    
1009    
1010                            prev = iorq;
1011                            if (iorq)
1012                                    iorq = iorq->next;
1013    
1014                    }
1015    
1016                    rdpdr_abort_io(g_min_timeout_fd, 0, RD_STATUS_TIMEOUT);
1017                    return;
1018            }
1019    
1020            iorq = g_iorequest;
1021            prev = NULL;
1022            while (iorq != NULL)
1023            {
1024                    if (iorq->fd != 0)
1025                    {
1026                            switch (iorq->major)
1027                            {
1028                                    case IRP_MJ_READ:
1029                                            if (FD_ISSET(iorq->fd, rfds))
1030                                            {
1031                                                    /* Read the data */
1032                                                    fns = iorq->fns;
1033    
1034                                                    req_size =
1035                                                            (iorq->length - iorq->partial_len) >
1036                                                            8192 ? 8192 : (iorq->length -
1037                                                                           iorq->partial_len);
1038                                                    /* never read larger chunks than 8k - chances are that it will block */
1039                                                    status = fns->read(iorq->fd,
1040                                                                       iorq->buffer + iorq->partial_len,
1041                                                                       req_size, iorq->offset, &result);
1042    
1043                                                    if ((long) result > 0)
1044                                                    {
1045                                                            iorq->partial_len += result;
1046                                                            iorq->offset += result;
1047                                                    }
1048    #if WITH_DEBUG_RDP5
1049                                                    DEBUG(("RDPDR: %d bytes of data read\n", result));
1050    #endif
1051                                                    /* only delete link if all data has been transfered */
1052                                                    /* or if result was 0 and status success - EOF      */
1053                                                    if ((iorq->partial_len == iorq->length) ||
1054                                                        (result == 0))
1055                                                    {
1056    #if WITH_DEBUG_RDP5
1057                                                            DEBUG(("RDPDR: AIO total %u bytes read of %u\n", iorq->partial_len, iorq->length));
1058    #endif
1059                                                            rdpdr_send_completion(iorq->device,
1060                                                                                  iorq->id, status,
1061                                                                                  iorq->partial_len,
1062                                                                                  iorq->buffer,
1063                                                                                  iorq->partial_len);
1064                                                            iorq = rdpdr_remove_iorequest(prev, iorq);
1065                                                    }
1066                                            }
1067                                            break;
1068                                    case IRP_MJ_WRITE:
1069                                            if (FD_ISSET(iorq->fd, wfds))
1070                                            {
1071                                                    /* Write data. */
1072                                                    fns = iorq->fns;
1073    
1074                                                    req_size =
1075                                                            (iorq->length - iorq->partial_len) >
1076                                                            8192 ? 8192 : (iorq->length -
1077                                                                           iorq->partial_len);
1078    
1079                                                    /* never write larger chunks than 8k - chances are that it will block */
1080                                                    status = fns->write(iorq->fd,
1081                                                                        iorq->buffer +
1082                                                                        iorq->partial_len, req_size,
1083                                                                        iorq->offset, &result);
1084    
1085                                                    if ((long) result > 0)
1086                                                    {
1087                                                            iorq->partial_len += result;
1088                                                            iorq->offset += result;
1089                                                    }
1090    
1091    #if WITH_DEBUG_RDP5
1092                                                    DEBUG(("RDPDR: %d bytes of data written\n",
1093                                                           result));
1094    #endif
1095                                                    /* only delete link if all data has been transfered */
1096                                                    /* or we couldn't write */
1097                                                    if ((iorq->partial_len == iorq->length)
1098                                                        || (result == 0))
1099                                                    {
1100    #if WITH_DEBUG_RDP5
1101                                                            DEBUG(("RDPDR: AIO total %u bytes written of %u\n", iorq->partial_len, iorq->length));
1102    #endif
1103                                                            rdpdr_send_completion(iorq->device,
1104                                                                                  iorq->id, status,
1105                                                                                  iorq->partial_len,
1106                                                                                  (uint8 *) "", 1);
1107    
1108                                                            iorq = rdpdr_remove_iorequest(prev, iorq);
1109                                                    }
1110                                            }
1111                                            break;
1112                                    case IRP_MJ_DEVICE_CONTROL:
1113                                            if (serial_get_event(iorq->fd, &result))
1114                                            {
1115                                                    buffer = (uint8 *) xrealloc((void *) buffer, 0x14);
1116                                                    out.data = out.p = buffer;
1117                                                    out.size = sizeof(buffer);
1118                                                    out_uint32_le(&out, result);
1119                                                    result = buffer_len = out.p - out.data;
1120                                                    status = RD_STATUS_SUCCESS;
1121                                                    rdpdr_send_completion(iorq->device, iorq->id,
1122                                                                          status, result, buffer,
1123                                                                          buffer_len);
1124                                                    xfree(buffer);
1125                                                    iorq = rdpdr_remove_iorequest(prev, iorq);
1126                                            }
1127    
1128                                            break;
1129                            }
1130    
1131                    }
1132                    prev = iorq;
1133                    if (iorq)
1134                            iorq = iorq->next;
1135            }
1136    
1137            /* Check notify */
1138            iorq = g_iorequest;
1139            prev = NULL;
1140            while (iorq != NULL)
1141            {
1142                    if (iorq->fd != 0)
1143                    {
1144                            switch (iorq->major)
1145                            {
1146    
1147                                    case IRP_MJ_DIRECTORY_CONTROL:
1148                                            if (g_rdpdr_device[iorq->device].device_type ==
1149                                                DEVICE_TYPE_DISK)
1150                                            {
1151    
1152                                                    if (g_notify_stamp)
1153                                                    {
1154                                                            g_notify_stamp = False;
1155                                                            status = disk_check_notify(iorq->fd);
1156                                                            if (status != RD_STATUS_PENDING)
1157                                                            {
1158                                                                    rdpdr_send_completion(iorq->device,
1159                                                                                          iorq->id,
1160                                                                                          status, 0,
1161                                                                                          NULL, 0);
1162                                                                    iorq = rdpdr_remove_iorequest(prev,
1163                                                                                                  iorq);
1164                                                            }
1165                                                    }
1166                                            }
1167                                            break;
1168    
1169    
1170    
1171                            }
1172                    }
1173    
1174                    prev = iorq;
1175                    if (iorq)
1176                            iorq = iorq->next;
1177            }
1178    
1179    }
1180    
1181    void
1182    rdpdr_check_fds(fd_set * rfds, fd_set * wfds, RD_BOOL timed_out)
1183    {
1184            fd_set dummy;
1185    
1186    
1187            FD_ZERO(&dummy);
1188    
1189    
1190            /* fist check event queue only,
1191               any serial wait event must be done before read block will be sent
1192             */
1193    
1194            _rdpdr_check_fds(&dummy, &dummy, False);
1195            _rdpdr_check_fds(rfds, wfds, timed_out);
1196    }
1197    
1198    
1199    /* Abort a pending io request for a given handle and major */
1200    RD_BOOL
1201    rdpdr_abort_io(uint32 fd, uint32 major, RD_NTSTATUS status)
1202    {
1203            uint32 result;
1204            struct async_iorequest *iorq;
1205            struct async_iorequest *prev;
1206    
1207            iorq = g_iorequest;
1208            prev = NULL;
1209            while (iorq != NULL)
1210            {
1211                    /* Only remove from table when major is not set, or when correct major is supplied.
1212                       Abort read should not abort a write io request. */
1213                    if ((iorq->fd == fd) && (major == 0 || iorq->major == major))
1214                    {
1215                            result = 0;
1216                            rdpdr_send_completion(iorq->device, iorq->id, status, result, (uint8 *) "",
1217                                                  1);
1218    
1219                            iorq = rdpdr_remove_iorequest(prev, iorq);
1220                            return True;
1221                    }
1222    
1223                    prev = iorq;
1224                    iorq = iorq->next;
1225            }
1226    
1227            return False;
1228    }

Legend:
Removed from v.435  
changed lines
  Added in v.1372

  ViewVC Help
Powered by ViewVC 1.1.26