4 * Copyright 1995, 1996 Alexandre Julliard
14 typedef struct tagPROPERTY
16 struct tagPROPERTY *next; /* Next property in window list */
17 HANDLE32 handle; /* User's data */
18 LPSTR string; /* Property string (or atom) */
22 /***********************************************************************
25 static PROPERTY *PROP_FindProp( HWND32 hwnd, LPCSTR str )
28 WND *pWnd = WIN_FindWndPtr( hwnd );
30 if (!pWnd) return NULL;
33 for (prop = pWnd->pProp; prop; prop = prop->next)
34 if (HIWORD(prop->string) && !lstrcmpi32A( prop->string, str ))
39 for (prop = pWnd->pProp; (prop); prop = prop->next)
40 if (!HIWORD(prop->string) && (LOWORD(prop->string) == LOWORD(str)))
47 /***********************************************************************
50 HANDLE16 GetProp16( HWND16 hwnd, LPCSTR str )
52 return (HANDLE16)GetProp32A( hwnd, str );
56 /***********************************************************************
57 * GetProp32A (USER32.280)
59 HANDLE32 GetProp32A( HWND32 hwnd, LPCSTR str )
61 PROPERTY *prop = PROP_FindProp( hwnd, str );
64 dprintf_prop( stddeb, "GetProp(%08x,'%s'): returning %08x\n",
65 hwnd, str, prop ? prop->handle : 0 );
67 dprintf_prop( stddeb, "GetProp(%08x,#%04x): returning %08x\n",
68 hwnd, LOWORD(str), prop ? prop->handle : 0 );
70 return prop ? prop->handle : 0;
74 /***********************************************************************
75 * GetProp32W (USER32.281)
77 HANDLE32 GetProp32W( HWND32 hwnd, LPCWSTR str )
82 if (!HIWORD(str)) return GetProp32A( hwnd, (LPCSTR)(UINT32)LOWORD(str) );
83 strA = HEAP_strdupWtoA( GetProcessHeap(), 0, str );
84 ret = GetProp32A( hwnd, strA );
85 HeapFree( GetProcessHeap(), 0, strA );
90 /***********************************************************************
93 BOOL16 SetProp16( HWND16 hwnd, LPCSTR str, HANDLE16 handle )
95 return (BOOL16)SetProp32A( hwnd, str, handle );
99 /***********************************************************************
100 * SetProp32A (USER32.496)
102 BOOL32 SetProp32A( HWND32 hwnd, LPCSTR str, HANDLE32 handle )
107 dprintf_prop( stddeb, "SetProp: %04x '%s' %08x\n", hwnd, str, handle );
109 dprintf_prop( stddeb, "SetProp: %04x #%04x %08x\n",
110 hwnd, LOWORD(str), handle );
112 if (!(prop = PROP_FindProp( hwnd, str )))
114 /* We need to create it */
115 WND *pWnd = WIN_FindWndPtr( hwnd );
116 if (!pWnd) return FALSE;
117 if (!(prop = HeapAlloc( SystemHeap, 0, sizeof(*prop) ))) return FALSE;
118 if (!(prop->string = SEGPTR_STRDUP(str)))
120 HeapFree( SystemHeap, 0, prop );
123 prop->next = pWnd->pProp;
126 prop->handle = handle;
131 /***********************************************************************
132 * SetProp32W (USER32.497)
134 BOOL32 SetProp32W( HWND32 hwnd, LPCWSTR str, HANDLE32 handle )
140 return SetProp32A( hwnd, (LPCSTR)(UINT32)LOWORD(str), handle );
141 strA = HEAP_strdupWtoA( GetProcessHeap(), 0, str );
142 ret = SetProp32A( hwnd, strA, handle );
143 HeapFree( GetProcessHeap(), 0, strA );
148 /***********************************************************************
149 * RemoveProp16 (USER.24)
151 HANDLE16 RemoveProp16( HWND16 hwnd, LPCSTR str )
153 return (HANDLE16)RemoveProp32A( hwnd, str );
157 /***********************************************************************
158 * RemoveProp32A (USER32.441)
160 HANDLE32 RemoveProp32A( HWND32 hwnd, LPCSTR str )
163 PROPERTY **pprop, *prop;
164 WND *pWnd = WIN_FindWndPtr( hwnd );
167 dprintf_prop( stddeb, "RemoveProp: %04x '%s'\n", hwnd, str );
169 dprintf_prop( stddeb, "RemoveProp: %04x #%04x\n", hwnd, LOWORD(str));
172 if (!pWnd) return NULL;
175 for (pprop=(PROPERTY**)&pWnd->pProp; (*pprop); pprop = &(*pprop)->next)
176 if (HIWORD((*pprop)->string) &&
177 !lstrcmpi32A( (*pprop)->string, str )) break;
181 for (pprop=(PROPERTY**)&pWnd->pProp; (*pprop); pprop = &(*pprop)->next)
182 if (!HIWORD((*pprop)->string) &&
183 (LOWORD((*pprop)->string) == LOWORD(str))) break;
185 if (!*pprop) return 0;
187 handle = prop->handle;
189 SEGPTR_FREE(prop->string);
190 HeapFree( SystemHeap, 0, prop );
195 /***********************************************************************
196 * RemoveProp32W (USER32.442)
198 HANDLE32 RemoveProp32W( HWND32 hwnd, LPCWSTR str )
204 return RemoveProp32A( hwnd, (LPCSTR)(UINT32)LOWORD(str) );
205 strA = HEAP_strdupWtoA( GetProcessHeap(), 0, str );
206 ret = RemoveProp32A( hwnd, strA );
207 HeapFree( GetProcessHeap(), 0, strA );
212 /***********************************************************************
213 * PROPERTY_RemoveWindowProps
215 * Remove all properties of a window.
217 void PROPERTY_RemoveWindowProps( WND *pWnd )
219 PROPERTY *prop, *next;
221 for (prop = pWnd->pProp; (prop); prop = next)
224 SEGPTR_FREE( prop->string );
225 HeapFree( SystemHeap, 0, prop );
231 /***********************************************************************
232 * EnumProps16 (USER.27)
234 INT16 EnumProps16( HWND16 hwnd, PROPENUMPROC16 func )
236 PROPERTY *prop, *next;
240 dprintf_prop( stddeb, "EnumProps: %04x %08x\n", hwnd, (UINT32)func );
241 if (!(pWnd = WIN_FindWndPtr( hwnd ))) return -1;
242 for (prop = pWnd->pProp; (prop); prop = next)
244 /* Already get the next in case the callback */
245 /* function removes the current property. */
248 dprintf_prop( stddeb, " Callback: handle=%08x str='%s'\n",
249 prop->handle, prop->string );
250 ret = func( hwnd, SEGPTR_GET(prop->string), prop->handle );
257 /***********************************************************************
258 * EnumProps32A (USER32.185)
260 INT32 EnumProps32A( HWND32 hwnd, PROPENUMPROC32A func )
262 return EnumPropsEx32A( hwnd, (PROPENUMPROCEX32A)func, 0 );
266 /***********************************************************************
267 * EnumProps32W (USER32.188)
269 INT32 EnumProps32W( HWND32 hwnd, PROPENUMPROC32W func )
271 return EnumPropsEx32W( hwnd, (PROPENUMPROCEX32W)func, 0 );
275 /***********************************************************************
276 * EnumPropsEx32A (USER32.186)
278 INT32 EnumPropsEx32A( HWND32 hwnd, PROPENUMPROCEX32A func, LPARAM lParam )
280 PROPERTY *prop, *next;
284 dprintf_prop( stddeb, "EnumPropsEx32A: %04x %08x %08lx\n",
285 hwnd, (UINT32)func, lParam );
286 if (!(pWnd = WIN_FindWndPtr( hwnd ))) return -1;
287 for (prop = pWnd->pProp; (prop); prop = next)
289 /* Already get the next in case the callback */
290 /* function removes the current property. */
293 dprintf_prop( stddeb, " Callback: handle=%08x str='%s'\n",
294 prop->handle, prop->string );
295 ret = func( hwnd, prop->string, prop->handle, lParam );
302 /***********************************************************************
303 * EnumPropsEx32W (USER32.187)
305 INT32 EnumPropsEx32W( HWND32 hwnd, PROPENUMPROCEX32W func, LPARAM lParam )
307 PROPERTY *prop, *next;
311 dprintf_prop( stddeb, "EnumPropsEx32W: %04x %08x %08lx\n",
312 hwnd, (UINT32)func, lParam );
313 if (!(pWnd = WIN_FindWndPtr( hwnd ))) return -1;
314 for (prop = pWnd->pProp; (prop); prop = next)
316 /* Already get the next in case the callback */
317 /* function removes the current property. */
320 dprintf_prop( stddeb, " Callback: handle=%08x str='%s'\n",
321 prop->handle, prop->string );
322 if (HIWORD(prop->string))
324 LPWSTR str = HEAP_strdupAtoW( GetProcessHeap(), 0, prop->string );
325 ret = func( hwnd, str, prop->handle, lParam );
326 HeapFree( GetProcessHeap(), 0, str );
329 ret = func( hwnd, (LPCWSTR)(UINT32)LOWORD( prop->string ),
330 prop->handle, lParam );