server/class.c

   1 /*
   2  * Server-side window class management
   3  *
   4  * Copyright (C) 2002 Mike McCormack
   5  * Copyright (C) 2003 Alexandre Julliard
   6  *
   7  * This library is free software; you can redistribute it and/or
   8  * modify it under the terms of the GNU Lesser General Public
   9  * License as published by the Free Software Foundation; either
  10  * version 2.1 of the License, or (at your option) any later version.
  11  *
  12  * This library is distributed in the hope that it will be useful,
  13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  15  * Lesser General Public License for more details.
  16  *
  17  * You should have received a copy of the GNU Lesser General Public
  18  * License along with this library; if not, write to the Free Software
  19  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  20  */
  21
  22 #include "config.h"
  23 #include "wine/port.h"
  24
  25 #include <assert.h>
  26 #include <stdlib.h>
  27 #include <stdio.h>
  28 #include <string.h>
  29
  30 #include "ntstatus.h"
  31 #define WIN32_NO_STATUS
  32
  33 #include "wine/list.h"
  34
  35 #include "request.h"
  36 #include "object.h"
  37 #include "process.h"
  38 #include "user.h"
  39 #include "winuser.h"
  40 #include "winternl.h"
  41
  42 struct window_class
  43 {
  44     struct list     entry;           /* entry in process list */
  45     struct process *process;         /* process owning the class */
  46     int             count;           /* reference count */
  47     int             local;           /* local class? */
  48     atom_t          atom;            /* class atom */
  49     void           *instance;        /* module instance */
  50     unsigned int    style;           /* class style */
  51     int             win_extra;       /* number of window extra bytes */
  52     void           *client_ptr;      /* pointer to class in client address space */
  53     int             nb_extra_bytes;  /* number of extra bytes */
  54     char            extra_bytes[1];  /* extra bytes storage */
  55 };
  56
  57 static struct window_class *create_class( struct process *process, int extra_bytes, int local )
  58 {
  59     struct window_class *class;
  60
  61     if (!(class = mem_alloc( sizeof(*class) + extra_bytes - 1 ))) return NULL;
  62
  63     class->process = (struct process *)grab_object( process );
  64     class->count = 0;
  65     class->local = local;
  66     class->nb_extra_bytes = extra_bytes;
  67     memset( class->extra_bytes, 0, extra_bytes );
  68     /* other fields are initialized by caller */
  69
  70     /* local classes have priority so we put them first in the list */
  71     if (local) list_add_head( &process->classes, &class->entry );
  72     else list_add_tail( &process->classes, &class->entry );
  73     return class;
  74 }
  75
  76 static void destroy_class( struct window_class *class )
  77 {
  78     list_remove( &class->entry );
  79     release_object( class->process );
  80     free( class );
  81 }
  82
  83 void destroy_process_classes( struct process *process )
  84 {
  85     struct list *ptr;
  86
  87     while ((ptr = list_head( &process->classes )))
  88     {
  89         struct window_class *class = LIST_ENTRY( ptr, struct window_class, entry );
  90         destroy_class( class );
  91     }
  92 }
  93
  94 static struct window_class *find_class( struct process *process, atom_t atom, void *instance )
  95 {
  96     struct list *ptr;
  97
  98     LIST_FOR_EACH( ptr, &process->classes )
  99     {
 100         struct window_class *class = LIST_ENTRY( ptr, struct window_class, entry );
 101         if (class->atom != atom) continue;
 102         if (!instance || !class->local || class->instance == instance) return class;
 103     }
 104     return NULL;
 105 }
 106
 107 struct window_class *grab_class( struct process *process, atom_t atom,
 108                                  void *instance, int *extra_bytes )
 109 {
 110     struct window_class *class = find_class( process, atom, instance );
 111     if (class)
 112     {
 113         class->count++;
 114         *extra_bytes = class->win_extra;
 115     }
 116     else set_error( STATUS_INVALID_HANDLE );
 117     return class;
 118 }
 119
 120 void release_class( struct window_class *class )
 121 {
 122     assert( class->count > 0 );
 123     class->count--;
 124 }
 125
 126 int is_desktop_class( struct window_class *class )
 127 {
 128     return (class->atom == DESKTOP_ATOM && !class->local);
 129 }
 130
 131 atom_t get_class_atom( struct window_class *class )
 132 {
 133     return class->atom;
 134 }
 135
 136 void *get_class_client_ptr( struct window_class *class )
 137 {
 138     return class->client_ptr;
 139 }
 140
 141 /* create a window class */
 142 DECL_HANDLER(create_class)
 143 {
 144     struct window_class *class;
 145
 146     class = find_class( current->process, req->atom, req->instance );
 147     if (class && !class->local == !req->local)
 148     {
 149         set_win32_error( ERROR_CLASS_ALREADY_EXISTS );
 150         return;
 151     }
 152     if (req->extra < 0 || req->extra > 4096 || req->win_extra < 0 || req->win_extra > 4096)
 153     {
 154         /* don't allow stupid values here */
 155         set_error( STATUS_INVALID_PARAMETER );
 156         return;
 157     }
 158
 159     if (!grab_global_atom( NULL, req->atom )) return;
 160
 161     if (!(class = create_class( current->process, req->extra, req->local )))
 162     {
 163         release_global_atom( NULL, req->atom );
 164         return;
 165     }
 166     class->atom       = req->atom;
 167     class->instance   = req->instance;
 168     class->style      = req->style;
 169     class->win_extra  = req->win_extra;
 170     class->client_ptr = req->client_ptr;
 171 }
 172
 173 /* destroy a window class */
 174 DECL_HANDLER(destroy_class)
 175 {
 176     struct window_class *class = find_class( current->process, req->atom, req->instance );
 177
 178     if (!class)
 179         set_win32_error( ERROR_CLASS_DOES_NOT_EXIST );
 180     else if (class->count)
 181         set_win32_error( ERROR_CLASS_HAS_WINDOWS );
 182     else
 183     {
 184         reply->client_ptr = class->client_ptr;
 185         destroy_class( class );
 186     }
 187 }
 188
 189
 190 /* set some information in a class */
 191 DECL_HANDLER(set_class_info)
 192 {
 193     struct window_class *class = get_window_class( req->window );
 194
 195     if (!class) return;
 196
 197     if (req->flags && class->process != current->process)
 198     {
 199         set_error( STATUS_ACCESS_DENIED );
 200         return;
 201     }
 202
 203     if (req->extra_size > sizeof(req->extra_value) ||
 204         req->extra_offset < -1 ||
 205         req->extra_offset > class->nb_extra_bytes - (int)req->extra_size)
 206     {
 207         set_win32_error( ERROR_INVALID_INDEX );
 208         return;
 209     }
 210     if ((req->flags & SET_CLASS_WINEXTRA) && (req->win_extra < 0 || req->win_extra > 4096))
 211     {
 212         set_error( STATUS_INVALID_PARAMETER );
 213         return;
 214     }
 215     if (req->extra_offset != -1)
 216     {
 217         memcpy( &reply->old_extra_value, class->extra_bytes + req->extra_offset, req->extra_size );
 218     }
 219     else if (req->flags & SET_CLASS_EXTRA)
 220     {
 221         set_win32_error( ERROR_INVALID_INDEX );
 222         return;
 223     }
 224
 225     reply->old_atom      = class->atom;
 226     reply->old_style     = class->style;
 227     reply->old_extra     = class->nb_extra_bytes;
 228     reply->old_win_extra = class->win_extra;
 229     reply->old_instance  = class->instance;
 230
 231     if (req->flags & SET_CLASS_ATOM)
 232     {
 233         if (!grab_global_atom( NULL, req->atom )) return;
 234         release_global_atom( NULL, class->atom );
 235         class->atom = req->atom;
 236     }
 237     if (req->flags & SET_CLASS_STYLE) class->style = req->style;
 238     if (req->flags & SET_CLASS_WINEXTRA) class->win_extra = req->win_extra;
 239     if (req->flags & SET_CLASS_INSTANCE) class->instance = req->instance;
 240     if (req->flags & SET_CLASS_EXTRA) memcpy( class->extra_bytes + req->extra_offset,
 241                                               &req->extra_value, req->extra_size );
 242 }