mirror of
https://github.com/reactos/reactos.git
synced 2024-08-21 19:03:01 +00:00
1172 lines
26 KiB
C
1172 lines
26 KiB
C
/* -*- c-basic-offset: 8 -*-
|
|
rdesktop: A Remote Desktop Protocol client.
|
|
Copyright (C) Matthew Chapman 1999-2005
|
|
|
|
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
|
|
the Free Software Foundation; either version 2 of the License, or
|
|
(at your option) any later version.
|
|
|
|
This program is distributed in the hope that it will be useful,
|
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
GNU General Public License for more details.
|
|
|
|
You should have received a copy of the GNU General Public License along
|
|
with this program; if not, write to the Free Software Foundation, Inc.,
|
|
51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
|
|
*/
|
|
|
|
/*
|
|
Here are some resources, for your IRP hacking pleasure:
|
|
|
|
http://cvs.sourceforge.net/viewcvs.py/mingw/w32api/include/ddk/winddk.h?view=markup
|
|
|
|
http://win32.mvps.org/ntfs/streams.cpp
|
|
|
|
http://www.acc.umu.se/~bosse/ntifs.h
|
|
|
|
http://undocumented.ntinternals.net/UserMode/Undocumented%20Functions/NT%20Objects/File/
|
|
|
|
http://us1.samba.org/samba/ftp/specs/smb-nt01.txt
|
|
|
|
http://www.osronline.com/
|
|
*/
|
|
|
|
#include <unistd.h>
|
|
#include <sys/types.h>
|
|
#include <sys/time.h>
|
|
#include <dirent.h> /* opendir, closedir, readdir */
|
|
#include <time.h>
|
|
#include <errno.h>
|
|
#include "rdesktop.h"
|
|
|
|
#define IRP_MJ_CREATE 0x00
|
|
#define IRP_MJ_CLOSE 0x02
|
|
#define IRP_MJ_READ 0x03
|
|
#define IRP_MJ_WRITE 0x04
|
|
#define IRP_MJ_QUERY_INFORMATION 0x05
|
|
#define IRP_MJ_SET_INFORMATION 0x06
|
|
#define IRP_MJ_QUERY_VOLUME_INFORMATION 0x0a
|
|
#define IRP_MJ_DIRECTORY_CONTROL 0x0c
|
|
#define IRP_MJ_DEVICE_CONTROL 0x0e
|
|
#define IRP_MJ_LOCK_CONTROL 0x11
|
|
|
|
#define IRP_MN_QUERY_DIRECTORY 0x01
|
|
#define IRP_MN_NOTIFY_CHANGE_DIRECTORY 0x02
|
|
|
|
extern DEVICE_FNS serial_fns;
|
|
extern DEVICE_FNS printer_fns;
|
|
extern DEVICE_FNS parallel_fns;
|
|
extern DEVICE_FNS disk_fns;
|
|
|
|
/* Return device_id for a given handle */
|
|
int
|
|
get_device_index(RDPCLIENT * This, NTHANDLE handle)
|
|
{
|
|
int i;
|
|
for (i = 0; i < RDPDR_MAX_DEVICES; i++)
|
|
{
|
|
if (This->rdpdr_device[i].handle == handle)
|
|
return i;
|
|
}
|
|
return -1;
|
|
}
|
|
|
|
/* Converts a windows path to a unix path */
|
|
void
|
|
convert_to_unix_filename(char *filename)
|
|
{
|
|
char *p;
|
|
|
|
while ((p = strchr(filename, '\\')))
|
|
{
|
|
*p = '/';
|
|
}
|
|
}
|
|
|
|
static BOOL
|
|
rdpdr_handle_ok(RDPCLIENT * This, int device, int handle)
|
|
{
|
|
switch (This->rdpdr_device[device].device_type)
|
|
{
|
|
case DEVICE_TYPE_PARALLEL:
|
|
case DEVICE_TYPE_SERIAL:
|
|
case DEVICE_TYPE_PRINTER:
|
|
case DEVICE_TYPE_SCARD:
|
|
if (This->rdpdr_device[device].handle != handle)
|
|
return False;
|
|
break;
|
|
case DEVICE_TYPE_DISK:
|
|
if (This->fileinfo[handle].device_id != device)
|
|
return False;
|
|
break;
|
|
}
|
|
return True;
|
|
}
|
|
|
|
/* Add a new io request to the table containing pending io requests so it won't block rdesktop */
|
|
static BOOL
|
|
add_async_iorequest(RDPCLIENT * This, uint32 device, uint32 file, uint32 id, uint32 major, uint32 length,
|
|
DEVICE_FNS * fns, uint32 total_timeout, uint32 interval_timeout, uint8 * buffer,
|
|
uint32 offset)
|
|
{
|
|
struct async_iorequest *iorq;
|
|
|
|
if (This->iorequest == NULL)
|
|
{
|
|
This->iorequest = (struct async_iorequest *) xmalloc(sizeof(struct async_iorequest));
|
|
if (!This->iorequest)
|
|
return False;
|
|
This->iorequest->fd = 0;
|
|
This->iorequest->next = NULL;
|
|
}
|
|
|
|
iorq = This->iorequest;
|
|
|
|
while (iorq->fd != 0)
|
|
{
|
|
/* create new element if needed */
|
|
if (iorq->next == NULL)
|
|
{
|
|
iorq->next =
|
|
(struct async_iorequest *) xmalloc(sizeof(struct async_iorequest));
|
|
if (!iorq->next)
|
|
return False;
|
|
iorq->next->fd = 0;
|
|
iorq->next->next = NULL;
|
|
}
|
|
iorq = iorq->next;
|
|
}
|
|
iorq->device = device;
|
|
iorq->fd = file;
|
|
iorq->id = id;
|
|
iorq->major = major;
|
|
iorq->length = length;
|
|
iorq->partial_len = 0;
|
|
iorq->fns = fns;
|
|
iorq->timeout = total_timeout;
|
|
iorq->itv_timeout = interval_timeout;
|
|
iorq->buffer = buffer;
|
|
iorq->offset = offset;
|
|
return True;
|
|
}
|
|
|
|
static void
|
|
rdpdr_send_connect(RDPCLIENT * This)
|
|
{
|
|
uint8 magic[4] = "rDCC";
|
|
STREAM s;
|
|
|
|
s = channel_init(This, This->rdpdr.channel, 12);
|
|
out_uint8a(s, magic, 4);
|
|
out_uint16_le(s, 1); /* unknown */
|
|
out_uint16_le(s, 5);
|
|
out_uint32_be(s, 0x815ed39d); /* IP address (use 127.0.0.1) 0x815ed39d */
|
|
s_mark_end(s);
|
|
channel_send(This, s, This->rdpdr.channel);
|
|
}
|
|
|
|
|
|
static void
|
|
rdpdr_send_name(RDPCLIENT * This)
|
|
{
|
|
uint8 magic[4] = "rDNC";
|
|
STREAM s;
|
|
uint32 hostlen;
|
|
|
|
if (NULL == This->rdpdr_clientname)
|
|
{
|
|
This->rdpdr_clientname = This->hostname;
|
|
}
|
|
hostlen = (strlen(This->rdpdr_clientname) + 1) * 2;
|
|
|
|
s = channel_init(This, This->rdpdr.channel, 16 + hostlen);
|
|
out_uint8a(s, magic, 4);
|
|
out_uint16_le(s, 0x63); /* unknown */
|
|
out_uint16_le(s, 0x72);
|
|
out_uint32(s, 0);
|
|
out_uint32_le(s, hostlen);
|
|
rdp_out_unistr(This, s, This->rdpdr_clientname, hostlen - 2);
|
|
s_mark_end(s);
|
|
channel_send(This, s, This->rdpdr.channel);
|
|
}
|
|
|
|
/* Returns the size of the payload of the announce packet */
|
|
static int
|
|
announcedata_size(RDPCLIENT * This)
|
|
{
|
|
int size, i;
|
|
PRINTER *printerinfo;
|
|
|
|
size = 8; /* static announce size */
|
|
size += This->num_devices * 0x14;
|
|
|
|
for (i = 0; i < This->num_devices; i++)
|
|
{
|
|
if (This->rdpdr_device[i].device_type == DEVICE_TYPE_PRINTER)
|
|
{
|
|
printerinfo = (PRINTER *) This->rdpdr_device[i].pdevice_data;
|
|
printerinfo->bloblen =
|
|
printercache_load_blob(printerinfo->printer, &(printerinfo->blob));
|
|
|
|
size += 0x18;
|
|
size += 2 * strlen(printerinfo->driver) + 2;
|
|
size += 2 * strlen(printerinfo->printer) + 2;
|
|
size += printerinfo->bloblen;
|
|
}
|
|
}
|
|
|
|
return size;
|
|
}
|
|
|
|
static void
|
|
rdpdr_send_available(RDPCLIENT * This)
|
|
{
|
|
|
|
uint8 magic[4] = "rDAD";
|
|
uint32 driverlen, printerlen, bloblen;
|
|
int i;
|
|
STREAM s;
|
|
PRINTER *printerinfo;
|
|
|
|
s = channel_init(This, This->rdpdr.channel, announcedata_size(This));
|
|
out_uint8a(s, magic, 4);
|
|
out_uint32_le(s, This->num_devices);
|
|
|
|
for (i = 0; i < This->num_devices; i++)
|
|
{
|
|
out_uint32_le(s, This->rdpdr_device[i].device_type);
|
|
out_uint32_le(s, i); /* RDP Device ID */
|
|
/* Is it possible to use share names longer than 8 chars?
|
|
/astrand */
|
|
out_uint8p(s, This->rdpdr_device[i].name, 8);
|
|
|
|
switch (This->rdpdr_device[i].device_type)
|
|
{
|
|
case DEVICE_TYPE_PRINTER:
|
|
printerinfo = (PRINTER *) This->rdpdr_device[i].pdevice_data;
|
|
|
|
driverlen = 2 * strlen(printerinfo->driver) + 2;
|
|
printerlen = 2 * strlen(printerinfo->printer) + 2;
|
|
bloblen = printerinfo->bloblen;
|
|
|
|
out_uint32_le(s, 24 + driverlen + printerlen + bloblen); /* length of extra info */
|
|
out_uint32_le(s, printerinfo->default_printer ? 2 : 0);
|
|
out_uint8s(s, 8); /* unknown */
|
|
out_uint32_le(s, driverlen);
|
|
out_uint32_le(s, printerlen);
|
|
out_uint32_le(s, bloblen);
|
|
rdp_out_unistr(This, s, printerinfo->driver, driverlen - 2);
|
|
rdp_out_unistr(This, s, printerinfo->printer, printerlen - 2);
|
|
out_uint8a(s, printerinfo->blob, bloblen);
|
|
|
|
if (printerinfo->blob)
|
|
xfree(printerinfo->blob); /* Blob is sent twice if reconnecting */
|
|
break;
|
|
default:
|
|
out_uint32(s, 0);
|
|
}
|
|
}
|
|
#if 0
|
|
out_uint32_le(s, 0x20); /* Device type 0x20 - smart card */
|
|
out_uint32_le(s, 0);
|
|
out_uint8p(s, "SCARD", 5);
|
|
out_uint8s(s, 3);
|
|
out_uint32(s, 0);
|
|
#endif
|
|
|
|
s_mark_end(s);
|
|
channel_send(This, s, This->rdpdr.channel);
|
|
}
|
|
|
|
static void
|
|
rdpdr_send_completion(RDPCLIENT * This, uint32 device, uint32 id, uint32 status, uint32 result, uint8 * buffer,
|
|
uint32 length)
|
|
{
|
|
uint8 magic[4] = "rDCI";
|
|
STREAM s;
|
|
|
|
s = channel_init(This, This->rdpdr.channel, 20 + length);
|
|
out_uint8a(s, magic, 4);
|
|
out_uint32_le(s, device);
|
|
out_uint32_le(s, id);
|
|
out_uint32_le(s, status);
|
|
out_uint32_le(s, result);
|
|
out_uint8p(s, buffer, length);
|
|
s_mark_end(s);
|
|
/* JIF */
|
|
#ifdef WITH_DEBUG_RDP5
|
|
printf("--> rdpdr_send_completion\n");
|
|
/* hexdump(s->channel_hdr + 8, s->end - s->channel_hdr - 8); */
|
|
#endif
|
|
channel_send(This, s, This->rdpdr.channel);
|
|
}
|
|
|
|
static void
|
|
rdpdr_process_irp(RDPCLIENT * This, STREAM s)
|
|
{
|
|
uint32 result = 0,
|
|
length = 0,
|
|
desired_access = 0,
|
|
request,
|
|
file,
|
|
info_level,
|
|
buffer_len,
|
|
id,
|
|
major,
|
|
minor,
|
|
device,
|
|
offset,
|
|
bytes_in,
|
|
bytes_out,
|
|
error_mode,
|
|
share_mode, disposition, total_timeout, interval_timeout, flags_and_attributes = 0;
|
|
|
|
char filename[PATH_MAX];
|
|
uint8 *buffer, *pst_buf;
|
|
struct stream out;
|
|
DEVICE_FNS *fns;
|
|
BOOL rw_blocking = True;
|
|
NTSTATUS status = STATUS_INVALID_DEVICE_REQUEST;
|
|
|
|
in_uint32_le(s, device);
|
|
in_uint32_le(s, file);
|
|
in_uint32_le(s, id);
|
|
in_uint32_le(s, major);
|
|
in_uint32_le(s, minor);
|
|
|
|
buffer_len = 0;
|
|
buffer = (uint8 *) xmalloc(1024);
|
|
buffer[0] = 0;
|
|
|
|
switch (This->rdpdr_device[device].device_type)
|
|
{
|
|
case DEVICE_TYPE_SERIAL:
|
|
|
|
fns = &serial_fns;
|
|
rw_blocking = False;
|
|
break;
|
|
|
|
case DEVICE_TYPE_PARALLEL:
|
|
|
|
fns = ¶llel_fns;
|
|
rw_blocking = False;
|
|
break;
|
|
|
|
case DEVICE_TYPE_PRINTER:
|
|
|
|
fns = &printer_fns;
|
|
break;
|
|
|
|
case DEVICE_TYPE_DISK:
|
|
|
|
fns = &disk_fns;
|
|
rw_blocking = False;
|
|
break;
|
|
|
|
case DEVICE_TYPE_SCARD:
|
|
default:
|
|
|
|
error("IRP for bad device %ld\n", device);
|
|
return;
|
|
}
|
|
|
|
switch (major)
|
|
{
|
|
case IRP_MJ_CREATE:
|
|
|
|
in_uint32_be(s, desired_access);
|
|
in_uint8s(s, 0x08); /* unknown */
|
|
in_uint32_le(s, error_mode);
|
|
in_uint32_le(s, share_mode);
|
|
in_uint32_le(s, disposition);
|
|
in_uint32_le(s, flags_and_attributes);
|
|
in_uint32_le(s, length);
|
|
|
|
if (length && (length / 2) < 256)
|
|
{
|
|
rdp_in_unistr(This, s, filename, length);
|
|
convert_to_unix_filename(filename);
|
|
}
|
|
else
|
|
{
|
|
filename[0] = 0;
|
|
}
|
|
|
|
if (!fns->create)
|
|
{
|
|
status = STATUS_NOT_SUPPORTED;
|
|
break;
|
|
}
|
|
|
|
status = fns->create(This, device, desired_access, share_mode, disposition,
|
|
flags_and_attributes, filename, &result);
|
|
buffer_len = 1;
|
|
break;
|
|
|
|
case IRP_MJ_CLOSE:
|
|
if (!fns->close)
|
|
{
|
|
status = STATUS_NOT_SUPPORTED;
|
|
break;
|
|
}
|
|
|
|
status = fns->close(This, file);
|
|
break;
|
|
|
|
case IRP_MJ_READ:
|
|
|
|
if (!fns->read)
|
|
{
|
|
status = STATUS_NOT_SUPPORTED;
|
|
break;
|
|
}
|
|
|
|
in_uint32_le(s, length);
|
|
in_uint32_le(s, offset);
|
|
#if WITH_DEBUG_RDP5
|
|
DEBUG(("RDPDR IRP Read (length: %d, offset: %d)\n", length, offset));
|
|
#endif
|
|
if (!rdpdr_handle_ok(This, device, file))
|
|
{
|
|
status = STATUS_INVALID_HANDLE;
|
|
break;
|
|
}
|
|
|
|
if (rw_blocking) /* Complete read immediately */
|
|
{
|
|
buffer = (uint8 *) xrealloc((void *) buffer, length);
|
|
if (!buffer)
|
|
{
|
|
status = STATUS_CANCELLED;
|
|
break;
|
|
}
|
|
status = fns->read(This, file, buffer, length, offset, &result);
|
|
buffer_len = result;
|
|
break;
|
|
}
|
|
|
|
/* Add request to table */
|
|
pst_buf = (uint8 *) xmalloc(length);
|
|
if (!pst_buf)
|
|
{
|
|
status = STATUS_CANCELLED;
|
|
break;
|
|
}
|
|
serial_get_timeout(This, file, length, &total_timeout, &interval_timeout);
|
|
if (add_async_iorequest
|
|
(This, device, file, id, major, length, fns, total_timeout, interval_timeout,
|
|
pst_buf, offset))
|
|
{
|
|
status = STATUS_PENDING;
|
|
break;
|
|
}
|
|
|
|
status = STATUS_CANCELLED;
|
|
break;
|
|
case IRP_MJ_WRITE:
|
|
|
|
buffer_len = 1;
|
|
|
|
if (!fns->write)
|
|
{
|
|
status = STATUS_NOT_SUPPORTED;
|
|
break;
|
|
}
|
|
|
|
in_uint32_le(s, length);
|
|
in_uint32_le(s, offset);
|
|
in_uint8s(s, 0x18);
|
|
#if WITH_DEBUG_RDP5
|
|
DEBUG(("RDPDR IRP Write (length: %d)\n", result));
|
|
#endif
|
|
if (!rdpdr_handle_ok(This, device, file))
|
|
{
|
|
status = STATUS_INVALID_HANDLE;
|
|
break;
|
|
}
|
|
|
|
if (rw_blocking) /* Complete immediately */
|
|
{
|
|
status = fns->write(This, file, s->p, length, offset, &result);
|
|
break;
|
|
}
|
|
|
|
/* Add to table */
|
|
pst_buf = (uint8 *) xmalloc(length);
|
|
if (!pst_buf)
|
|
{
|
|
status = STATUS_CANCELLED;
|
|
break;
|
|
}
|
|
|
|
in_uint8a(s, pst_buf, length);
|
|
|
|
if (add_async_iorequest
|
|
(This, device, file, id, major, length, fns, 0, 0, pst_buf, offset))
|
|
{
|
|
status = STATUS_PENDING;
|
|
break;
|
|
}
|
|
|
|
status = STATUS_CANCELLED;
|
|
break;
|
|
|
|
case IRP_MJ_QUERY_INFORMATION:
|
|
|
|
if (This->rdpdr_device[device].device_type != DEVICE_TYPE_DISK)
|
|
{
|
|
status = STATUS_INVALID_HANDLE;
|
|
break;
|
|
}
|
|
in_uint32_le(s, info_level);
|
|
|
|
out.data = out.p = buffer;
|
|
out.size = sizeof(buffer);
|
|
status = disk_query_information(This, file, info_level, &out);
|
|
result = buffer_len = out.p - out.data;
|
|
|
|
break;
|
|
|
|
case IRP_MJ_SET_INFORMATION:
|
|
|
|
if (This->rdpdr_device[device].device_type != DEVICE_TYPE_DISK)
|
|
{
|
|
status = STATUS_INVALID_HANDLE;
|
|
break;
|
|
}
|
|
|
|
in_uint32_le(s, info_level);
|
|
|
|
out.data = out.p = buffer;
|
|
out.size = sizeof(buffer);
|
|
status = disk_set_information(This, file, info_level, s, &out);
|
|
result = buffer_len = out.p - out.data;
|
|
break;
|
|
|
|
case IRP_MJ_QUERY_VOLUME_INFORMATION:
|
|
|
|
if (This->rdpdr_device[device].device_type != DEVICE_TYPE_DISK)
|
|
{
|
|
status = STATUS_INVALID_HANDLE;
|
|
break;
|
|
}
|
|
|
|
in_uint32_le(s, info_level);
|
|
|
|
out.data = out.p = buffer;
|
|
out.size = sizeof(buffer);
|
|
status = disk_query_volume_information(This, file, info_level, &out);
|
|
result = buffer_len = out.p - out.data;
|
|
break;
|
|
|
|
case IRP_MJ_DIRECTORY_CONTROL:
|
|
|
|
if (This->rdpdr_device[device].device_type != DEVICE_TYPE_DISK)
|
|
{
|
|
status = STATUS_INVALID_HANDLE;
|
|
break;
|
|
}
|
|
|
|
switch (minor)
|
|
{
|
|
case IRP_MN_QUERY_DIRECTORY:
|
|
|
|
in_uint32_le(s, info_level);
|
|
in_uint8s(s, 1);
|
|
in_uint32_le(s, length);
|
|
in_uint8s(s, 0x17);
|
|
if (length && length < 2 * 255)
|
|
{
|
|
rdp_in_unistr(This, s, filename, length);
|
|
convert_to_unix_filename(filename);
|
|
}
|
|
else
|
|
{
|
|
filename[0] = 0;
|
|
}
|
|
out.data = out.p = buffer;
|
|
out.size = sizeof(buffer);
|
|
status = disk_query_directory(This, file, info_level, filename,
|
|
&out);
|
|
result = buffer_len = out.p - out.data;
|
|
if (!buffer_len)
|
|
buffer_len++;
|
|
break;
|
|
|
|
case IRP_MN_NOTIFY_CHANGE_DIRECTORY:
|
|
|
|
/* JIF
|
|
unimpl("IRP major=0x%x minor=0x%x: IRP_MN_NOTIFY_CHANGE_DIRECTORY\n", major, minor); */
|
|
|
|
in_uint32_le(s, info_level); /* notify mask */
|
|
|
|
This->notify_stamp = True;
|
|
|
|
status = disk_create_notify(This, file, info_level);
|
|
result = 0;
|
|
|
|
if (status == STATUS_PENDING)
|
|
add_async_iorequest(This, device, file, id, major, length,
|
|
fns, 0, 0, NULL, 0);
|
|
break;
|
|
|
|
default:
|
|
|
|
status = STATUS_INVALID_PARAMETER;
|
|
/* JIF */
|
|
unimpl("IRP major=0x%x minor=0x%x\n", major, minor);
|
|
}
|
|
break;
|
|
|
|
case IRP_MJ_DEVICE_CONTROL:
|
|
|
|
if (!fns->device_control)
|
|
{
|
|
status = STATUS_NOT_SUPPORTED;
|
|
break;
|
|
}
|
|
|
|
in_uint32_le(s, bytes_out);
|
|
in_uint32_le(s, bytes_in);
|
|
in_uint32_le(s, request);
|
|
in_uint8s(s, 0x14);
|
|
|
|
buffer = (uint8 *) xrealloc((void *) buffer, bytes_out + 0x14);
|
|
if (!buffer)
|
|
{
|
|
status = STATUS_CANCELLED;
|
|
break;
|
|
}
|
|
|
|
out.data = out.p = buffer;
|
|
out.size = sizeof(buffer);
|
|
status = fns->device_control(This, file, request, s, &out);
|
|
result = buffer_len = out.p - out.data;
|
|
|
|
/* Serial SERIAL_WAIT_ON_MASK */
|
|
if (status == STATUS_PENDING)
|
|
{
|
|
if (add_async_iorequest
|
|
(This, device, file, id, major, length, fns, 0, 0, NULL, 0))
|
|
{
|
|
status = STATUS_PENDING;
|
|
break;
|
|
}
|
|
}
|
|
break;
|
|
|
|
|
|
case IRP_MJ_LOCK_CONTROL:
|
|
|
|
if (This->rdpdr_device[device].device_type != DEVICE_TYPE_DISK)
|
|
{
|
|
status = STATUS_INVALID_HANDLE;
|
|
break;
|
|
}
|
|
|
|
in_uint32_le(s, info_level);
|
|
|
|
out.data = out.p = buffer;
|
|
out.size = sizeof(buffer);
|
|
/* FIXME: Perhaps consider actually *do*
|
|
something here :-) */
|
|
status = STATUS_SUCCESS;
|
|
result = buffer_len = out.p - out.data;
|
|
break;
|
|
|
|
default:
|
|
unimpl("IRP major=0x%x minor=0x%x\n", major, minor);
|
|
break;
|
|
}
|
|
|
|
if (status != STATUS_PENDING)
|
|
{
|
|
rdpdr_send_completion(This, device, id, status, result, buffer, buffer_len);
|
|
}
|
|
if (buffer)
|
|
xfree(buffer);
|
|
buffer = NULL;
|
|
}
|
|
|
|
static void
|
|
rdpdr_send_clientcapabilty(RDPCLIENT * This)
|
|
{
|
|
uint8 magic[4] = "rDPC";
|
|
STREAM s;
|
|
|
|
s = channel_init(This, This->rdpdr.channel, 0x50);
|
|
out_uint8a(s, magic, 4);
|
|
out_uint32_le(s, 5); /* count */
|
|
out_uint16_le(s, 1); /* first */
|
|
out_uint16_le(s, 0x28); /* length */
|
|
out_uint32_le(s, 1);
|
|
out_uint32_le(s, 2);
|
|
out_uint16_le(s, 2);
|
|
out_uint16_le(s, 5);
|
|
out_uint16_le(s, 1);
|
|
out_uint16_le(s, 5);
|
|
out_uint16_le(s, 0xFFFF);
|
|
out_uint16_le(s, 0);
|
|
out_uint32_le(s, 0);
|
|
out_uint32_le(s, 3);
|
|
out_uint32_le(s, 0);
|
|
out_uint32_le(s, 0);
|
|
out_uint16_le(s, 2); /* second */
|
|
out_uint16_le(s, 8); /* length */
|
|
out_uint32_le(s, 1);
|
|
out_uint16_le(s, 3); /* third */
|
|
out_uint16_le(s, 8); /* length */
|
|
out_uint32_le(s, 1);
|
|
out_uint16_le(s, 4); /* fourth */
|
|
out_uint16_le(s, 8); /* length */
|
|
out_uint32_le(s, 1);
|
|
out_uint16_le(s, 5); /* fifth */
|
|
out_uint16_le(s, 8); /* length */
|
|
out_uint32_le(s, 1);
|
|
|
|
s_mark_end(s);
|
|
channel_send(This, s, This->rdpdr.channel);
|
|
}
|
|
|
|
static void
|
|
rdpdr_process(RDPCLIENT * This, STREAM s)
|
|
{
|
|
uint32 handle;
|
|
uint8 *magic;
|
|
|
|
#if WITH_DEBUG_RDP5
|
|
printf("--- rdpdr_process ---\n");
|
|
hexdump(s->p, s->end - s->p);
|
|
#endif
|
|
in_uint8p(s, magic, 4);
|
|
|
|
if ((magic[0] == 'r') && (magic[1] == 'D'))
|
|
{
|
|
if ((magic[2] == 'R') && (magic[3] == 'I'))
|
|
{
|
|
rdpdr_process_irp(This, s);
|
|
return;
|
|
}
|
|
if ((magic[2] == 'n') && (magic[3] == 'I'))
|
|
{
|
|
rdpdr_send_connect(This);
|
|
rdpdr_send_name(This);
|
|
return;
|
|
}
|
|
if ((magic[2] == 'C') && (magic[3] == 'C'))
|
|
{
|
|
/* connect from server */
|
|
rdpdr_send_clientcapabilty(This);
|
|
rdpdr_send_available(This);
|
|
return;
|
|
}
|
|
if ((magic[2] == 'r') && (magic[3] == 'd'))
|
|
{
|
|
/* connect to a specific resource */
|
|
in_uint32(s, handle);
|
|
#if WITH_DEBUG_RDP5
|
|
DEBUG(("RDPDR: Server connected to resource %d\n", handle));
|
|
#endif
|
|
return;
|
|
}
|
|
if ((magic[2] == 'P') && (magic[3] == 'S'))
|
|
{
|
|
/* server capability */
|
|
return;
|
|
}
|
|
}
|
|
if ((magic[0] == 'R') && (magic[1] == 'P'))
|
|
{
|
|
if ((magic[2] == 'C') && (magic[3] == 'P'))
|
|
{
|
|
printercache_process(This, s);
|
|
return;
|
|
}
|
|
}
|
|
unimpl("RDPDR packet type %c%c%c%c\n", magic[0], magic[1], magic[2], magic[3]);
|
|
}
|
|
|
|
BOOL
|
|
rdpdr_init(RDPCLIENT * This)
|
|
{
|
|
if (This->num_devices > 0)
|
|
{
|
|
This->rdpdr.channel =
|
|
channel_register(This, "rdpdr",
|
|
CHANNEL_OPTION_INITIALIZED | CHANNEL_OPTION_COMPRESS_RDP,
|
|
rdpdr_process);
|
|
}
|
|
|
|
return (This->rdpdr.channel != NULL);
|
|
}
|
|
|
|
/* Add file descriptors of pending io request to select() */
|
|
void
|
|
rdpdr_add_fds(RDPCLIENT * This, int *n, fd_set * rfds, fd_set * wfds, struct timeval *tv, BOOL * timeout)
|
|
{
|
|
uint32 select_timeout = 0; /* Timeout value to be used for select() (in millisecons). */
|
|
struct async_iorequest *iorq;
|
|
char c;
|
|
|
|
iorq = This->iorequest;
|
|
while (iorq != NULL)
|
|
{
|
|
if (iorq->fd != 0)
|
|
{
|
|
switch (iorq->major)
|
|
{
|
|
case IRP_MJ_READ:
|
|
/* Is this FD valid? FDs will
|
|
be invalid when
|
|
reconnecting. FIXME: Real
|
|
support for reconnects. */
|
|
|
|
FD_SET(iorq->fd, rfds);
|
|
*n = MAX(*n, iorq->fd);
|
|
|
|
/* Check if io request timeout is smaller than current (but not 0). */
|
|
if (iorq->timeout
|
|
&& (select_timeout == 0
|
|
|| iorq->timeout < select_timeout))
|
|
{
|
|
/* Set new timeout */
|
|
select_timeout = iorq->timeout;
|
|
This->min_timeout_fd = iorq->fd; /* Remember fd */
|
|
tv->tv_sec = select_timeout / 1000;
|
|
tv->tv_usec = (select_timeout % 1000) * 1000;
|
|
*timeout = True;
|
|
break;
|
|
}
|
|
if (iorq->itv_timeout && iorq->partial_len > 0
|
|
&& (select_timeout == 0
|
|
|| iorq->itv_timeout < select_timeout))
|
|
{
|
|
/* Set new timeout */
|
|
select_timeout = iorq->itv_timeout;
|
|
This->min_timeout_fd = iorq->fd; /* Remember fd */
|
|
tv->tv_sec = select_timeout / 1000;
|
|
tv->tv_usec = (select_timeout % 1000) * 1000;
|
|
*timeout = True;
|
|
break;
|
|
}
|
|
break;
|
|
|
|
case IRP_MJ_WRITE:
|
|
/* FD still valid? See above. */
|
|
if ((write(iorq->fd, &c, 0) != 0) && (errno == EBADF))
|
|
break;
|
|
|
|
FD_SET(iorq->fd, wfds);
|
|
*n = MAX(*n, iorq->fd);
|
|
break;
|
|
|
|
case IRP_MJ_DEVICE_CONTROL:
|
|
if (select_timeout > 5)
|
|
select_timeout = 5; /* serial event queue */
|
|
break;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
iorq = iorq->next;
|
|
}
|
|
}
|
|
|
|
struct async_iorequest *
|
|
rdpdr_remove_iorequest(RDPCLIENT * This, struct async_iorequest *prev, struct async_iorequest *iorq)
|
|
{
|
|
if (!iorq)
|
|
return NULL;
|
|
|
|
if (iorq->buffer)
|
|
xfree(iorq->buffer);
|
|
if (prev)
|
|
{
|
|
prev->next = iorq->next;
|
|
xfree(iorq);
|
|
iorq = prev->next;
|
|
}
|
|
else
|
|
{
|
|
/* Even if NULL */
|
|
This->iorequest = iorq->next;
|
|
xfree(iorq);
|
|
iorq = NULL;
|
|
}
|
|
return iorq;
|
|
}
|
|
|
|
/* Check if select() returned with one of the rdpdr file descriptors, and complete io if it did */
|
|
static void
|
|
_rdpdr_check_fds(RDPCLIENT * This, fd_set * rfds, fd_set * wfds, BOOL timed_out)
|
|
{
|
|
NTSTATUS status;
|
|
uint32 result = 0;
|
|
DEVICE_FNS *fns;
|
|
struct async_iorequest *iorq;
|
|
struct async_iorequest *prev;
|
|
uint32 req_size = 0;
|
|
uint32 buffer_len;
|
|
struct stream out;
|
|
uint8 *buffer = NULL;
|
|
|
|
|
|
if (timed_out)
|
|
{
|
|
/* check serial iv_timeout */
|
|
|
|
iorq = This->iorequest;
|
|
prev = NULL;
|
|
while (iorq != NULL)
|
|
{
|
|
if (iorq->fd == This->min_timeout_fd)
|
|
{
|
|
if ((iorq->partial_len > 0) &&
|
|
(This->rdpdr_device[iorq->device].device_type ==
|
|
DEVICE_TYPE_SERIAL))
|
|
{
|
|
|
|
/* iv_timeout between 2 chars, send partial_len */
|
|
/*printf("RDPDR: IVT total %u bytes read of %u\n", iorq->partial_len, iorq->length); */
|
|
rdpdr_send_completion(This, iorq->device,
|
|
iorq->id, STATUS_SUCCESS,
|
|
iorq->partial_len,
|
|
iorq->buffer, iorq->partial_len);
|
|
iorq = rdpdr_remove_iorequest(This, prev, iorq);
|
|
return;
|
|
}
|
|
else
|
|
{
|
|
break;
|
|
}
|
|
|
|
}
|
|
else
|
|
{
|
|
break;
|
|
}
|
|
|
|
|
|
prev = iorq;
|
|
if (iorq)
|
|
iorq = iorq->next;
|
|
|
|
}
|
|
|
|
rdpdr_abort_io(This, This->min_timeout_fd, 0, STATUS_TIMEOUT);
|
|
return;
|
|
}
|
|
|
|
iorq = This->iorequest;
|
|
prev = NULL;
|
|
while (iorq != NULL)
|
|
{
|
|
if (iorq->fd != 0)
|
|
{
|
|
switch (iorq->major)
|
|
{
|
|
case IRP_MJ_READ:
|
|
if (FD_ISSET(iorq->fd, rfds))
|
|
{
|
|
/* Read the data */
|
|
fns = iorq->fns;
|
|
|
|
req_size =
|
|
(iorq->length - iorq->partial_len) >
|
|
8192 ? 8192 : (iorq->length -
|
|
iorq->partial_len);
|
|
/* never read larger chunks than 8k - chances are that it will block */
|
|
status = fns->read(This, iorq->fd,
|
|
iorq->buffer + iorq->partial_len,
|
|
req_size, iorq->offset, &result);
|
|
|
|
if ((long) result > 0)
|
|
{
|
|
iorq->partial_len += result;
|
|
iorq->offset += result;
|
|
}
|
|
#if WITH_DEBUG_RDP5
|
|
DEBUG(("RDPDR: %d bytes of data read\n", result));
|
|
#endif
|
|
/* only delete link if all data has been transfered */
|
|
/* or if result was 0 and status success - EOF */
|
|
if ((iorq->partial_len == iorq->length) ||
|
|
(result == 0))
|
|
{
|
|
#if WITH_DEBUG_RDP5
|
|
DEBUG(("RDPDR: AIO total %u bytes read of %u\n", iorq->partial_len, iorq->length));
|
|
#endif
|
|
rdpdr_send_completion(This, iorq->device,
|
|
iorq->id, status,
|
|
iorq->partial_len,
|
|
iorq->buffer,
|
|
iorq->partial_len);
|
|
iorq = rdpdr_remove_iorequest(This, prev, iorq);
|
|
}
|
|
}
|
|
break;
|
|
case IRP_MJ_WRITE:
|
|
if (FD_ISSET(iorq->fd, wfds))
|
|
{
|
|
/* Write data. */
|
|
fns = iorq->fns;
|
|
|
|
req_size =
|
|
(iorq->length - iorq->partial_len) >
|
|
8192 ? 8192 : (iorq->length -
|
|
iorq->partial_len);
|
|
|
|
/* never write larger chunks than 8k - chances are that it will block */
|
|
status = fns->write(This, iorq->fd,
|
|
iorq->buffer +
|
|
iorq->partial_len, req_size,
|
|
iorq->offset, &result);
|
|
|
|
if ((long) result > 0)
|
|
{
|
|
iorq->partial_len += result;
|
|
iorq->offset += result;
|
|
}
|
|
|
|
#if WITH_DEBUG_RDP5
|
|
DEBUG(("RDPDR: %d bytes of data written\n",
|
|
result));
|
|
#endif
|
|
/* only delete link if all data has been transfered */
|
|
/* or we couldn't write */
|
|
if ((iorq->partial_len == iorq->length)
|
|
|| (result == 0))
|
|
{
|
|
#if WITH_DEBUG_RDP5
|
|
DEBUG(("RDPDR: AIO total %u bytes written of %u\n", iorq->partial_len, iorq->length));
|
|
#endif
|
|
rdpdr_send_completion(This, iorq->device,
|
|
iorq->id, status,
|
|
iorq->partial_len,
|
|
(uint8 *) "", 1);
|
|
|
|
iorq = rdpdr_remove_iorequest(This, prev, iorq);
|
|
}
|
|
}
|
|
break;
|
|
case IRP_MJ_DEVICE_CONTROL:
|
|
if (serial_get_event(This, iorq->fd, &result))
|
|
{
|
|
buffer = (uint8 *) xrealloc((void *) buffer, 0x14);
|
|
out.data = out.p = buffer;
|
|
out.size = sizeof(buffer);
|
|
out_uint32_le(&out, result);
|
|
result = buffer_len = out.p - out.data;
|
|
status = STATUS_SUCCESS;
|
|
rdpdr_send_completion(This, iorq->device, iorq->id,
|
|
status, result, buffer,
|
|
buffer_len);
|
|
xfree(buffer);
|
|
iorq = rdpdr_remove_iorequest(This, prev, iorq);
|
|
}
|
|
|
|
break;
|
|
}
|
|
|
|
}
|
|
prev = iorq;
|
|
if (iorq)
|
|
iorq = iorq->next;
|
|
}
|
|
|
|
/* Check notify */
|
|
iorq = This->iorequest;
|
|
prev = NULL;
|
|
while (iorq != NULL)
|
|
{
|
|
if (iorq->fd != 0)
|
|
{
|
|
switch (iorq->major)
|
|
{
|
|
|
|
case IRP_MJ_DIRECTORY_CONTROL:
|
|
if (This->rdpdr_device[iorq->device].device_type ==
|
|
DEVICE_TYPE_DISK)
|
|
{
|
|
|
|
if (This->notify_stamp)
|
|
{
|
|
This->notify_stamp = False;
|
|
status = disk_check_notify(This, iorq->fd);
|
|
if (status != STATUS_PENDING)
|
|
{
|
|
rdpdr_send_completion(This, iorq->device,
|
|
iorq->id,
|
|
status, 0,
|
|
NULL, 0);
|
|
iorq = rdpdr_remove_iorequest(This, prev,
|
|
iorq);
|
|
}
|
|
}
|
|
}
|
|
break;
|
|
|
|
|
|
|
|
}
|
|
}
|
|
|
|
prev = iorq;
|
|
if (iorq)
|
|
iorq = iorq->next;
|
|
}
|
|
|
|
}
|
|
|
|
void
|
|
rdpdr_check_fds(RDPCLIENT * This, fd_set * rfds, fd_set * wfds, BOOL timed_out)
|
|
{
|
|
fd_set dummy;
|
|
|
|
|
|
FD_ZERO(&dummy);
|
|
|
|
|
|
/* fist check event queue only,
|
|
any serial wait event must be done before read block will be sent
|
|
*/
|
|
|
|
_rdpdr_check_fds(This, &dummy, &dummy, False);
|
|
_rdpdr_check_fds(This, rfds, wfds, timed_out);
|
|
}
|
|
|
|
|
|
/* Abort a pending io request for a given handle and major */
|
|
BOOL
|
|
rdpdr_abort_io(RDPCLIENT * This, uint32 fd, uint32 major, NTSTATUS status)
|
|
{
|
|
uint32 result;
|
|
struct async_iorequest *iorq;
|
|
struct async_iorequest *prev;
|
|
|
|
iorq = This->iorequest;
|
|
prev = NULL;
|
|
while (iorq != NULL)
|
|
{
|
|
/* Only remove from table when major is not set, or when correct major is supplied.
|
|
Abort read should not abort a write io request. */
|
|
if ((iorq->fd == fd) && (major == 0 || iorq->major == major))
|
|
{
|
|
result = 0;
|
|
rdpdr_send_completion(This, iorq->device, iorq->id, status, result, (uint8 *) "",
|
|
1);
|
|
|
|
iorq = rdpdr_remove_iorequest(This, prev, iorq);
|
|
return True;
|
|
}
|
|
|
|
prev = iorq;
|
|
iorq = iorq->next;
|
|
}
|
|
|
|
return False;
|
|
}
|