opengl32: Skip debug callback messages called from native thread.
[wine.git] / server / class.c
blob3231f366b261b107455cf44f348bc5934999f022
1 /*
2 * Server-side window class management
4 * Copyright (C) 2002 Mike McCormack
5 * Copyright (C) 2003 Alexandre Julliard
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.
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.
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
22 #include "config.h"
24 #include <assert.h>
25 #include <stdlib.h>
26 #include <stdio.h>
27 #include <string.h>
29 #include "ntstatus.h"
30 #define WIN32_NO_STATUS
32 #include "wine/list.h"
34 #include "request.h"
35 #include "object.h"
36 #include "process.h"
37 #include "user.h"
38 #include "winuser.h"
39 #include "winternl.h"
41 struct window_class
43 struct list entry; /* entry in process list */
44 struct process *process; /* process owning the class */
45 int count; /* reference count */
46 int local; /* local class? */
47 atom_t atom; /* class atom */
48 atom_t base_atom; /* base class atom for versioned class */
49 mod_handle_t instance; /* module instance */
50 unsigned int style; /* class style */
51 int win_extra; /* number of window extra bytes */
52 client_ptr_t 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 */
57 static struct window_class *create_class( struct process *process, int extra_bytes, int local )
59 struct window_class *class;
61 if (!(class = mem_alloc( sizeof(*class) + extra_bytes - 1 ))) return NULL;
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 */
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;
76 static void destroy_class( struct window_class *class )
78 release_global_atom( NULL, class->atom );
79 release_global_atom( NULL, class->base_atom );
80 list_remove( &class->entry );
81 release_object( class->process );
82 free( class );
85 void destroy_process_classes( struct process *process )
87 struct list *ptr;
89 while ((ptr = list_head( &process->classes )))
91 struct window_class *class = LIST_ENTRY( ptr, struct window_class, entry );
92 destroy_class( class );
96 static struct window_class *find_class( struct process *process, atom_t atom, mod_handle_t instance )
98 struct list *ptr;
100 LIST_FOR_EACH( ptr, &process->classes )
102 int is_win16;
103 struct window_class *class = LIST_ENTRY( ptr, struct window_class, entry );
104 if (class->atom != atom) continue;
105 is_win16 = !(class->instance >> 16);
106 if (!instance || !class->local || class->instance == instance ||
107 (!is_win16 && ((class->instance & ~0xffff) == (instance & ~0xffff)))) return class;
109 return NULL;
112 struct window_class *grab_class( struct process *process, atom_t atom,
113 mod_handle_t instance, int *extra_bytes )
115 struct window_class *class = find_class( process, atom, instance );
116 if (class)
118 class->count++;
119 *extra_bytes = class->win_extra;
121 else set_error( STATUS_INVALID_HANDLE );
122 return class;
125 void release_class( struct window_class *class )
127 assert( class->count > 0 );
128 class->count--;
131 int is_desktop_class( struct window_class *class )
133 return (class->atom == DESKTOP_ATOM && !class->local);
136 int is_hwnd_message_class( struct window_class *class )
138 static const WCHAR messageW[] = {'M','e','s','s','a','g','e'};
139 static const struct unicode_str name = { messageW, sizeof(messageW) };
141 return (!class->local && class->atom == find_global_atom( NULL, &name ));
144 int get_class_style( struct window_class *class )
146 return class->style;
149 atom_t get_class_atom( struct window_class *class )
151 return class->base_atom;
154 client_ptr_t get_class_client_ptr( struct window_class *class )
156 return class->client_ptr;
159 /* create a window class */
160 DECL_HANDLER(create_class)
162 struct window_class *class;
163 struct unicode_str name = get_req_unicode_str();
164 atom_t atom, base_atom;
166 if (name.len)
168 atom = add_global_atom( NULL, &name );
169 if (!atom) return;
170 if (req->name_offset && req->name_offset < name.len / sizeof(WCHAR))
172 name.str += req->name_offset;
173 name.len -= req->name_offset * sizeof(WCHAR);
175 base_atom = add_global_atom( NULL, &name );
176 if (!base_atom)
178 release_global_atom( NULL, atom );
179 return;
182 else
184 base_atom = atom;
185 grab_global_atom( NULL, atom );
188 else
190 base_atom = atom = req->atom;
191 if (!grab_global_atom( NULL, atom )) return;
192 grab_global_atom( NULL, base_atom );
195 class = find_class( current->process, atom, req->instance );
196 if (class && !class->local == !req->local)
198 set_win32_error( ERROR_CLASS_ALREADY_EXISTS );
199 release_global_atom( NULL, atom );
200 release_global_atom( NULL, base_atom );
201 return;
203 if (req->extra < 0 || req->extra > 4096 || req->win_extra < 0 || req->win_extra > 4096)
205 /* don't allow stupid values here */
206 set_error( STATUS_INVALID_PARAMETER );
207 release_global_atom( NULL, atom );
208 release_global_atom( NULL, base_atom );
209 return;
212 if (!(class = create_class( current->process, req->extra, req->local )))
214 release_global_atom( NULL, atom );
215 release_global_atom( NULL, base_atom );
216 return;
218 class->atom = atom;
219 class->base_atom = base_atom;
220 class->instance = req->instance;
221 class->style = req->style;
222 class->win_extra = req->win_extra;
223 class->client_ptr = req->client_ptr;
224 reply->atom = atom;
227 /* destroy a window class */
228 DECL_HANDLER(destroy_class)
230 struct window_class *class;
231 struct unicode_str name = get_req_unicode_str();
232 atom_t atom = req->atom;
234 if (name.len) atom = find_global_atom( NULL, &name );
236 if (!(class = find_class( current->process, atom, req->instance )))
237 set_win32_error( ERROR_CLASS_DOES_NOT_EXIST );
238 else if (class->count)
239 set_win32_error( ERROR_CLASS_HAS_WINDOWS );
240 else
242 reply->client_ptr = class->client_ptr;
243 destroy_class( class );
248 /* set some information in a class */
249 DECL_HANDLER(set_class_info)
251 struct window_class *class = get_window_class( req->window );
253 if (!class) return;
255 if (req->flags && class->process != current->process)
257 set_error( STATUS_ACCESS_DENIED );
258 return;
261 if (req->extra_size > sizeof(req->extra_value) ||
262 req->extra_offset < -1 ||
263 req->extra_offset > class->nb_extra_bytes - (int)req->extra_size)
265 set_win32_error( ERROR_INVALID_INDEX );
266 return;
268 if ((req->flags & SET_CLASS_WINEXTRA) && (req->win_extra < 0 || req->win_extra > 4096))
270 set_error( STATUS_INVALID_PARAMETER );
271 return;
273 if (req->extra_offset != -1)
275 memcpy( &reply->old_extra_value, class->extra_bytes + req->extra_offset, req->extra_size );
277 else if (req->flags & SET_CLASS_EXTRA)
279 set_win32_error( ERROR_INVALID_INDEX );
280 return;
283 reply->old_atom = class->atom;
284 reply->old_style = class->style;
285 reply->old_extra = class->nb_extra_bytes;
286 reply->old_win_extra = class->win_extra;
287 reply->old_instance = class->instance;
288 reply->base_atom = class->base_atom;
290 if (req->flags & SET_CLASS_ATOM)
292 if (!grab_global_atom( NULL, req->atom )) return;
293 release_global_atom( NULL, class->atom );
294 class->atom = req->atom;
296 if (req->flags & SET_CLASS_STYLE) class->style = req->style;
297 if (req->flags & SET_CLASS_WINEXTRA) class->win_extra = req->win_extra;
298 if (req->flags & SET_CLASS_INSTANCE) class->instance = req->instance;
299 if (req->flags & SET_CLASS_EXTRA) memcpy( class->extra_bytes + req->extra_offset,
300 &req->extra_value, req->extra_size );