server/device.c

   1 /*
   2  * Server-side device support
   3  *
   4  * Copyright (C) 2007 Alexandre Julliard
   5  *
   6  * This library is free software; you can redistribute it and/or
   7  * modify it under the terms of the GNU Lesser General Public
   8  * License as published by the Free Software Foundation; either
   9  * version 2.1 of the License, or (at your option) any later version.
  10  *
  11  * This library is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14  * Lesser General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU Lesser General Public
  17  * License along with this library; if not, write to the Free Software
  18  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  19  */
  20
  21 #include "config.h"
  22 #include "wine/port.h"
  23
  24 #include <assert.h>
  25 #include <fcntl.h>
  26 #include <stdio.h>
  27 #include <stdlib.h>
  28 #include <stdarg.h>
  29
  30 #include "ntstatus.h"
  31 #define WIN32_NO_STATUS
  32 #include "windef.h"
  33 #include "winternl.h"
  34 #include "ddk/wdm.h"
  35
  36 #include "object.h"
  37 #include "file.h"
  38 #include "handle.h"
  39 #include "request.h"
  40 #include "process.h"
  41
  42 /* IRP object */
  43
  44 struct irp_call
  45 {
  46     struct object          obj;           /* object header */
  47     struct list            dev_entry;     /* entry in device queue */
  48     struct list            mgr_entry;     /* entry in manager queue */
  49     struct device_file    *file;          /* file containing this irp */
  50     struct thread         *thread;        /* thread that queued the irp */
  51     client_ptr_t           user_arg;      /* user arg used to identify the request */
  52     struct async          *async;         /* pending async op */
  53     unsigned int           status;        /* resulting status (or STATUS_PENDING) */
  54     irp_params_t           params;        /* irp parameters */
  55     data_size_t            result;        /* size of result (input or output depending on the type) */
  56     data_size_t            in_size;       /* size of input data */
  57     void                  *in_data;       /* input data */
  58     data_size_t            out_size;      /* size of output data */
  59     void                  *out_data;      /* output data */
  60 };
  61
  62 static void irp_call_dump( struct object *obj, int verbose );
  63 static int irp_call_signaled( struct object *obj, struct wait_queue_entry *entry );
  64 static void irp_call_destroy( struct object *obj );
  65
  66 static const struct object_ops irp_call_ops =
  67 {
  68     sizeof(struct irp_call),          /* size */
  69     irp_call_dump,                    /* dump */
  70     no_get_type,                      /* get_type */
  71     add_queue,                        /* add_queue */
  72     remove_queue,                     /* remove_queue */
  73     irp_call_signaled,                /* signaled */
  74     no_satisfied,                     /* satisfied */
  75     no_signal,                        /* signal */
  76     no_get_fd,                        /* get_fd */
  77     no_map_access,                    /* map_access */
  78     default_get_sd,                   /* get_sd */
  79     default_set_sd,                   /* set_sd */
  80     no_lookup_name,                   /* lookup_name */
  81     no_open_file,                     /* open_file */
  82     no_close_handle,                  /* close_handle */
  83     irp_call_destroy                  /* destroy */
  84 };
  85
  86
  87 /* device manager (a list of devices managed by the same client process) */
  88
  89 struct device_manager
  90 {
  91     struct object          obj;           /* object header */
  92     struct list            devices;       /* list of devices */
  93     struct list            requests;      /* list of pending irps across all devices */
  94 };
  95
  96 static void device_manager_dump( struct object *obj, int verbose );
  97 static int device_manager_signaled( struct object *obj, struct wait_queue_entry *entry );
  98 static void device_manager_destroy( struct object *obj );
  99
 100 static const struct object_ops device_manager_ops =
 101 {
 102     sizeof(struct device_manager),    /* size */
 103     device_manager_dump,              /* dump */
 104     no_get_type,                      /* get_type */
 105     add_queue,                        /* add_queue */
 106     remove_queue,                     /* remove_queue */
 107     device_manager_signaled,          /* signaled */
 108     no_satisfied,                     /* satisfied */
 109     no_signal,                        /* signal */
 110     no_get_fd,                        /* get_fd */
 111     no_map_access,                    /* map_access */
 112     default_get_sd,                   /* get_sd */
 113     default_set_sd,                   /* set_sd */
 114     no_lookup_name,                   /* lookup_name */
 115     no_open_file,                     /* open_file */
 116     no_close_handle,                  /* close_handle */
 117     device_manager_destroy            /* destroy */
 118 };
 119
 120
 121 /* device (a single device object) */
 122
 123 struct device
 124 {
 125     struct object          obj;           /* object header */
 126     struct device_manager *manager;       /* manager for this device (or NULL if deleted) */
 127     char                  *unix_path;     /* path to unix device if any */
 128     client_ptr_t           user_ptr;      /* opaque ptr for client side */
 129     struct list            entry;         /* entry in device manager list */
 130     struct list            files;         /* list of open files */
 131 };
 132
 133 static void device_dump( struct object *obj, int verbose );
 134 static struct object_type *device_get_type( struct object *obj );
 135 static void device_destroy( struct object *obj );
 136 static struct object *device_open_file( struct object *obj, unsigned int access,
 137                                         unsigned int sharing, unsigned int options );
 138
 139 static const struct object_ops device_ops =
 140 {
 141     sizeof(struct device),            /* size */
 142     device_dump,                      /* dump */
 143     device_get_type,                  /* get_type */
 144     no_add_queue,                     /* add_queue */
 145     NULL,                             /* remove_queue */
 146     NULL,                             /* signaled */
 147     no_satisfied,                     /* satisfied */
 148     no_signal,                        /* signal */
 149     no_get_fd,                        /* get_fd */
 150     default_fd_map_access,            /* map_access */
 151     default_get_sd,                   /* get_sd */
 152     default_set_sd,                   /* set_sd */
 153     no_lookup_name,                   /* lookup_name */
 154     device_open_file,                 /* open_file */
 155     no_close_handle,                  /* close_handle */
 156     device_destroy                    /* destroy */
 157 };
 158
 159
 160 /* device file (an open file handle to a device) */
 161
 162 struct device_file
 163 {
 164     struct object          obj;           /* object header */
 165     struct device         *device;        /* device for this file */
 166     struct fd             *fd;            /* file descriptor for irp */
 167     client_ptr_t           user_ptr;      /* opaque ptr for client side */
 168     struct list            entry;         /* entry in device list */
 169     struct list            requests;      /* list of pending irp requests */
 170 };
 171
 172 static void device_file_dump( struct object *obj, int verbose );
 173 static struct fd *device_file_get_fd( struct object *obj );
 174 static int device_file_close_handle( struct object *obj, struct process *process, obj_handle_t handle );
 175 static void device_file_destroy( struct object *obj );
 176 static enum server_fd_type device_file_get_fd_type( struct fd *fd );
 177 static obj_handle_t device_file_read( struct fd *fd, const async_data_t *async_data, int blocking,
 178                                       file_pos_t pos );
 179 static obj_handle_t device_file_write( struct fd *fd, const async_data_t *async_data, int blocking,
 180                                        file_pos_t pos, data_size_t *written );
 181 static obj_handle_t device_file_flush( struct fd *fd, const async_data_t *async_data, int blocking );
 182 static obj_handle_t device_file_ioctl( struct fd *fd, ioctl_code_t code, const async_data_t *async_data,
 183                                        int blocking );
 184
 185 static const struct object_ops device_file_ops =
 186 {
 187     sizeof(struct device_file),       /* size */
 188     device_file_dump,                 /* dump */
 189     no_get_type,                      /* get_type */
 190     add_queue,                        /* add_queue */
 191     remove_queue,                     /* remove_queue */
 192     default_fd_signaled,              /* signaled */
 193     no_satisfied,                     /* satisfied */
 194     no_signal,                        /* signal */
 195     device_file_get_fd,               /* get_fd */
 196     default_fd_map_access,            /* map_access */
 197     default_get_sd,                   /* get_sd */
 198     default_set_sd,                   /* set_sd */
 199     no_lookup_name,                   /* lookup_name */
 200     no_open_file,                     /* open_file */
 201     device_file_close_handle,         /* close_handle */
 202     device_file_destroy               /* destroy */
 203 };
 204
 205 static const struct fd_ops device_file_fd_ops =
 206 {
 207     default_fd_get_poll_events,       /* get_poll_events */
 208     default_poll_event,               /* poll_event */
 209     device_file_get_fd_type,          /* get_fd_type */
 210     device_file_read,                 /* read */
 211     device_file_write,                /* write */
 212     device_file_flush,                /* flush */
 213     device_file_ioctl,                /* ioctl */
 214     default_fd_queue_async,           /* queue_async */
 215     default_fd_reselect_async,        /* reselect_async */
 216     default_fd_cancel_async           /* cancel_async */
 217 };
 218
 219
 220 static void irp_call_dump( struct object *obj, int verbose )
 221 {
 222     struct irp_call *irp = (struct irp_call *)obj;
 223     fprintf( stderr, "IRP call file=%p\n", irp->file );
 224 }
 225
 226 static int irp_call_signaled( struct object *obj, struct wait_queue_entry *entry )
 227 {
 228     struct irp_call *irp = (struct irp_call *)obj;
 229
 230     return !irp->file;  /* file is cleared once the irp has completed */
 231 }
 232
 233 static void irp_call_destroy( struct object *obj )
 234 {
 235     struct irp_call *irp = (struct irp_call *)obj;
 236
 237     free( irp->in_data );
 238     free( irp->out_data );
 239     if (irp->async)
 240     {
 241         async_terminate( irp->async, STATUS_CANCELLED );
 242         release_object( irp->async );
 243     }
 244     if (irp->file) release_object( irp->file );
 245     if (irp->thread) release_object( irp->thread );
 246 }
 247
 248 static struct irp_call *create_irp( struct device_file *file, const irp_params_t *params,
 249                                     const void *in_data, data_size_t in_size, data_size_t out_size )
 250 {
 251     struct irp_call *irp;
 252
 253     if (!file->device->manager)  /* it has been deleted */
 254     {
 255         set_error( STATUS_FILE_DELETED );
 256         return NULL;
 257     }
 258
 259     if ((irp = alloc_object( &irp_call_ops )))
 260     {
 261         irp->file     = (struct device_file *)grab_object( file );
 262         irp->thread   = NULL;
 263         irp->async    = NULL;
 264         irp->params   = *params;
 265         irp->status   = STATUS_PENDING;
 266         irp->result   = 0;
 267         irp->in_size  = in_size;
 268         irp->in_data  = NULL;
 269         irp->out_size = out_size;
 270         irp->out_data = NULL;
 271
 272         if (irp->in_size && !(irp->in_data = memdup( in_data, in_size )))
 273         {
 274             release_object( irp );
 275             irp = NULL;
 276         }
 277     }
 278     return irp;
 279 }
 280
 281 static void set_irp_result( struct irp_call *irp, unsigned int status,
 282                             const void *out_data, data_size_t out_size, data_size_t result )
 283 {
 284     struct device_file *file = irp->file;
 285
 286     if (!file) return;  /* already finished */
 287
 288     /* FIXME: handle the STATUS_PENDING case */
 289     irp->status = status;
 290     irp->result = result;
 291     irp->out_size = min( irp->out_size, out_size );
 292     if (irp->out_size && !(irp->out_data = memdup( out_data, irp->out_size )))
 293         irp->out_size = 0;
 294     irp->file = NULL;
 295     if (irp->async)
 296     {
 297         if (result) status = STATUS_ALERTED;
 298         async_terminate( irp->async, status );
 299         release_object( irp->async );
 300         irp->async = NULL;
 301     }
 302     wake_up( &irp->obj, 0 );
 303
 304     if (status != STATUS_ALERTED)
 305     {
 306         /* remove it from the device queue */
 307         /* (for STATUS_ALERTED this will be done in get_irp_result) */
 308         list_remove( &irp->dev_entry );
 309         release_object( irp );  /* no longer on the device queue */
 310     }
 311     release_object( file );
 312 }
 313
 314
 315 static void device_dump( struct object *obj, int verbose )
 316 {
 317     fputs( "Device\n", stderr );
 318 }
 319
 320 static struct object_type *device_get_type( struct object *obj )
 321 {
 322     static const WCHAR name[] = {'D','e','v','i','c','e'};
 323     static const struct unicode_str str = { name, sizeof(name) };
 324     return get_object_type( &str );
 325 }
 326
 327 static void device_destroy( struct object *obj )
 328 {
 329     struct device *device = (struct device *)obj;
 330
 331     assert( list_empty( &device->files ));
 332
 333     free( device->unix_path );
 334     if (device->manager) list_remove( &device->entry );
 335 }
 336
 337 static void add_irp_to_queue( struct device_file *file, struct irp_call *irp, struct thread *thread )
 338 {
 339     struct device_manager *manager = file->device->manager;
 340
 341     assert( manager );
 342
 343     grab_object( irp );  /* grab reference for queued irp */
 344     irp->thread = thread ? (struct thread *)grab_object( thread ) : NULL;
 345     list_add_tail( &file->requests, &irp->dev_entry );
 346     list_add_tail( &manager->requests, &irp->mgr_entry );
 347     if (list_head( &manager->requests ) == &irp->mgr_entry) wake_up( &manager->obj, 0 );  /* first one */
 348 }
 349
 350 static struct object *device_open_file( struct object *obj, unsigned int access,
 351                                         unsigned int sharing, unsigned int options )
 352 {
 353     struct device *device = (struct device *)obj;
 354     struct device_file *file;
 355
 356     if (!(file = alloc_object( &device_file_ops ))) return NULL;
 357
 358     file->device = (struct device *)grab_object( device );
 359     file->user_ptr = 0;
 360     list_init( &file->requests );
 361     list_add_tail( &device->files, &file->entry );
 362     if (device->unix_path)
 363     {
 364         mode_t mode = 0666;
 365         access = file->obj.ops->map_access( &file->obj, access );
 366         file->fd = open_fd( NULL, device->unix_path, O_NONBLOCK | O_LARGEFILE,
 367                             &mode, access, sharing, options );
 368         if (file->fd) set_fd_user( file->fd, &device_file_fd_ops, &file->obj );
 369     }
 370     else file->fd = alloc_pseudo_fd( &device_file_fd_ops, &file->obj, 0 );
 371
 372     if (!file->fd)
 373     {
 374         release_object( file );
 375         return NULL;
 376     }
 377
 378     if (device->manager)
 379     {
 380         struct irp_call *irp;
 381         irp_params_t params;
 382
 383         memset( &params, 0, sizeof(params) );
 384         params.create.major   = IRP_MJ_CREATE;
 385         params.create.access  = access;
 386         params.create.sharing = sharing;
 387         params.create.options = options;
 388         params.create.device  = file->device->user_ptr;
 389
 390         if ((irp = create_irp( file, &params, NULL, 0, 0 )))
 391         {
 392             add_irp_to_queue( file, irp, NULL );
 393             release_object( irp );
 394         }
 395     }
 396     return &file->obj;
 397 }
 398
 399 static void device_file_dump( struct object *obj, int verbose )
 400 {
 401     struct device_file *file = (struct device_file *)obj;
 402
 403     fprintf( stderr, "File on device %p\n", file->device );
 404 }
 405
 406 static struct fd *device_file_get_fd( struct object *obj )
 407 {
 408     struct device_file *file = (struct device_file *)obj;
 409
 410     return (struct fd *)grab_object( file->fd );
 411 }
 412
 413 static int device_file_close_handle( struct object *obj, struct process *process, obj_handle_t handle )
 414 {
 415     struct device_file *file = (struct device_file *)obj;
 416
 417     if (file->device->manager && obj->handle_count == 1)  /* last handle */
 418     {
 419         struct irp_call *irp;
 420         irp_params_t params;
 421
 422         memset( &params, 0, sizeof(params) );
 423         params.close.major = IRP_MJ_CLOSE;
 424         params.close.file  = file->user_ptr;
 425
 426         if ((irp = create_irp( file, &params, NULL, 0, 0 )))
 427         {
 428             add_irp_to_queue( file, irp, NULL );
 429             release_object( irp );
 430         }
 431     }
 432     return 1;
 433 }
 434
 435 static void device_file_destroy( struct object *obj )
 436 {
 437     struct device_file *file = (struct device_file *)obj;
 438     struct irp_call *irp, *next;
 439
 440     LIST_FOR_EACH_ENTRY_SAFE( irp, next, &file->requests, struct irp_call, dev_entry )
 441     {
 442         list_remove( &irp->dev_entry );
 443         release_object( irp );  /* no longer on the device queue */
 444     }
 445     if (file->fd) release_object( file->fd );
 446     list_remove( &file->entry );
 447     release_object( file->device );
 448 }
 449
 450 static struct irp_call *find_irp_call( struct device_file *file, struct thread *thread,
 451                                        client_ptr_t user_arg )
 452 {
 453     struct irp_call *irp;
 454
 455     LIST_FOR_EACH_ENTRY( irp, &file->requests, struct irp_call, dev_entry )
 456         if (irp->thread == thread && irp->user_arg == user_arg) return irp;
 457
 458     set_error( STATUS_INVALID_PARAMETER );
 459     return NULL;
 460 }
 461
 462 static void set_file_user_ptr( struct device_file *file, client_ptr_t ptr )
 463 {
 464     struct irp_call *irp;
 465
 466     if (file->user_ptr == ptr) return;  /* nothing to do */
 467
 468     file->user_ptr = ptr;
 469
 470     /* update already queued irps */
 471
 472     LIST_FOR_EACH_ENTRY( irp, &file->requests, struct irp_call, dev_entry )
 473     {
 474         switch (irp->params.major)
 475         {
 476         case IRP_MJ_CLOSE:          irp->params.close.file = ptr; break;
 477         case IRP_MJ_READ:           irp->params.read.file  = ptr; break;
 478         case IRP_MJ_WRITE:          irp->params.write.file = ptr; break;
 479         case IRP_MJ_FLUSH_BUFFERS:  irp->params.flush.file = ptr; break;
 480         case IRP_MJ_DEVICE_CONTROL: irp->params.ioctl.file = ptr; break;
 481         }
 482     }
 483 }
 484
 485 /* queue an irp to the device */
 486 static obj_handle_t queue_irp( struct device_file *file, struct irp_call *irp,
 487                                const async_data_t *async_data, int blocking )
 488 {
 489     obj_handle_t handle = 0;
 490
 491     if (blocking && !(handle = alloc_handle( current->process, irp, SYNCHRONIZE, 0 ))) return 0;
 492
 493     if (!(irp->async = fd_queue_async( file->fd, async_data, ASYNC_TYPE_WAIT )))
 494     {
 495         if (handle) close_handle( current->process, handle );
 496         return 0;
 497     }
 498     irp->user_arg = async_data->arg;
 499     add_irp_to_queue( file, irp, current );
 500     set_error( STATUS_PENDING );
 501     return handle;
 502 }
 503
 504 static enum server_fd_type device_file_get_fd_type( struct fd *fd )
 505 {
 506     return FD_TYPE_DEVICE;
 507 }
 508
 509 static obj_handle_t device_file_read( struct fd *fd, const async_data_t *async_data, int blocking,
 510                                       file_pos_t pos )
 511 {
 512     struct device_file *file = get_fd_user( fd );
 513     struct irp_call *irp;
 514     obj_handle_t handle;
 515     irp_params_t params;
 516
 517     memset( &params, 0, sizeof(params) );
 518     params.read.major = IRP_MJ_READ;
 519     params.read.key   = 0;
 520     params.read.pos   = pos;
 521     params.read.file  = file->user_ptr;
 522
 523     irp = create_irp( file, &params, NULL, 0, get_reply_max_size() );
 524     if (!irp) return 0;
 525
 526     handle = queue_irp( file, irp, async_data, blocking );
 527     release_object( irp );
 528     return handle;
 529 }
 530
 531 static obj_handle_t device_file_write( struct fd *fd, const async_data_t *async_data, int blocking,
 532                                        file_pos_t pos, data_size_t *written )
 533 {
 534     struct device_file *file = get_fd_user( fd );
 535     struct irp_call *irp;
 536     obj_handle_t handle;
 537     irp_params_t params;
 538
 539     memset( &params, 0, sizeof(params) );
 540     params.write.major = IRP_MJ_WRITE;
 541     params.write.key   = 0;
 542     params.write.pos   = pos;
 543     params.write.file  = file->user_ptr;
 544
 545     irp = create_irp( file, &params, get_req_data(), get_req_data_size(), 0 );
 546     if (!irp) return 0;
 547
 548     handle = queue_irp( file, irp, async_data, blocking );
 549     release_object( irp );
 550     return handle;
 551 }
 552
 553 static obj_handle_t device_file_flush( struct fd *fd, const async_data_t *async_data, int blocking )
 554 {
 555     struct device_file *file = get_fd_user( fd );
 556     struct irp_call *irp;
 557     obj_handle_t handle;
 558     irp_params_t params;
 559
 560     memset( &params, 0, sizeof(params) );
 561     params.flush.major = IRP_MJ_FLUSH_BUFFERS;
 562     params.flush.file  = file->user_ptr;
 563
 564     irp = create_irp( file, &params, NULL, 0, 0 );
 565     if (!irp) return 0;
 566
 567     handle = queue_irp( file, irp, async_data, blocking );
 568     release_object( irp );
 569     return handle;
 570 }
 571
 572 static obj_handle_t device_file_ioctl( struct fd *fd, ioctl_code_t code, const async_data_t *async_data,
 573                                        int blocking )
 574 {
 575     struct device_file *file = get_fd_user( fd );
 576     struct irp_call *irp;
 577     obj_handle_t handle;
 578     irp_params_t params;
 579
 580     memset( &params, 0, sizeof(params) );
 581     params.ioctl.major = IRP_MJ_DEVICE_CONTROL;
 582     params.ioctl.code  = code;
 583     params.ioctl.file = file->user_ptr;
 584
 585     irp = create_irp( file, &params, get_req_data(), get_req_data_size(),
 586                       get_reply_max_size() );
 587     if (!irp) return 0;
 588
 589     handle = queue_irp( file, irp, async_data, blocking );
 590     release_object( irp );
 591     return handle;
 592 }
 593
 594 static struct device *create_device( struct directory *root, const struct unicode_str *name,
 595                                      struct device_manager *manager, unsigned int attr )
 596 {
 597     struct device *device;
 598
 599     if ((device = create_named_object_dir( root, name, attr, &device_ops )))
 600     {
 601         if (get_error() != STATUS_OBJECT_NAME_EXISTS)
 602         {
 603             /* initialize it if it didn't already exist */
 604             device->unix_path = NULL;
 605             device->manager = manager;
 606             list_add_tail( &manager->devices, &device->entry );
 607             list_init( &device->files );
 608         }
 609     }
 610     return device;
 611 }
 612
 613 struct device *create_unix_device( struct directory *root, const struct unicode_str *name,
 614                                    const char *unix_path )
 615 {
 616     struct device *device;
 617
 618     if ((device = create_named_object_dir( root, name, 0, &device_ops )))
 619     {
 620         device->unix_path = strdup( unix_path );
 621         device->manager = NULL;  /* no manager, requests go straight to the Unix device */
 622         list_init( &device->files );
 623         make_object_static( &device->obj );
 624     }
 625     return device;
 626
 627 }
 628
 629 /* terminate requests when the underlying device is deleted */
 630 static void delete_file( struct device_file *file )
 631 {
 632     struct irp_call *irp, *next;
 633
 634     /* terminate all pending requests */
 635     LIST_FOR_EACH_ENTRY_SAFE( irp, next, &file->requests, struct irp_call, dev_entry )
 636     {
 637         list_remove( &irp->mgr_entry );
 638         set_irp_result( irp, STATUS_FILE_DELETED, NULL, 0, 0 );
 639     }
 640 }
 641
 642 static void delete_device( struct device *device )
 643 {
 644     struct device_file *file, *next;
 645
 646     if (!device->manager) return;  /* already deleted */
 647
 648     LIST_FOR_EACH_ENTRY_SAFE( file, next, &device->files, struct device_file, entry )
 649         delete_file( file );
 650
 651     unlink_named_object( &device->obj );
 652     list_remove( &device->entry );
 653     device->manager = NULL;
 654 }
 655
 656
 657 static void device_manager_dump( struct object *obj, int verbose )
 658 {
 659     fprintf( stderr, "Device manager\n" );
 660 }
 661
 662 static int device_manager_signaled( struct object *obj, struct wait_queue_entry *entry )
 663 {
 664     struct device_manager *manager = (struct device_manager *)obj;
 665
 666     return !list_empty( &manager->requests );
 667 }
 668
 669 static void device_manager_destroy( struct object *obj )
 670 {
 671     struct device_manager *manager = (struct device_manager *)obj;
 672     struct list *ptr;
 673
 674     while ((ptr = list_head( &manager->devices )))
 675     {
 676         struct device *device = LIST_ENTRY( ptr, struct device, entry );
 677         delete_device( device );
 678     }
 679 }
 680
 681 static struct device_manager *create_device_manager(void)
 682 {
 683     struct device_manager *manager;
 684
 685     if ((manager = alloc_object( &device_manager_ops )))
 686     {
 687         list_init( &manager->devices );
 688         list_init( &manager->requests );
 689     }
 690     return manager;
 691 }
 692
 693
 694 /* create a device manager */
 695 DECL_HANDLER(create_device_manager)
 696 {
 697     struct device_manager *manager = create_device_manager();
 698
 699     if (manager)
 700     {
 701         reply->handle = alloc_handle( current->process, manager, req->access, req->attributes );
 702         release_object( manager );
 703     }
 704 }
 705
 706
 707 /* create a device */
 708 DECL_HANDLER(create_device)
 709 {
 710     struct device *device;
 711     struct unicode_str name = get_req_unicode_str();
 712     struct device_manager *manager;
 713     struct directory *root = NULL;
 714
 715     if (!(manager = (struct device_manager *)get_handle_obj( current->process, req->manager,
 716                                                              0, &device_manager_ops )))
 717         return;
 718
 719     if (req->rootdir && !(root = get_directory_obj( current->process, req->rootdir, 0 )))
 720     {
 721         release_object( manager );
 722         return;
 723     }
 724
 725     if ((device = create_device( root, &name, manager, req->attributes )))
 726     {
 727         device->user_ptr = req->user_ptr;
 728         reply->handle = alloc_handle( current->process, device, req->access, req->attributes );
 729         release_object( device );
 730     }
 731
 732     if (root) release_object( root );
 733     release_object( manager );
 734 }
 735
 736
 737 /* delete a device */
 738 DECL_HANDLER(delete_device)
 739 {
 740     struct device *device;
 741
 742     if ((device = (struct device *)get_handle_obj( current->process, req->handle, 0, &device_ops )))
 743     {
 744         delete_device( device );
 745         release_object( device );
 746     }
 747 }
 748
 749
 750 /* retrieve the next pending device irp request */
 751 DECL_HANDLER(get_next_device_request)
 752 {
 753     struct irp_call *irp;
 754     struct device_manager *manager;
 755     struct list *ptr;
 756
 757     reply->params.major = IRP_MJ_MAXIMUM_FUNCTION + 1;
 758
 759     if (!(manager = (struct device_manager *)get_handle_obj( current->process, req->manager,
 760                                                              0, &device_manager_ops )))
 761         return;
 762
 763     if (req->prev)
 764     {
 765         if ((irp = (struct irp_call *)get_handle_obj( current->process, req->prev, 0, &irp_call_ops )))
 766         {
 767             set_irp_result( irp, req->status, NULL, 0, 0 );
 768             close_handle( current->process, req->prev );  /* avoid an extra round-trip for close */
 769             release_object( irp );
 770         }
 771         clear_error();
 772     }
 773
 774     if ((ptr = list_head( &manager->requests )))
 775     {
 776         irp = LIST_ENTRY( ptr, struct irp_call, mgr_entry );
 777         if (irp->thread)
 778         {
 779             reply->client_pid = get_process_id( irp->thread->process );
 780             reply->client_tid = get_thread_id( irp->thread );
 781         }
 782         reply->params = irp->params;
 783         reply->in_size = irp->in_size;
 784         reply->out_size = irp->out_size;
 785         if (irp->in_size > get_reply_max_size()) set_error( STATUS_BUFFER_OVERFLOW );
 786         else if ((reply->next = alloc_handle( current->process, irp, 0, 0 )))
 787         {
 788             set_reply_data_ptr( irp->in_data, irp->in_size );
 789             irp->in_data = NULL;
 790             irp->in_size = 0;
 791             list_remove( &irp->mgr_entry );
 792             list_init( &irp->mgr_entry );
 793         }
 794     }
 795     else set_error( STATUS_PENDING );
 796
 797     release_object( manager );
 798 }
 799
 800
 801 /* store results of an async irp */
 802 DECL_HANDLER(set_irp_result)
 803 {
 804     struct irp_call *irp;
 805
 806     if ((irp = (struct irp_call *)get_handle_obj( current->process, req->handle, 0, &irp_call_ops )))
 807     {
 808         if (irp->file) set_file_user_ptr( irp->file, req->file_ptr );
 809         set_irp_result( irp, req->status, get_req_data(), get_req_data_size(), req->size );
 810         close_handle( current->process, req->handle );  /* avoid an extra round-trip for close */
 811         release_object( irp );
 812     }
 813 }
 814
 815
 816 /* retrieve results of an async irp */
 817 DECL_HANDLER(get_irp_result)
 818 {
 819     struct device_file *file;
 820     struct irp_call *irp;
 821
 822     if (!(file = (struct device_file *)get_handle_obj( current->process, req->handle,
 823                                                        0, &device_file_ops )))
 824         return;
 825
 826     if ((irp = find_irp_call( file, current, req->user_arg )))
 827     {
 828         if (irp->out_data)
 829         {
 830             data_size_t size = min( irp->out_size, get_reply_max_size() );
 831             if (size)
 832             {
 833                 set_reply_data_ptr( irp->out_data, size );
 834                 irp->out_data = NULL;
 835             }
 836         }
 837         reply->size = irp->result;
 838         set_error( irp->status );
 839         list_remove( &irp->dev_entry );
 840         release_object( irp );  /* no longer on the device queue */
 841     }
 842     release_object( file );
 843 }