git.oblomov.eu Git - wine/blob - dlls/comctl32/comctl32undoc.c

   1 /*
   2  * Undocumented functions from COMCTL32.DLL
   3  *
   4  * Copyright 1998 Eric Kohl
   5  *           1998 Juergen Schmied <j.schmied@metronet.de>
   6  *           2000 Eric Kohl for CodeWeavers
   7  *
   8  * This library is free software; you can redistribute it and/or
   9  * modify it under the terms of the GNU Lesser General Public
  10  * License as published by the Free Software Foundation; either
  11  * version 2.1 of the License, or (at your option) any later version.
  12  *
  13  * This library is distributed in the hope that it will be useful,
  14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  16  * Lesser General Public License for more details.
  17  *
  18  * You should have received a copy of the GNU Lesser General Public
  19  * License along with this library; if not, write to the Free Software
  20  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  21  *
  22  * NOTES
  23  *     All of these functions are UNDOCUMENTED!! And I mean UNDOCUMENTED!!!!
  24  *     Do NOT rely on names or contents of undocumented structures and types!!!
  25  *     These functions are used by EXPLORER.EXE, IEXPLORE.EXE and
  26  *     COMCTL32.DLL (internally).
  27  *
  28  */
  29 #include "config.h"
  30 #include "wine/port.h"
  31
  32 #include <stdarg.h>
  33 #include <string.h>
  34 #include <ctype.h>
  35 #include <limits.h>
  36
  37 #define COBJMACROS
  38 #define NONAMELESSUNION
  39 #define NONAMELESSSTRUCT
  40
  41 #include "windef.h"
  42 #include "winbase.h"
  43 #include "wingdi.h"
  44 #include "winuser.h"
  45 #include "winnls.h"
  46 #include "winreg.h"
  47 #include "commctrl.h"
  48 #include "objbase.h"
  49 #include "winerror.h"
  50
  51 #include "wine/unicode.h"
  52 #include "comctl32.h"
  53
  54 #include "wine/debug.h"
  55
  56 WINE_DEFAULT_DEBUG_CHANNEL(commctrl);
  57
  58 static const WCHAR strMRUList[] = { 'M','R','U','L','i','s','t',0 };
  59
  60 /**************************************************************************
  61  * Alloc [COMCTL32.71]
  62  *
  63  * Allocates memory block from the dll's private heap
  64  *
  65  * PARAMS
  66  *     dwSize [I] size of the allocated memory block
  67  *
  68  * RETURNS
  69  *     Success: pointer to allocated memory block
  70  *     Failure: NULL
  71  */
  72 LPVOID WINAPI Alloc (DWORD dwSize)
  73 {
  74     return LocalAlloc( LMEM_ZEROINIT, dwSize );
  75 }
  76
  77
  78 /**************************************************************************
  79  * ReAlloc [COMCTL32.72]
  80  *
  81  * Changes the size of an allocated memory block or allocates a memory
  82  * block using the dll's private heap.
  83  *
  84  * PARAMS
  85  *     lpSrc  [I] pointer to memory block which will be resized
  86  *     dwSize [I] new size of the memory block.
  87  *
  88  * RETURNS
  89  *     Success: pointer to the resized memory block
  90  *     Failure: NULL
  91  *
  92  * NOTES
  93  *     If lpSrc is a NULL-pointer, then ReAlloc allocates a memory
  94  *     block like Alloc.
  95  */
  96 LPVOID WINAPI ReAlloc (LPVOID lpSrc, DWORD dwSize)
  97 {
  98     if (lpSrc)
  99         return LocalReAlloc( lpSrc, dwSize, LMEM_ZEROINIT | LMEM_MOVEABLE );
 100     else
 101         return LocalAlloc( LMEM_ZEROINIT, dwSize);
 102 }
 103
 104
 105 /**************************************************************************
 106  * Free [COMCTL32.73]
 107  *
 108  * Frees an allocated memory block from the dll's private heap.
 109  *
 110  * PARAMS
 111  *     lpMem [I] pointer to memory block which will be freed
 112  *
 113  * RETURNS
 114  *     Success: TRUE
 115  *     Failure: FALSE
 116  */
 117 BOOL WINAPI Free (LPVOID lpMem)
 118 {
 119     return !LocalFree( lpMem );
 120 }
 121
 122
 123 /**************************************************************************
 124  * GetSize [COMCTL32.74]
 125  *
 126  * Retrieves the size of the specified memory block from the dll's
 127  * private heap.
 128  *
 129  * PARAMS
 130  *     lpMem [I] pointer to an allocated memory block
 131  *
 132  * RETURNS
 133  *     Success: size of the specified memory block
 134  *     Failure: 0
 135  */
 136 DWORD WINAPI GetSize (LPVOID lpMem)
 137 {
 138     return LocalSize( lpMem );
 139 }
 140
 141
 142 /**************************************************************************
 143  * MRU-Functions  {COMCTL32}
 144  *
 145  * NOTES
 146  * The MRU-Api is a set of functions to manipulate lists of M.R.U. (Most Recently
 147  * Used) items. It is an undocumented Api that is used (at least) by the shell
 148  * and explorer to implement their recent documents feature.
 149  *
 150  * Since these functions are undocumented, they are unsupported by MS and
 151  * may change at any time.
 152  *
 153  * Internally, the list is implemented as a last in, last out list of items
 154  * persisted into the system registry under a caller chosen key. Each list
 155  * item is given a one character identifier in the Ascii range from 'a' to
 156  * '}'. A list of the identifiers in order from newest to oldest is stored
 157  * under the same key in a value named "MRUList".
 158  *
 159  * Items are re-ordered by changing the order of the values in the MRUList
 160  * value. When a new item is added, it becomes the new value of the oldest
 161  * identifier, and that identifier is moved to the front of the MRUList value.
 162  *
 163  * Wine stores MRU-lists in the same registry format as Windows, so when
 164  * switching between the builtin and native comctl32.dll no problems or
 165  * incompatibilities should occur.
 166  *
 167  * The following undocumented structure is used to create an MRU-list:
 168  *|typedef INT (CALLBACK *MRUStringCmpFn)(LPCTSTR lhs, LPCTSTR rhs);
 169  *|typedef INT (CALLBACK *MRUBinaryCmpFn)(LPCVOID lhs, LPCVOID rhs, DWORD length);
 170  *|
 171  *|typedef struct tagCREATEMRULIST
 172  *|{
 173  *|    DWORD   cbSize;
 174  *|    DWORD   nMaxItems;
 175  *|    DWORD   dwFlags;
 176  *|    HKEY    hKey;
 177  *|    LPTSTR  lpszSubKey;
 178  *|    PROC    lpfnCompare;
 179  *|} CREATEMRULIST, *LPCREATEMRULIST;
 180  *
 181  * MEMBERS
 182  *  cbSize      [I] The size of the CREATEMRULIST structure. This must be set
 183  *                  to sizeof(CREATEMRULIST) by the caller.
 184  *  nMaxItems   [I] The maximum number of items allowed in the list. Because
 185  *                  of the limited number of identifiers, this should be set to
 186  *                  a value from 1 to 30 by the caller.
 187  *  dwFlags     [I] If bit 0 is set, the list will be used to store binary
 188  *                  data, otherwise it is assumed to store strings. If bit 1
 189  *                  is set, every change made to the list will be reflected in
 190  *                  the registry immediately, otherwise changes will only be
 191  *                  written when the list is closed.
 192  *  hKey        [I] The registry key that the list should be written under.
 193  *                  This must be supplied by the caller.
 194  *  lpszSubKey  [I] A caller supplied name of a subkey under hKey to write
 195  *                  the list to. This may not be blank.
 196  *  lpfnCompare [I] A caller supplied comparison function, which may be either
 197  *                  an MRUStringCmpFn if dwFlags does not have bit 0 set, or a
 198  *                  MRUBinaryCmpFn otherwise.
 199  *
 200  * FUNCTIONS
 201  *  - Create an MRU-list with CreateMRUList() or CreateMRUListLazy().
 202  *  - Add items to an MRU-list with AddMRUString() or AddMRUData().
 203  *  - Remove items from an MRU-list with DelMRUString().
 204  *  - Find data in an MRU-list with FindMRUString() or FindMRUData().
 205  *  - Iterate through an MRU-list with EnumMRUList().
 206  *  - Free an MRU-list with FreeMRUList().
 207  */
 208
 209 typedef struct tagCREATEMRULISTA
 210 {
 211     DWORD  cbSize;
 212     DWORD  nMaxItems;
 213     DWORD  dwFlags;
 214     HKEY   hKey;
 215     LPSTR  lpszSubKey;
 216     PROC   lpfnCompare;
 217 } CREATEMRULISTA, *LPCREATEMRULISTA;
 218
 219 typedef struct tagCREATEMRULISTW
 220 {
 221     DWORD   cbSize;
 222     DWORD   nMaxItems;
 223     DWORD   dwFlags;
 224     HKEY    hKey;
 225     LPWSTR  lpszSubKey;
 226     PROC    lpfnCompare;
 227 } CREATEMRULISTW, *LPCREATEMRULISTW;
 228
 229 /* dwFlags */
 230 #define MRUF_STRING_LIST  0 /* list will contain strings */
 231 #define MRUF_BINARY_LIST  1 /* list will contain binary data */
 232 #define MRUF_DELAYED_SAVE 2 /* only save list order to reg. is FreeMRUList */
 233
 234 /* If list is a string list lpfnCompare has the following prototype
 235  * int CALLBACK MRUCompareString(LPCSTR s1, LPCSTR s2)
 236  * for binary lists the prototype is
 237  * int CALLBACK MRUCompareBinary(LPCVOID data1, LPCVOID data2, DWORD cbData)
 238  * where cbData is the no. of bytes to compare.
 239  * Need to check what return value means identical - 0?
 240  */
 241
 242 typedef struct tagWINEMRUITEM
 243 {
 244     DWORD          size;        /* size of data stored               */
 245     DWORD          itemFlag;    /* flags                             */
 246     BYTE           datastart;
 247 } WINEMRUITEM, *LPWINEMRUITEM;
 248
 249 /* itemFlag */
 250 #define WMRUIF_CHANGED   0x0001 /* this dataitem changed             */
 251
 252 typedef struct tagWINEMRULIST
 253 {
 254     CREATEMRULISTW extview;     /* original create information       */
 255     BOOL           isUnicode;   /* is compare fn Unicode */
 256     DWORD          wineFlags;   /* internal flags                    */
 257     DWORD          cursize;     /* current size of realMRU           */
 258     LPWSTR         realMRU;     /* pointer to string of index names  */
 259     LPWINEMRUITEM  *array;      /* array of pointers to data         */
 260                                 /* in 'a' to 'z' order               */
 261 } WINEMRULIST, *LPWINEMRULIST;
 262
 263 /* wineFlags */
 264 #define WMRUF_CHANGED  0x0001   /* MRU list has changed              */
 265
 266 /**************************************************************************
 267  *              MRU_SaveChanged (internal)
 268  *
 269  * Local MRU saving code
 270  */
 271 static void MRU_SaveChanged ( LPWINEMRULIST mp )
 272 {
 273     UINT i, err;
 274     HKEY newkey;
 275     WCHAR realname[2];
 276     LPWINEMRUITEM witem;
 277
 278     /* or should we do the following instead of RegOpenKeyEx:
 279      */
 280
 281     /* open the sub key */
 282     if ((err = RegOpenKeyExW( mp->extview.hKey, mp->extview.lpszSubKey,
 283                               0, KEY_WRITE, &newkey))) {
 284         /* not present - what to do ??? */
 285         ERR("Could not open key, error=%d, attempting to create\n",
 286             err);
 287         if ((err = RegCreateKeyExW( mp->extview.hKey, mp->extview.lpszSubKey,
 288                                     0,
 289                                     NULL,
 290                                     REG_OPTION_NON_VOLATILE,
 291                                     KEY_READ | KEY_WRITE,
 292                                     0,
 293                                     &newkey,
 294                                     0))) {
 295             ERR("failed to create key /%s/, err=%d\n",
 296                 debugstr_w(mp->extview.lpszSubKey), err);
 297             return;
 298         }
 299     }
 300     if (mp->wineFlags & WMRUF_CHANGED) {
 301         mp->wineFlags &= ~WMRUF_CHANGED;
 302         err = RegSetValueExW(newkey, strMRUList, 0, REG_SZ, (LPBYTE)mp->realMRU,
 303                              (strlenW(mp->realMRU) + 1)*sizeof(WCHAR));
 304         if (err) {
 305             ERR("error saving MRUList, err=%d\n", err);
 306         }
 307         TRACE("saving MRUList=/%s/\n", debugstr_w(mp->realMRU));
 308     }
 309     realname[1] = 0;
 310     for(i=0; i<mp->cursize; i++) {
 311         witem = mp->array[i];
 312         if (witem->itemFlag & WMRUIF_CHANGED) {
 313             witem->itemFlag &= ~WMRUIF_CHANGED;
 314             realname[0] = 'a' + i;
 315             err = RegSetValueExW(newkey, realname, 0,
 316                                  (mp->extview.dwFlags & MRUF_BINARY_LIST) ?
 317                                  REG_BINARY : REG_SZ,
 318                                  &witem->datastart, witem->size);
 319             if (err) {
 320                 ERR("error saving /%s/, err=%d\n", debugstr_w(realname), err);
 321             }
 322             TRACE("saving value for name /%s/ size=%d\n",
 323                   debugstr_w(realname), witem->size);
 324         }
 325     }
 326     RegCloseKey( newkey );
 327 }
 328
 329 /**************************************************************************
 330  *              FreeMRUList [COMCTL32.152]
 331  *
 332  * Frees a most-recently-used items list.
 333  *
 334  * PARAMS
 335  *     hMRUList [I] Handle to list.
 336  *
 337  * RETURNS
 338  *     Nothing.
 339  */
 340 void WINAPI FreeMRUList (HANDLE hMRUList)
 341 {
 342     LPWINEMRULIST mp = (LPWINEMRULIST)hMRUList;
 343     UINT i;
 344
 345     TRACE("(%p)\n", hMRUList);
 346     if (!hMRUList)
 347         return;
 348
 349     if (mp->wineFlags & WMRUF_CHANGED) {
 350         /* need to open key and then save the info */
 351         MRU_SaveChanged( mp );
 352     }
 353
 354     for(i=0; i<mp->extview.nMaxItems; i++) {
 355         if (mp->array[i])
 356             Free(mp->array[i]);
 357     }
 358     Free(mp->realMRU);
 359     Free(mp->array);
 360     Free(mp->extview.lpszSubKey);
 361     Free(mp);
 362 }
 363
 364
 365 /**************************************************************************
 366  *                  FindMRUData [COMCTL32.169]
 367  *
 368  * Searches binary list for item that matches lpData of length cbData.
 369  * Returns position in list order 0 -> MRU and if lpRegNum != NULL then value
 370  * corresponding to item's reg. name will be stored in it ('a' -> 0).
 371  *
 372  * PARAMS
 373  *    hList [I] list handle
 374  *    lpData [I] data to find
 375  *    cbData [I] length of data
 376  *    lpRegNum [O] position in registry (maybe NULL)
 377  *
 378  * RETURNS
 379  *    Position in list 0 -> MRU.  -1 if item not found.
 380  */
 381 INT WINAPI FindMRUData (HANDLE hList, LPCVOID lpData, DWORD cbData,
 382                         LPINT lpRegNum)
 383 {
 384     LPWINEMRULIST mp = (LPWINEMRULIST)hList;
 385     INT ret;
 386     UINT i;
 387     LPSTR dataA = NULL;
 388
 389     if (!mp->extview.lpfnCompare)
 390         return -1;
 391
 392     if(!(mp->extview.dwFlags & MRUF_BINARY_LIST) && !mp->isUnicode) {
 393         DWORD len = WideCharToMultiByte(CP_ACP, 0, lpData, -1,
 394                                         NULL, 0, NULL, NULL);
 395         dataA = Alloc(len);
 396         WideCharToMultiByte(CP_ACP, 0, lpData, -1, dataA, len, NULL, NULL);
 397     }
 398
 399     for(i=0; i<mp->cursize; i++) {
 400         if (mp->extview.dwFlags & MRUF_BINARY_LIST) {
 401             if (!mp->extview.lpfnCompare(lpData, &mp->array[i]->datastart,
 402                                          cbData))
 403                 break;
 404         }
 405         else {
 406             if(mp->isUnicode) {
 407                 if (!mp->extview.lpfnCompare(lpData, &mp->array[i]->datastart))
 408                     break;
 409             } else {
 410                 DWORD len = WideCharToMultiByte(CP_ACP, 0,
 411                                                 (LPWSTR)&mp->array[i]->datastart, -1,
 412                                                 NULL, 0, NULL, NULL);
 413                 LPSTR itemA = Alloc(len);
 414                 INT cmp;
 415                 WideCharToMultiByte(CP_ACP, 0, (LPWSTR)&mp->array[i]->datastart, -1,
 416                                     itemA, len, NULL, NULL);
 417
 418                 cmp = mp->extview.lpfnCompare(dataA, itemA);
 419                 Free(itemA);
 420                 if(!cmp)
 421                     break;
 422             }
 423         }
 424     }
 425     if(dataA)
 426         Free(dataA);
 427     if (i < mp->cursize)
 428         ret = i;
 429     else
 430         ret = -1;
 431     if (lpRegNum && (ret != -1))
 432         *lpRegNum = 'a' + i;
 433
 434     TRACE("(%p, %p, %d, %p) returning %d\n",
 435            hList, lpData, cbData, lpRegNum, ret);
 436
 437     return ret;
 438 }
 439
 440
 441 /**************************************************************************
 442  *              AddMRUData [COMCTL32.167]
 443  *
 444  * Add item to MRU binary list.  If item already exists in list then it is
 445  * simply moved up to the top of the list and not added again.  If list is
 446  * full then the least recently used item is removed to make room.
 447  *
 448  * PARAMS
 449  *     hList [I] Handle to list.
 450  *     lpData [I] ptr to data to add.
 451  *     cbData [I] no. of bytes of data.
 452  *
 453  * RETURNS
 454  *     No. corresponding to registry name where value is stored 'a' -> 0 etc.
 455  *     -1 on error.
 456  */
 457 INT WINAPI AddMRUData (HANDLE hList, LPCVOID lpData, DWORD cbData)
 458 {
 459     LPWINEMRULIST mp = (LPWINEMRULIST)hList;
 460     LPWINEMRUITEM witem;
 461     INT i, replace;
 462
 463     if ((replace = FindMRUData (hList, lpData, cbData, NULL)) >= 0) {
 464         /* Item exists, just move it to the front */
 465         LPWSTR pos = strchrW(mp->realMRU, replace + 'a');
 466         while (pos > mp->realMRU)
 467         {
 468             pos[0] = pos[-1];
 469             pos--;
 470         }
 471     }
 472     else {
 473         /* either add a new entry or replace oldest */
 474         if (mp->cursize < mp->extview.nMaxItems) {
 475             /* Add in a new item */
 476             replace = mp->cursize;
 477             mp->cursize++;
 478         }
 479         else {
 480             /* get the oldest entry and replace data */
 481             replace = mp->realMRU[mp->cursize - 1] - 'a';
 482             Free(mp->array[replace]);
 483         }
 484
 485         /* Allocate space for new item and move in the data */
 486         mp->array[replace] = witem = Alloc(cbData + sizeof(WINEMRUITEM));
 487         witem->itemFlag |= WMRUIF_CHANGED;
 488         witem->size = cbData;
 489         memcpy( &witem->datastart, lpData, cbData);
 490
 491         /* now rotate MRU list */
 492         for(i=mp->cursize-1; i>=1; i--)
 493             mp->realMRU[i] = mp->realMRU[i-1];
 494     }
 495
 496     /* The new item gets the front spot */
 497     mp->wineFlags |= WMRUF_CHANGED;
 498     mp->realMRU[0] = replace + 'a';
 499
 500     TRACE("(%p, %p, %d) adding data, /%c/ now most current\n",
 501           hList, lpData, cbData, replace+'a');
 502
 503     if (!(mp->extview.dwFlags & MRUF_DELAYED_SAVE)) {
 504         /* save changed stuff right now */
 505         MRU_SaveChanged( mp );
 506     }
 507
 508     return replace;
 509 }
 510
 511 /**************************************************************************
 512  *              AddMRUStringW [COMCTL32.401]
 513  *
 514  * Add an item to an MRU string list.
 515  *
 516  * PARAMS
 517  *     hList      [I] Handle to list.
 518  *     lpszString [I] The string to add.
 519  *
 520  * RETURNS
 521  *   Success: The number corresponding to the registry name where the string
 522  *            has been stored (0 maps to 'a', 1 to 'b' and so on).
 523  *   Failure: -1, if hList is NULL or memory allocation fails. If lpszString
 524  *            is invalid, the function returns 0, and GetLastError() returns
 525  *            ERROR_INVALID_PARAMETER. The last error value is set only in
 526  *            this case.
 527  *
 528  * NOTES
 529  *  -If lpszString exists in the list already, it is moved to the top of the
 530  *   MRU list (it is not duplicated).
 531  *  -If the list is full the least recently used list entry is replaced with
 532  *   lpszString.
 533  *  -If this function returns 0 you should check the last error value to
 534  *   ensure the call really succeeded.
 535  */
 536 INT WINAPI AddMRUStringW(HANDLE hList, LPCWSTR lpszString)
 537 {
 538     TRACE("(%p,%s)\n", hList, debugstr_w(lpszString));
 539
 540     if (!hList)
 541         return -1;
 542
 543     if (!lpszString || IsBadStringPtrW(lpszString, -1))
 544     {
 545         SetLastError(ERROR_INVALID_PARAMETER);
 546         return 0;
 547     }
 548
 549     return AddMRUData(hList, lpszString,
 550                       (strlenW(lpszString) + 1) * sizeof(WCHAR));
 551 }
 552
 553 /**************************************************************************
 554  *              AddMRUStringA [COMCTL32.153]
 555  *
 556  * See AddMRUStringW.
 557  */
 558 INT WINAPI AddMRUStringA(HANDLE hList, LPCSTR lpszString)
 559 {
 560     DWORD len;
 561     LPWSTR stringW;
 562     INT ret;
 563
 564     TRACE("(%p,%s)\n", hList, debugstr_a(lpszString));
 565
 566     if (!hList)
 567         return -1;
 568
 569     if (IsBadStringPtrA(lpszString, -1))
 570     {
 571         SetLastError(ERROR_INVALID_PARAMETER);
 572         return 0;
 573     }
 574
 575     len = MultiByteToWideChar(CP_ACP, 0, lpszString, -1, NULL, 0) * sizeof(WCHAR);
 576     stringW = Alloc(len);
 577     if (!stringW)
 578         return -1;
 579
 580     MultiByteToWideChar(CP_ACP, 0, lpszString, -1, stringW, len/sizeof(WCHAR));
 581     ret = AddMRUData(hList, stringW, len);
 582     Free(stringW);
 583     return ret;
 584 }
 585
 586 /**************************************************************************
 587  *              DelMRUString [COMCTL32.156]
 588  *
 589  * Removes item from either string or binary list (despite its name)
 590  *
 591  * PARAMS
 592  *    hList [I] list handle
 593  *    nItemPos [I] item position to remove 0 -> MRU
 594  *
 595  * RETURNS
 596  *    TRUE if successful, FALSE if nItemPos is out of range.
 597  */
 598 BOOL WINAPI DelMRUString(HANDLE hList, INT nItemPos)
 599 {
 600     FIXME("(%p, %d): stub\n", hList, nItemPos);
 601     return TRUE;
 602 }
 603
 604 /**************************************************************************
 605  *                  FindMRUStringW [COMCTL32.402]
 606  *
 607  * See FindMRUStringA.
 608  */
 609 INT WINAPI FindMRUStringW (HANDLE hList, LPCWSTR lpszString, LPINT lpRegNum)
 610 {
 611   return FindMRUData(hList, lpszString,
 612                      (lstrlenW(lpszString) + 1) * sizeof(WCHAR), lpRegNum);
 613 }
 614
 615 /**************************************************************************
 616  *                  FindMRUStringA [COMCTL32.155]
 617  *
 618  * Searches string list for item that matches lpszString.
 619  * Returns position in list order 0 -> MRU and if lpRegNum != NULL then value
 620  * corresponding to item's reg. name will be stored in it ('a' -> 0).
 621  *
 622  * PARAMS
 623  *    hList [I] list handle
 624  *    lpszString [I] string to find
 625  *    lpRegNum [O] position in registry (maybe NULL)
 626  *
 627  * RETURNS
 628  *    Position in list 0 -> MRU.  -1 if item not found.
 629  */
 630 INT WINAPI FindMRUStringA (HANDLE hList, LPCSTR lpszString, LPINT lpRegNum)
 631 {
 632     DWORD len = MultiByteToWideChar(CP_ACP, 0, lpszString, -1, NULL, 0);
 633     LPWSTR stringW = Alloc(len * sizeof(WCHAR));
 634     INT ret;
 635
 636     MultiByteToWideChar(CP_ACP, 0, lpszString, -1, stringW, len);
 637     ret = FindMRUData(hList, stringW, len * sizeof(WCHAR), lpRegNum);
 638     Free(stringW);
 639     return ret;
 640 }
 641
 642 /*************************************************************************
 643  *                 CreateMRUListLazy_common (internal)
 644  */
 645 static HANDLE CreateMRUListLazy_common(LPWINEMRULIST mp)
 646 {
 647     UINT i, err;
 648     HKEY newkey;
 649     DWORD datasize, dwdisp;
 650     WCHAR realname[2];
 651     LPWINEMRUITEM witem;
 652     DWORD type;
 653
 654     /* get space to save indices that will turn into names
 655      * but in order of most to least recently used
 656      */
 657     mp->realMRU = Alloc((mp->extview.nMaxItems + 2) * sizeof(WCHAR));
 658
 659     /* get space to save pointers to actual data in order of
 660      * 'a' to 'z' (0 to n).
 661      */
 662     mp->array = Alloc(mp->extview.nMaxItems * sizeof(LPVOID));
 663
 664     /* open the sub key */
 665     if ((err = RegCreateKeyExW( mp->extview.hKey, mp->extview.lpszSubKey,
 666                                 0,
 667                                 NULL,
 668                                 REG_OPTION_NON_VOLATILE,
 669                                 KEY_READ | KEY_WRITE,
 670                                 0,
 671                                 &newkey,
 672                                 &dwdisp))) {
 673         /* error - what to do ??? */
 674         ERR("(%u %u %x %p %s %p): Could not open key, error=%d\n",
 675             mp->extview.cbSize, mp->extview.nMaxItems, mp->extview.dwFlags,
 676             mp->extview.hKey, debugstr_w(mp->extview.lpszSubKey),
 677                                  mp->extview.lpfnCompare, err);
 678         return 0;
 679     }
 680
 681     /* get values from key 'MRUList' */
 682     if (newkey) {
 683         datasize = (mp->extview.nMaxItems + 1) * sizeof(WCHAR);
 684         if((err=RegQueryValueExW( newkey, strMRUList, 0, &type,
 685                                   (LPBYTE)mp->realMRU, &datasize))) {
 686             /* not present - set size to 1 (will become 0 later) */
 687             datasize = 1;
 688             *mp->realMRU = 0;
 689         }
 690         else
 691             datasize /= sizeof(WCHAR);
 692
 693         TRACE("MRU list = %s, datasize = %d\n", debugstr_w(mp->realMRU), datasize);
 694
 695         mp->cursize = datasize - 1;
 696         /* datasize now has number of items in the MRUList */
 697
 698         /* get actual values for each entry */
 699         realname[1] = 0;
 700         for(i=0; i<mp->cursize; i++) {
 701             realname[0] = 'a' + i;
 702             if(RegQueryValueExW( newkey, realname, 0, &type, 0, &datasize)) {
 703                 /* not present - what to do ??? */
 704                 ERR("Key %s not found 1\n", debugstr_w(realname));
 705             }
 706             mp->array[i] = witem = Alloc(datasize + sizeof(WINEMRUITEM));
 707             witem->size = datasize;
 708             if(RegQueryValueExW( newkey, realname, 0, &type,
 709                                  &witem->datastart, &datasize)) {
 710                 /* not present - what to do ??? */
 711                 ERR("Key %s not found 2\n", debugstr_w(realname));
 712             }
 713         }
 714         RegCloseKey( newkey );
 715     }
 716     else
 717         mp->cursize = 0;
 718
 719     TRACE("(%u %u %x %p %s %p): Current Size = %d\n",
 720           mp->extview.cbSize, mp->extview.nMaxItems, mp->extview.dwFlags,
 721           mp->extview.hKey, debugstr_w(mp->extview.lpszSubKey),
 722           mp->extview.lpfnCompare, mp->cursize);
 723     return (HANDLE)mp;
 724 }
 725
 726 /**************************************************************************
 727  *                  CreateMRUListLazyW [COMCTL32.404]
 728  *
 729  * See CreateMRUListLazyA.
 730  */
 731 HANDLE WINAPI CreateMRUListLazyW (LPCREATEMRULISTW lpcml, DWORD dwParam2,
 732                                   DWORD dwParam3, DWORD dwParam4)
 733 {
 734     LPWINEMRULIST mp;
 735
 736     /* Native does not check for a NULL lpcml */
 737
 738     if (lpcml->cbSize != sizeof(CREATEMRULISTW) || !lpcml->hKey ||
 739         IsBadStringPtrW(lpcml->lpszSubKey, -1))
 740         return NULL;
 741
 742     mp = Alloc(sizeof(WINEMRULIST));
 743     memcpy(&mp->extview, lpcml, sizeof(CREATEMRULISTW));
 744     mp->extview.lpszSubKey = Alloc((strlenW(lpcml->lpszSubKey) + 1) * sizeof(WCHAR));
 745     strcpyW(mp->extview.lpszSubKey, lpcml->lpszSubKey);
 746     mp->isUnicode = TRUE;
 747
 748     return CreateMRUListLazy_common(mp);
 749 }
 750
 751 /**************************************************************************
 752  *                  CreateMRUListLazyA [COMCTL32.157]
 753  *
 754  * Creates a most-recently-used list.
 755  *
 756  * PARAMS
 757  *     lpcml    [I] ptr to CREATEMRULIST structure.
 758  *     dwParam2 [I] Unknown
 759  *     dwParam3 [I] Unknown
 760  *     dwParam4 [I] Unknown
 761  *
 762  * RETURNS
 763  *     Handle to MRU list.
 764  */
 765 HANDLE WINAPI CreateMRUListLazyA (LPCREATEMRULISTA lpcml, DWORD dwParam2,
 766                                   DWORD dwParam3, DWORD dwParam4)
 767 {
 768     LPWINEMRULIST mp;
 769     DWORD len;
 770
 771     /* Native does not check for a NULL lpcml */
 772
 773     if (lpcml->cbSize != sizeof(CREATEMRULISTA) || !lpcml->hKey ||
 774         IsBadStringPtrA(lpcml->lpszSubKey, -1))
 775         return 0;
 776
 777     mp = Alloc(sizeof(WINEMRULIST));
 778     memcpy(&mp->extview, lpcml, sizeof(CREATEMRULISTW));
 779     len = MultiByteToWideChar(CP_ACP, 0, lpcml->lpszSubKey, -1, NULL, 0);
 780     mp->extview.lpszSubKey = Alloc(len * sizeof(WCHAR));
 781     MultiByteToWideChar(CP_ACP, 0, lpcml->lpszSubKey, -1,
 782                         mp->extview.lpszSubKey, len);
 783     mp->isUnicode = FALSE;
 784     return CreateMRUListLazy_common(mp);
 785 }
 786
 787 /**************************************************************************
 788  *              CreateMRUListW [COMCTL32.400]
 789  *
 790  * See CreateMRUListA.
 791  */
 792 HANDLE WINAPI CreateMRUListW (LPCREATEMRULISTW lpcml)
 793 {
 794     return CreateMRUListLazyW(lpcml, 0, 0, 0);
 795 }
 796
 797 /**************************************************************************
 798  *              CreateMRUListA [COMCTL32.151]
 799  *
 800  * Creates a most-recently-used list.
 801  *
 802  * PARAMS
 803  *     lpcml [I] ptr to CREATEMRULIST structure.
 804  *
 805  * RETURNS
 806  *     Handle to MRU list.
 807  */
 808 HANDLE WINAPI CreateMRUListA (LPCREATEMRULISTA lpcml)
 809 {
 810      return CreateMRUListLazyA (lpcml, 0, 0, 0);
 811 }
 812
 813
 814 /**************************************************************************
 815  *                EnumMRUListW [COMCTL32.403]
 816  *
 817  * Enumerate item in a most-recenty-used list
 818  *
 819  * PARAMS
 820  *    hList [I] list handle
 821  *    nItemPos [I] item position to enumerate
 822  *    lpBuffer [O] buffer to receive item
 823  *    nBufferSize [I] size of buffer
 824  *
 825  * RETURNS
 826  *    For binary lists specifies how many bytes were copied to buffer, for
 827  *    string lists specifies full length of string.  Enumerating past the end
 828  *    of list returns -1.
 829  *    If lpBuffer == NULL or nItemPos is -ve return value is no. of items in
 830  *    the list.
 831  */
 832 INT WINAPI EnumMRUListW (HANDLE hList, INT nItemPos, LPVOID lpBuffer,
 833                          DWORD nBufferSize)
 834 {
 835     LPWINEMRULIST mp = (LPWINEMRULIST) hList;
 836     LPWINEMRUITEM witem;
 837     INT desired, datasize;
 838
 839     if (nItemPos >= mp->cursize) return -1;
 840     if ((nItemPos < 0) || !lpBuffer) return mp->cursize;
 841     desired = mp->realMRU[nItemPos];
 842     desired -= 'a';
 843     TRACE("nItemPos=%d, desired=%d\n", nItemPos, desired);
 844     witem = mp->array[desired];
 845     datasize = min( witem->size, nBufferSize );
 846     memcpy( lpBuffer, &witem->datastart, datasize);
 847     TRACE("(%p, %d, %p, %d): returning len=%d\n",
 848           hList, nItemPos, lpBuffer, nBufferSize, datasize);
 849     return datasize;
 850 }
 851
 852 /**************************************************************************
 853  *                EnumMRUListA [COMCTL32.154]
 854  *
 855  * See EnumMRUListW.
 856  */
 857 INT WINAPI EnumMRUListA (HANDLE hList, INT nItemPos, LPVOID lpBuffer,
 858                          DWORD nBufferSize)
 859 {
 860     LPWINEMRULIST mp = (LPWINEMRULIST) hList;
 861     LPWINEMRUITEM witem;
 862     INT desired, datasize;
 863     DWORD lenA;
 864
 865     if (nItemPos >= mp->cursize) return -1;
 866     if ((nItemPos < 0) || !lpBuffer) return mp->cursize;
 867     desired = mp->realMRU[nItemPos];
 868     desired -= 'a';
 869     TRACE("nItemPos=%d, desired=%d\n", nItemPos, desired);
 870     witem = mp->array[desired];
 871     if(mp->extview.dwFlags & MRUF_BINARY_LIST) {
 872         datasize = min( witem->size, nBufferSize );
 873         memcpy( lpBuffer, &witem->datastart, datasize);
 874     } else {
 875         lenA = WideCharToMultiByte(CP_ACP, 0, (LPWSTR)&witem->datastart, -1,
 876                                    NULL, 0, NULL, NULL);
 877         datasize = min( witem->size, nBufferSize );
 878         WideCharToMultiByte(CP_ACP, 0, (LPWSTR)&witem->datastart, -1,
 879                             lpBuffer, datasize, NULL, NULL);
 880     }
 881     TRACE("(%p, %d, %p, %d): returning len=%d\n",
 882           hList, nItemPos, lpBuffer, nBufferSize, datasize);
 883     return datasize;
 884 }
 885
 886 /**************************************************************************
 887  * Str_GetPtrWtoA [internal]
 888  *
 889  * Converts a unicode string into a multi byte string
 890  *
 891  * PARAMS
 892  *     lpSrc   [I] Pointer to the unicode source string
 893  *     lpDest  [O] Pointer to caller supplied storage for the multi byte string
 894  *     nMaxLen [I] Size, in bytes, of the destination buffer
 895  *
 896  * RETURNS
 897  *     Length, in bytes, of the converted string.
 898  */
 899
 900 INT Str_GetPtrWtoA (LPCWSTR lpSrc, LPSTR lpDest, INT nMaxLen)
 901 {
 902     INT len;
 903
 904     TRACE("(%s %p %d)\n", debugstr_w(lpSrc), lpDest, nMaxLen);
 905
 906     if (!lpDest && lpSrc)
 907         return WideCharToMultiByte(CP_ACP, 0, lpSrc, -1, 0, 0, NULL, NULL);
 908
 909     if (nMaxLen == 0)
 910         return 0;
 911
 912     if (lpSrc == NULL) {
 913         lpDest[0] = '\0';
 914         return 0;
 915     }
 916
 917     len = WideCharToMultiByte(CP_ACP, 0, lpSrc, -1, 0, 0, NULL, NULL);
 918     if (len >= nMaxLen)
 919         len = nMaxLen - 1;
 920
 921     WideCharToMultiByte(CP_ACP, 0, lpSrc, -1, lpDest, len, NULL, NULL);
 922     lpDest[len] = '\0';
 923
 924     return len;
 925 }
 926
 927
 928 /**************************************************************************
 929  * Str_SetPtrAtoW [internal]
 930  *
 931  * Converts a multi byte string to a unicode string.
 932  * If the pointer to the destination buffer is NULL a buffer is allocated.
 933  * If the destination buffer is too small to keep the converted multi byte
 934  * string the destination buffer is reallocated. If the source pointer is
 935  * NULL, the destination buffer is freed.
 936  *
 937  * PARAMS
 938  *     lppDest [I/O] pointer to a pointer to the destination buffer
 939  *     lpSrc   [I] pointer to a multi byte string
 940  *
 941  * RETURNS
 942  *     TRUE: conversion successful
 943  *     FALSE: error
 944  */
 945 BOOL Str_SetPtrAtoW (LPWSTR *lppDest, LPCSTR lpSrc)
 946 {
 947     TRACE("(%p %s)\n", lppDest, lpSrc);
 948
 949     if (lpSrc) {
 950         INT len = MultiByteToWideChar(CP_ACP,0,lpSrc,-1,NULL,0);
 951         LPWSTR ptr = ReAlloc (*lppDest, len*sizeof(WCHAR));
 952
 953         if (!ptr)
 954             return FALSE;
 955         MultiByteToWideChar(CP_ACP,0,lpSrc,-1,ptr,len);
 956         *lppDest = ptr;
 957     }
 958     else {
 959         if (*lppDest) {
 960             Free (*lppDest);
 961             *lppDest = NULL;
 962         }
 963     }
 964
 965     return TRUE;
 966 }
 967
 968 /**************************************************************************
 969  * Str_SetPtrWtoA [internal]
 970  *
 971  * Converts a unicode string to a multi byte string.
 972  * If the pointer to the destination buffer is NULL a buffer is allocated.
 973  * If the destination buffer is too small to keep the converted wide
 974  * string the destination buffer is reallocated. If the source pointer is
 975  * NULL, the destination buffer is freed.
 976  *
 977  * PARAMS
 978  *     lppDest [I/O] pointer to a pointer to the destination buffer
 979  *     lpSrc   [I] pointer to a wide string
 980  *
 981  * RETURNS
 982  *     TRUE: conversion successful
 983  *     FALSE: error
 984  */
 985 BOOL Str_SetPtrWtoA (LPSTR *lppDest, LPCWSTR lpSrc)
 986 {
 987     TRACE("(%p %s)\n", lppDest, debugstr_w(lpSrc));
 988
 989     if (lpSrc) {
 990         INT len = WideCharToMultiByte(CP_ACP,0,lpSrc,-1,NULL,0,NULL,FALSE);
 991         LPSTR ptr = ReAlloc (*lppDest, len*sizeof(CHAR));
 992
 993         if (!ptr)
 994             return FALSE;
 995         WideCharToMultiByte(CP_ACP,0,lpSrc,-1,ptr,len,NULL,FALSE);
 996         *lppDest = ptr;
 997     }
 998     else {
 999         if (*lppDest) {
1000             Free (*lppDest);
1001             *lppDest = NULL;
1002         }
1003     }
1004
1005     return TRUE;
1006 }
1007
1008
1009 /**************************************************************************
1010  * Notification functions
1011  */
1012
1013 typedef struct tagNOTIFYDATA
1014 {
1015     HWND hwndFrom;
1016     HWND hwndTo;
1017     DWORD  dwParam3;
1018     DWORD  dwParam4;
1019     DWORD  dwParam5;
1020     DWORD  dwParam6;
1021 } NOTIFYDATA, *LPNOTIFYDATA;
1022
1023
1024 /**************************************************************************
1025  * DoNotify [Internal]
1026  */
1027
1028 static LRESULT DoNotify (LPNOTIFYDATA lpNotify, UINT uCode, LPNMHDR lpHdr)
1029 {
1030     NMHDR nmhdr;
1031     LPNMHDR lpNmh = NULL;
1032     UINT idFrom = 0;
1033
1034     TRACE("(%p %p %d %p 0x%08x)\n",
1035            lpNotify->hwndFrom, lpNotify->hwndTo, uCode, lpHdr,
1036            lpNotify->dwParam5);
1037
1038     if (!lpNotify->hwndTo)
1039         return 0;
1040
1041     if (lpNotify->hwndFrom == (HWND)-1) {
1042         lpNmh = lpHdr;
1043         idFrom = lpHdr->idFrom;
1044     }
1045     else {
1046         if (lpNotify->hwndFrom)
1047             idFrom = GetDlgCtrlID (lpNotify->hwndFrom);
1048
1049         lpNmh = (lpHdr) ? lpHdr : &nmhdr;
1050
1051         lpNmh->hwndFrom = lpNotify->hwndFrom;
1052         lpNmh->idFrom = idFrom;
1053         lpNmh->code = uCode;
1054     }
1055
1056     return SendMessageW (lpNotify->hwndTo, WM_NOTIFY, idFrom, (LPARAM)lpNmh);
1057 }
1058
1059
1060 /**************************************************************************
1061  * SendNotify [COMCTL32.341]
1062  *
1063  * Sends a WM_NOTIFY message to the specified window.
1064  *
1065  * PARAMS
1066  *     hwndTo   [I] Window to receive the message
1067  *     hwndFrom [I] Window that the message is from (see notes)
1068  *     uCode    [I] Notification code
1069  *     lpHdr    [I] The NMHDR and any additional information to send or NULL
1070  *
1071  * RETURNS
1072  *     Success: return value from notification
1073  *     Failure: 0
1074  *
1075  * NOTES
1076  *     If hwndFrom is -1 then the identifier of the control sending the
1077  *     message is taken from the NMHDR structure.
1078  *     If hwndFrom is not -1 then lpHdr can be NULL.
1079  */
1080 LRESULT WINAPI SendNotify (HWND hwndTo, HWND hwndFrom, UINT uCode, LPNMHDR lpHdr)
1081 {
1082     NOTIFYDATA notify;
1083
1084     TRACE("(%p %p %d %p)\n",
1085            hwndTo, hwndFrom, uCode, lpHdr);
1086
1087     notify.hwndFrom = hwndFrom;
1088     notify.hwndTo   = hwndTo;
1089     notify.dwParam5 = 0;
1090     notify.dwParam6 = 0;
1091
1092     return DoNotify (&notify, uCode, lpHdr);
1093 }
1094
1095
1096 /**************************************************************************
1097  * SendNotifyEx [COMCTL32.342]
1098  *
1099  * Sends a WM_NOTIFY message to the specified window.
1100  *
1101  * PARAMS
1102  *     hwndFrom [I] Window to receive the message
1103  *     hwndTo   [I] Window that the message is from
1104  *     uCode    [I] Notification code
1105  *     lpHdr    [I] The NMHDR and any additional information to send or NULL
1106  *     dwParam5 [I] Unknown
1107  *
1108  * RETURNS
1109  *     Success: return value from notification
1110  *     Failure: 0
1111  *
1112  * NOTES
1113  *     If hwndFrom is -1 then the identifier of the control sending the
1114  *     message is taken from the NMHDR structure.
1115  *     If hwndFrom is not -1 then lpHdr can be NULL.
1116  */
1117 LRESULT WINAPI SendNotifyEx (HWND hwndTo, HWND hwndFrom, UINT uCode,
1118                              LPNMHDR lpHdr, DWORD dwParam5)
1119 {
1120     NOTIFYDATA notify;
1121     HWND hwndNotify;
1122
1123     TRACE("(%p %p %d %p 0x%08x)\n",
1124            hwndFrom, hwndTo, uCode, lpHdr, dwParam5);
1125
1126     hwndNotify = hwndTo;
1127     if (!hwndTo) {
1128         if (IsWindow (hwndFrom)) {
1129             hwndNotify = GetParent (hwndFrom);
1130             if (!hwndNotify)
1131                 return 0;
1132         }
1133     }
1134
1135     notify.hwndFrom = hwndFrom;
1136     notify.hwndTo   = hwndNotify;
1137     notify.dwParam5 = dwParam5;
1138     notify.dwParam6 = 0;
1139
1140     return DoNotify (&notify, uCode, lpHdr);
1141 }