windows/clipboard.c

   1 /*
   2  * WIN32 clipboard implementation
   3  *
   4  * Copyright 1994 Martin Ayotte
   5  *           1996 Alex Korobka
   6  *           1999 Noel Borthwick
   7  *
   8  * NOTES:
   9  *    This file contains the implementation for the WIN32 Clipboard API
  10  * and Wine's internal clipboard cache.
  11  * The actual contents of the clipboard are held in the clipboard cache.
  12  * The internal implementation talks to a "clipboard driver" to fill or
  13  * expose the cache to the native device. (Currently only the X11 and
  14  * TTY clipboard  driver are available)
  15  *
  16  * TODO:
  17  *
  18  */
  19
  20 #include <stdlib.h>
  21 #include <sys/types.h>
  22 #include <sys/stat.h>
  23 #include <fcntl.h>
  24 #include <unistd.h>
  25 #include <string.h>
  26
  27 #include "windef.h"
  28 #include "winbase.h"
  29 #include "wingdi.h"
  30 #include "winuser.h"
  31 #include "wine/winuser16.h"
  32 #include "wine/winbase16.h"
  33 #include "heap.h"
  34 #include "message.h"
  35 #include "queue.h"
  36 #include "user.h"
  37 #include "clipboard.h"
  38 #include "debugtools.h"
  39
  40 DEFAULT_DEBUG_CHANNEL(clipboard);
  41
  42 #define  CF_REGFORMATBASE       0xC000
  43
  44 /**************************************************************************
  45  *        Clipboard context global variables
  46  */
  47
  48 static HANDLE hClipLock   = 0;
  49 static BOOL bCBHasChanged  = FALSE;
  50
  51 HWND hWndClipWindow = 0;          /* window that last opened clipboard */
  52 HWND hWndClipOwner  = 0;          /* current clipboard owner */
  53 HANDLE16 hTaskClipOwner = 0;      /* clipboard owner's task  */
  54 static HWND hWndViewer     = 0;   /* start of viewers chain */
  55
  56 static WORD LastRegFormat = CF_REGFORMATBASE;
  57
  58 /* Clipboard cache initial data.
  59  * WARNING: This data ordering is dependent on the WINE_CLIPFORMAT structure
  60  * declared in clipboard.h
  61  */
  62 WINE_CLIPFORMAT ClipFormats[]  = {
  63     { CF_TEXT, 1, 0, "Text",  0, 0, 0, 0, NULL, &ClipFormats[1]},
  64     { CF_BITMAP, 1, 0, "Bitmap", 0, 0, 0, 0, &ClipFormats[0], &ClipFormats[2]},
  65     { CF_METAFILEPICT, 1, 0, "MetaFile Picture", 0, 0, 0, 0, &ClipFormats[1], &ClipFormats[3]},
  66     { CF_SYLK, 1, 0, "Sylk", 0, 0, 0, 0, &ClipFormats[2], &ClipFormats[4]},
  67     { CF_DIF, 1, 0, "DIF", 0, 0, 0, 0, &ClipFormats[3], &ClipFormats[5]},
  68     { CF_TIFF, 1, 0, "TIFF", 0, 0, 0, 0, &ClipFormats[4], &ClipFormats[6]},
  69     { CF_OEMTEXT, 1, 0, "OEM Text", 0, 0, 0, 0, &ClipFormats[5], &ClipFormats[7]},
  70     { CF_DIB, 1, 0, "DIB", 0, 0, 0, 0, &ClipFormats[6], &ClipFormats[8]},
  71     { CF_PALETTE, 1, 0, "Palette", 0, 0, 0, 0, &ClipFormats[7], &ClipFormats[9]},
  72     { CF_PENDATA, 1, 0, "PenData", 0, 0, 0, 0, &ClipFormats[8], &ClipFormats[10]},
  73     { CF_RIFF, 1, 0, "RIFF", 0, 0, 0, 0, &ClipFormats[9], &ClipFormats[11]},
  74     { CF_WAVE, 1, 0, "Wave", 0, 0, 0, 0, &ClipFormats[10], &ClipFormats[12]},
  75     { CF_UNICODETEXT, 1, 0, "Unicode Text", 0, 0, 0, 0, &ClipFormats[11], &ClipFormats[13]},
  76     { CF_OWNERDISPLAY, 1, 0, "Owner Display", 0, 0, 0, 0, &ClipFormats[12], &ClipFormats[14]},
  77     { CF_DSPTEXT, 1, 0, "DSPText", 0, 0, 0, 0, &ClipFormats[13], &ClipFormats[15]},
  78     { CF_DSPMETAFILEPICT, 1, 0, "DSPMetaFile Picture", 0, 0, 0, 0, &ClipFormats[14], &ClipFormats[16]},
  79     { CF_DSPBITMAP, 1, 0, "DSPBitmap", 0, 0, 0, 0, &ClipFormats[15], &ClipFormats[17]},
  80     { CF_HDROP, 1, 0, "HDROP", 0, 0, 0, 0, &ClipFormats[16], NULL}
  81 };
  82
  83
  84 /**************************************************************************
  85  *                Internal Clipboard implementation methods
  86  **************************************************************************/
  87
  88
  89 /**************************************************************************
  90  *                      CLIPBOARD_LookupFormat
  91  */
  92 static LPWINE_CLIPFORMAT __lookup_format( LPWINE_CLIPFORMAT lpFormat, WORD wID )
  93 {
  94     while(TRUE)
  95     {
  96         if (lpFormat == NULL ||
  97             lpFormat->wFormatID == wID) break;
  98         lpFormat = lpFormat->NextFormat;
  99     }
 100     return lpFormat;
 101 }
 102
 103 LPWINE_CLIPFORMAT CLIPBOARD_LookupFormat( WORD wID )
 104 {
 105   return __lookup_format( ClipFormats, wID );
 106 }
 107
 108 /**************************************************************************
 109  *                      CLIPBOARD_IsLocked
 110  *  Check if the clipboard cache is available to the caller
 111  */
 112 BOOL CLIPBOARD_IsLocked()
 113 {
 114   BOOL bIsLocked = TRUE;
 115   HANDLE16 hTaskCur = GetCurrentTask();
 116
 117   /*
 118    * The clipboard is available:
 119    * 1. if the caller's task has opened the clipboard,
 120    * or
 121    * 2. if the caller is the clipboard owners task, AND is responding to a
 122    *    WM_RENDERFORMAT message.
 123    */
 124   if ( hClipLock == hTaskCur )
 125       bIsLocked = FALSE;
 126
 127   else if ( hTaskCur == hTaskClipOwner )
 128   {
 129       /* Check if we're currently executing inside a window procedure
 130        * called in response to a WM_RENDERFORMAT message. A WM_RENDERFORMAT
 131        * handler is not permitted to open the clipboard since it has been opened
 132        * by another client. However the handler must have access to the
 133        * clipboard in order to update data in response to this message.
 134        */
 135       MESSAGEQUEUE *queue = QUEUE_Lock( GetFastQueue16() );
 136
 137       if ( queue
 138            && queue->smWaiting
 139            && queue->smWaiting->msg == WM_RENDERFORMAT
 140            && queue->smWaiting->hSrcQueue
 141          )
 142         bIsLocked = FALSE;
 143
 144       QUEUE_Unlock( queue );
 145   }
 146
 147   return bIsLocked;
 148 }
 149
 150 /**************************************************************************
 151  *                      CLIPBOARD_ReleaseOwner
 152  *   Gives up ownership of the clipboard
 153  */
 154 void CLIPBOARD_ReleaseOwner()
 155 {
 156    hWndClipOwner = 0;
 157    hTaskClipOwner = 0;
 158 }
 159
 160 /**************************************************************************
 161  *                      CLIPBOARD_GlobalFreeProc
 162  *
 163  * This is a callback mechanism to allow HGLOBAL data to be released in
 164  * the context of the process which allocated it. We post a WM_TIMER message
 165  * to the owner window(in CLIPBOARD_DeleteRecord) and destroy the data(in idEvent)
 166  * in this WndProc, which is invoked when the apps message loop calls DispatchMessage.
 167  * This technique is discussed in Matt Pietrek's "Under the Hood".
 168  * An article describing the same may be found in MSDN by searching for WM_TIMER.
 169  * Note that this mechanism will probably stop working when WINE supports
 170  * address space separation. When "queue events" are implemented in Wine we
 171  * should switch to using that mechanism, since it is more robust and does not
 172  * require a procedure address to be passed. See the SetWinEventHook API for
 173  * more info on this.
 174  */
 175 VOID CALLBACK CLIPBOARD_GlobalFreeProc( HWND hwnd, UINT uMsg, UINT idEvent, DWORD dwTime )
 176 {
 177     /* idEvent is the HGLOBAL to be deleted */
 178     GlobalFree( (HGLOBAL)idEvent );
 179 }
 180
 181 /**************************************************************************
 182  *                      CLIPBOARD_DeleteRecord
 183  */
 184 void CLIPBOARD_DeleteRecord(LPWINE_CLIPFORMAT lpFormat, BOOL bChange)
 185 {
 186     if( (lpFormat->wFormatID >= CF_GDIOBJFIRST &&
 187          lpFormat->wFormatID <= CF_GDIOBJLAST) || lpFormat->wFormatID == CF_BITMAP
 188             || lpFormat->wFormatID == CF_PALETTE)
 189     {
 190       if (lpFormat->hData32)
 191         DeleteObject(lpFormat->hData32);
 192       if (lpFormat->hData16)
 193         DeleteObject(lpFormat->hData16);
 194     }
 195     else if( lpFormat->wFormatID == CF_METAFILEPICT )
 196     {
 197       if (lpFormat->hData32)
 198       {
 199         DeleteMetaFile( ((METAFILEPICT *)GlobalLock( lpFormat->hData32 ))->hMF );
 200         PostMessageA(hWndClipOwner, WM_TIMER,
 201                      (WPARAM)lpFormat->hData32, (LPARAM)CLIPBOARD_GlobalFreeProc);
 202         if (lpFormat->hDataSrc32)
 203         {
 204           /* Release lpFormat->hData32 in the context of the process which created it.
 205            * See CLIPBOARD_GlobalFreeProc for more details about this technique.
 206            * GlobalFree(lpFormat->hDataSrc32);
 207            */
 208           PostMessageA(hWndClipOwner, WM_TIMER,
 209                        (WPARAM)lpFormat->hDataSrc32, (LPARAM)CLIPBOARD_GlobalFreeProc);
 210         }
 211
 212         if (lpFormat->hData16)
 213           /* HMETAFILE16 and HMETAFILE32 are apparently the same thing,
 214              and a shallow copy is enough to share a METAFILEPICT
 215              structure between 16bit and 32bit clipboards.  The MetaFile
 216              should of course only be deleted once. */
 217           GlobalFree16(lpFormat->hData16);
 218       }
 219       if (lpFormat->hData16)
 220       {
 221         DeleteMetaFile16( ((METAFILEPICT16 *)GlobalLock16( lpFormat->hData16 ))->hMF );
 222         GlobalFree16(lpFormat->hData16);
 223       }
 224     }
 225     else
 226     {
 227       if (lpFormat->hData32)
 228       {
 229         /* Release lpFormat->hData32 in the context of the process which created it.
 230          * See CLIPBOARD_GlobalFreeProc for more details about this technique.
 231          * GlobalFree( lpFormat->hData32 );
 232          */
 233         PostMessageA(hWndClipOwner, WM_TIMER,
 234                      (WPARAM)lpFormat->hData32, (LPARAM)CLIPBOARD_GlobalFreeProc);
 235       }
 236       if (lpFormat->hDataSrc32)
 237       {
 238         /* Release lpFormat->hData32 in the context of the process which created it.
 239          * See CLIPBOARD_GlobalFreeProc for more details about this technique.
 240          * GlobalFree(lpFormat->hDataSrc32);
 241          */
 242         PostMessageA(hWndClipOwner, WM_TIMER,
 243                      (WPARAM)lpFormat->hDataSrc32, (LPARAM)CLIPBOARD_GlobalFreeProc);
 244       }
 245       if (lpFormat->hData16)
 246         GlobalFree16(lpFormat->hData16);
 247     }
 248
 249     lpFormat->wDataPresent = 0;
 250     lpFormat->hData16 = 0;
 251     lpFormat->hData32 = 0;
 252     lpFormat->hDataSrc32 = 0;
 253     lpFormat->drvData = 0;
 254
 255     if( bChange ) bCBHasChanged = TRUE;
 256 }
 257
 258 /**************************************************************************
 259  *                      CLIPBOARD_EmptyCache
 260  */
 261 void CLIPBOARD_EmptyCache( BOOL bChange )
 262 {
 263     LPWINE_CLIPFORMAT lpFormat = ClipFormats;
 264
 265     while(lpFormat)
 266     {
 267         if ( lpFormat->wDataPresent || lpFormat->hData16 || lpFormat->hData32 )
 268              CLIPBOARD_DeleteRecord( lpFormat, bChange );
 269
 270         lpFormat = lpFormat->NextFormat;
 271     }
 272 }
 273
 274 /**************************************************************************
 275  *                      CLIPBOARD_IsPresent
 276  */
 277 BOOL CLIPBOARD_IsPresent(WORD wFormat)
 278 {
 279     /* special case */
 280
 281     if( wFormat == CF_TEXT || wFormat == CF_OEMTEXT || wFormat == CF_UNICODETEXT )
 282         return ClipFormats[CF_TEXT-1].wDataPresent ||
 283                ClipFormats[CF_OEMTEXT-1].wDataPresent ||
 284                ClipFormats[CF_UNICODETEXT-1].wDataPresent;
 285     else
 286     {
 287         LPWINE_CLIPFORMAT lpFormat = __lookup_format( ClipFormats, wFormat );
 288         if( lpFormat ) return (lpFormat->wDataPresent);
 289     }
 290     return FALSE;
 291 }
 292
 293 /**************************************************************************
 294  *                      CLIPBOARD_IsCacheRendered
 295  *  Checks if any data needs to be rendered to the clipboard cache
 296  *  RETURNS:
 297  *    TRUE  - All clipboard data is available in the cache
 298  *    FALSE - Some data is marked for delayed render and needs rendering
 299  */
 300 BOOL CLIPBOARD_IsCacheRendered()
 301 {
 302     LPWINE_CLIPFORMAT lpFormat = ClipFormats;
 303
 304     /* check if all formats were rendered */
 305     while(lpFormat)
 306     {
 307         if( lpFormat->wDataPresent && !lpFormat->hData16 && !lpFormat->hData32 )
 308             return FALSE;
 309
 310         lpFormat = lpFormat->NextFormat;
 311     }
 312
 313     return TRUE;
 314 }
 315
 316
 317 /**************************************************************************
 318  *                      CLIPBOARD_IsMemoryObject
 319  *  Tests if the clipboard format specifies a memory object
 320  */
 321 BOOL CLIPBOARD_IsMemoryObject( WORD wFormat )
 322 {
 323     switch(wFormat)
 324     {
 325         case CF_BITMAP:
 326         case CF_METAFILEPICT:
 327         case CF_DSPTEXT:
 328         case CF_ENHMETAFILE:
 329         case CF_HDROP:
 330         case CF_PALETTE:
 331         case CF_PENDATA:
 332             return FALSE;
 333         default:
 334             return TRUE;
 335      }
 336 }
 337
 338 /***********************************************************************
 339  * CLIPBOARD_GlobalDupMem( HGLOBAL )
 340  * Helper method to duplicate an HGLOBAL chunk of memory into shared memory
 341  */
 342 HGLOBAL CLIPBOARD_GlobalDupMem( HGLOBAL hGlobalSrc )
 343 {
 344     HGLOBAL hGlobalDest;
 345     PVOID pGlobalSrc, pGlobalDest;
 346     DWORD cBytes;
 347
 348     if ( !hGlobalSrc )
 349       return 0;
 350
 351     cBytes = GlobalSize(hGlobalSrc);
 352     if ( 0 == cBytes )
 353       return 0;
 354
 355     /* Turn on the DDESHARE and _MOVEABLE flags explicitly */
 356     hGlobalDest = GlobalAlloc( GlobalFlags(hGlobalSrc) | GMEM_DDESHARE | GMEM_MOVEABLE,
 357                                cBytes );
 358     if ( !hGlobalDest )
 359       return 0;
 360
 361     pGlobalSrc = GlobalLock(hGlobalSrc);
 362     pGlobalDest = GlobalLock(hGlobalDest);
 363     if ( !pGlobalSrc || !pGlobalDest )
 364       return 0;
 365
 366     memcpy(pGlobalDest, pGlobalSrc, cBytes);
 367
 368     GlobalUnlock(hGlobalSrc);
 369     GlobalUnlock(hGlobalDest);
 370
 371     return hGlobalDest;
 372 }
 373
 374 /**************************************************************************
 375  *                      CLIPBOARD_GetFormatName
 376  *  Gets the format name associated with an ID
 377  */
 378 char * CLIPBOARD_GetFormatName(UINT wFormat)
 379 {
 380     LPWINE_CLIPFORMAT lpFormat = __lookup_format( ClipFormats, wFormat );
 381     return (lpFormat) ? lpFormat->Name : NULL;
 382 }
 383
 384
 385 /**************************************************************************
 386  *                      CLIPBOARD_RenderFormat
 387  */
 388 static BOOL CLIPBOARD_RenderFormat(LPWINE_CLIPFORMAT lpFormat)
 389 {
 390   /*
 391    * If WINE is not the selection owner, and the format is available
 392    * we must ask the driver to render the data to the clipboard cache.
 393    */
 394   TRACE("enter format=%d\n", lpFormat->wFormatID);
 395   if ( !USER_Driver.pIsSelectionOwner()
 396        && USER_Driver.pIsClipboardFormatAvailable( lpFormat->wFormatID ) )
 397   {
 398     if ( !USER_Driver.pGetClipboardData( lpFormat->wFormatID ) )
 399       return FALSE;
 400   }
 401   /*
 402    * If Wine owns the clipboard, and the data is marked for delayed render,
 403    * render it now.
 404    */
 405   else if( lpFormat->wDataPresent && !lpFormat->hData16 && !lpFormat->hData32 )
 406   {
 407     if( IsWindow(hWndClipOwner) )
 408     {
 409       /* Send a WM_RENDERFORMAT message to notify the owner to render the
 410        * data requested into the clipboard.
 411        */
 412       TRACE("Sending WM_RENDERFORMAT message\n");
 413       SendMessage16(hWndClipOwner,WM_RENDERFORMAT,
 414                     (WPARAM16)lpFormat->wFormatID,0L);
 415     }
 416     else
 417     {
 418       WARN("\thWndClipOwner (%04x) is lost!\n",
 419            hWndClipOwner);
 420       CLIPBOARD_ReleaseOwner();
 421       lpFormat->wDataPresent = 0;
 422       return FALSE;
 423     }
 424   }
 425
 426   return (lpFormat->hData16 || lpFormat->hData32) ? TRUE : FALSE;
 427 }
 428
 429 /**************************************************************************
 430  *                      CLIPBOARD_ConvertText
 431  * Returns number of required/converted characters - not bytes!
 432  */
 433 static INT CLIPBOARD_ConvertText(WORD src_fmt, void const *src, INT src_size,
 434                                  WORD dst_fmt, void *dst, INT dst_size)
 435 {
 436     UINT cp;
 437
 438     if(src_fmt == CF_UNICODETEXT)
 439     {
 440         switch(dst_fmt)
 441         {
 442         case CF_TEXT:
 443             cp = CP_ACP;
 444             break;
 445         case CF_OEMTEXT:
 446             cp = CP_OEMCP;
 447             break;
 448         default:
 449             return 0;
 450         }
 451         return WideCharToMultiByte(cp, 0, src, src_size, dst, dst_size, NULL, NULL);
 452     }
 453
 454     if(dst_fmt == CF_UNICODETEXT)
 455     {
 456         switch(src_fmt)
 457         {
 458         case CF_TEXT:
 459             cp = CP_ACP;
 460             break;
 461         case CF_OEMTEXT:
 462             cp = CP_OEMCP;
 463             break;
 464         default:
 465             return 0;
 466         }
 467         return MultiByteToWideChar(cp, 0, src, src_size, dst, dst_size);
 468     }
 469
 470     if(!dst_size) return src_size;
 471
 472     if(dst_size > src_size) dst_size = src_size;
 473
 474     if(src_fmt == CF_TEXT )
 475         CharToOemBuffA(src, dst, dst_size);
 476     else
 477         OemToCharBuffA(src, dst, dst_size);
 478
 479     return dst_size;
 480 }
 481
 482 /**************************************************************************
 483  *                      CLIPBOARD_RenderText
 484  *
 485  * Renders text to the clipboard buffer converting between UNIX and DOS formats.
 486  *
 487  * RETURNS: pointer to the WINE_CLIPFORMAT if successful, NULL otherwise
 488  *
 489  * FIXME: Should be a pair of driver functions that convert between OEM text and Windows.
 490  *
 491  */
 492 static LPWINE_CLIPFORMAT CLIPBOARD_RenderText( UINT wFormat )
 493 {
 494     LPWINE_CLIPFORMAT lpSource = ClipFormats;
 495     LPWINE_CLIPFORMAT lpTarget = NULL;
 496     BOOL foundData = FALSE;
 497
 498     /* Asked for CF_TEXT but not available - always attempt to convert
 499        from CF_UNICODETEXT or CF_OEMTEXT */
 500     if( wFormat == CF_TEXT && !ClipFormats[CF_TEXT-1].wDataPresent )
 501     {
 502         if(ClipFormats[CF_UNICODETEXT-1].wDataPresent)
 503         {
 504             /* Convert UNICODETEXT -> TEXT */
 505             lpSource = &ClipFormats[CF_UNICODETEXT-1];
 506             lpTarget = &ClipFormats[CF_TEXT-1];
 507             foundData = TRUE;
 508             TRACE("\tUNICODETEXT -> TEXT\n");
 509         }
 510         else if(ClipFormats[CF_OEMTEXT-1].wDataPresent)
 511         {
 512             /* Convert OEMTEXT -> TEXT */
 513             lpSource = &ClipFormats[CF_OEMTEXT-1];
 514             lpTarget = &ClipFormats[CF_TEXT-1];
 515             foundData = TRUE;
 516             TRACE("\tOEMTEXT -> TEXT\n");
 517         }
 518     }
 519     /* Asked for CF_OEMTEXT but not available - always attempt to convert
 520        from CF_UNICODETEXT or CF_TEXT */
 521     else if( wFormat == CF_OEMTEXT && !ClipFormats[CF_OEMTEXT-1].wDataPresent )
 522     {
 523         if(ClipFormats[CF_UNICODETEXT-1].wDataPresent)
 524         {
 525             /* Convert UNICODETEXT -> OEMTEXT */
 526             lpSource = &ClipFormats[CF_UNICODETEXT-1];
 527             lpTarget = &ClipFormats[CF_OEMTEXT-1];
 528             foundData = TRUE;
 529             TRACE("\tUNICODETEXT -> OEMTEXT\n");
 530         }
 531         else if(ClipFormats[CF_TEXT-1].wDataPresent)
 532         {
 533             /* Convert TEXT -> OEMTEXT */
 534             lpSource = &ClipFormats[CF_TEXT-1];
 535             lpTarget = &ClipFormats[CF_OEMTEXT-1];
 536             foundData = TRUE;
 537             TRACE("\tTEXT -> OEMTEXT\n");
 538         }
 539     }
 540     /* Asked for CF_UNICODETEXT but not available - always attempt to convert
 541        from CF_TEXT or CF_OEMTEXT */
 542     else if( wFormat == CF_UNICODETEXT && !ClipFormats[CF_UNICODETEXT-1].wDataPresent )
 543     {
 544         if(ClipFormats[CF_TEXT-1].wDataPresent)
 545         {
 546             /* Convert TEXT -> UNICODETEXT */
 547             lpSource = &ClipFormats[CF_TEXT-1];
 548             lpTarget = &ClipFormats[CF_UNICODETEXT-1];
 549             foundData = TRUE;
 550             TRACE("\tTEXT -> UNICODETEXT\n");
 551         }
 552         else if(ClipFormats[CF_OEMTEXT-1].wDataPresent)
 553         {
 554             /* Convert OEMTEXT -> UNICODETEXT */
 555             lpSource = &ClipFormats[CF_OEMTEXT-1];
 556             lpTarget = &ClipFormats[CF_UNICODETEXT-1];
 557             foundData = TRUE;
 558             TRACE("\tOEMTEXT -> UNICODETEXT\n");
 559         }
 560     }
 561     if (!foundData)
 562     {
 563         if ((wFormat == CF_TEXT) || (wFormat == CF_OEMTEXT))
 564         {
 565             lpSource = &ClipFormats[CF_UNICODETEXT-1];
 566             lpTarget = __lookup_format( ClipFormats, wFormat );
 567         }
 568         else
 569         {
 570             lpSource = __lookup_format( ClipFormats, wFormat );
 571             lpTarget = lpSource;
 572         }
 573     }
 574
 575     /* First render the source text format */
 576     if ( !lpSource || !CLIPBOARD_RenderFormat(lpSource) ) return NULL;
 577
 578     /* Convert to the desired target text format, if necessary */
 579     if( lpTarget != lpSource && !lpTarget->hData16 && !lpTarget->hData32 )
 580     {
 581         INT src_chars, dst_chars, alloc_size;
 582         LPCSTR lpstrS;
 583         LPSTR  lpstrT;
 584
 585         if (lpSource->hData32)
 586         {
 587           lpstrS = (LPSTR)GlobalLock(lpSource->hData32);
 588         }
 589         else
 590         {
 591           lpstrS = (LPSTR)GlobalLock16(lpSource->hData16);
 592         }
 593
 594         if( !lpstrS ) return NULL;
 595
 596         /* Text always NULL terminated */
 597         if(lpSource->wFormatID == CF_UNICODETEXT)
 598             src_chars = strlenW((LPCWSTR)lpstrS);
 599         else
 600             src_chars = strlen(lpstrS);
 601
 602         /* Calculate number of characters in the destination buffer */
 603         dst_chars = CLIPBOARD_ConvertText(lpSource->wFormatID, lpstrS, src_chars,
 604                                      lpTarget->wFormatID, NULL, 0);
 605         if(!dst_chars) return NULL;
 606
 607         TRACE("\tconverting from '%s' to '%s', %i chars\n",
 608                 lpSource->Name, lpTarget->Name, src_chars);
 609
 610         /* Convert characters to bytes */
 611         if(lpTarget->wFormatID == CF_UNICODETEXT)
 612             alloc_size = dst_chars * sizeof(WCHAR);
 613         else
 614             alloc_size = dst_chars;
 615
 616         lpTarget->hData32 = GlobalAlloc(GMEM_ZEROINIT | GMEM_MOVEABLE | GMEM_DDESHARE, alloc_size);
 617         lpstrT = (LPSTR)GlobalLock(lpTarget->hData32);
 618
 619         if( lpstrT )
 620         {
 621             CLIPBOARD_ConvertText(lpSource->wFormatID, lpstrS, src_chars,
 622                                   lpTarget->wFormatID, lpstrT, dst_chars);
 623             GlobalUnlock(lpTarget->hData32);
 624         }
 625         else
 626             lpTarget->hData32 = 0;
 627
 628         /* Unlock source */
 629         if (lpSource->hData32)
 630           GlobalUnlock(lpSource->hData32);
 631         else
 632           GlobalUnlock16(lpSource->hData16);
 633     }
 634
 635     return (lpTarget->hData16 || lpTarget->hData32) ? lpTarget : NULL;
 636 }
 637
 638 /**************************************************************************
 639  *            CLIPBOARD_EnumClipboardFormats   (internal)
 640  */
 641 static UINT CLIPBOARD_EnumClipboardFormats( UINT wFormat )
 642 {
 643     LPWINE_CLIPFORMAT lpFormat = ClipFormats;
 644     BOOL bFormatPresent;
 645
 646     if (wFormat == 0) /* start from the beginning */
 647         lpFormat = ClipFormats;
 648     else
 649     {
 650         /* walk up to the specified format record */
 651
 652         if( !(lpFormat = __lookup_format( lpFormat, wFormat )) )
 653             return 0;
 654         lpFormat = lpFormat->NextFormat; /* right */
 655     }
 656
 657     while(TRUE)
 658     {
 659         if (lpFormat == NULL) return 0;
 660
 661         if(CLIPBOARD_IsPresent(lpFormat->wFormatID))
 662             break;
 663
 664         /* Query the driver if not yet in the cache */
 665         if (!USER_Driver.pIsSelectionOwner())
 666         {
 667             if(lpFormat->wFormatID == CF_UNICODETEXT ||
 668                lpFormat->wFormatID == CF_TEXT ||
 669                lpFormat->wFormatID == CF_OEMTEXT)
 670             {
 671                 if(USER_Driver.pIsClipboardFormatAvailable(CF_UNICODETEXT) ||
 672                    USER_Driver.pIsClipboardFormatAvailable(CF_TEXT) ||
 673                    USER_Driver.pIsClipboardFormatAvailable(CF_OEMTEXT))
 674                     bFormatPresent = TRUE;
 675                 else
 676                     bFormatPresent = FALSE;
 677             }
 678             else
 679                 bFormatPresent = USER_Driver.pIsClipboardFormatAvailable(lpFormat->wFormatID);
 680
 681             if(bFormatPresent)
 682                 break;
 683         }
 684
 685         lpFormat = lpFormat->NextFormat;
 686     }
 687
 688     TRACE("Next available format %d\n", lpFormat->wFormatID);
 689
 690     return lpFormat->wFormatID;
 691 }
 692
 693
 694 /**************************************************************************
 695  *                WIN32 Clipboard implementation
 696  **************************************************************************/
 697
 698 /**************************************************************************
 699  *              OpenClipboard (USER.137)
 700  */
 701 BOOL16 WINAPI OpenClipboard16( HWND16 hWnd )
 702 {
 703     return OpenClipboard( hWnd );
 704 }
 705
 706
 707 /**************************************************************************
 708  *              OpenClipboard (USER32.@)
 709  *
 710  * Note: Netscape uses NULL hWnd to open the clipboard.
 711  */
 712 BOOL WINAPI OpenClipboard( HWND hWnd )
 713 {
 714     BOOL bRet;
 715
 716     TRACE("(%04x)...\n", hWnd);
 717
 718     if (!hClipLock)
 719     {
 720         hClipLock = GetCurrentTask();
 721
 722         /* Save current user of the clipboard */
 723         hWndClipWindow = hWnd;
 724         bCBHasChanged = FALSE;
 725         bRet = TRUE;
 726     }
 727     else bRet = FALSE;
 728
 729     TRACE("   returning %i\n", bRet);
 730     return bRet;
 731 }
 732
 733
 734 /**************************************************************************
 735  *              CloseClipboard (USER.138)
 736  */
 737 BOOL16 WINAPI CloseClipboard16(void)
 738 {
 739     return CloseClipboard();
 740 }
 741
 742
 743 /**************************************************************************
 744  *              CloseClipboard (USER32.@)
 745  */
 746 BOOL WINAPI CloseClipboard(void)
 747 {
 748     TRACE("()\n");
 749
 750     if (hClipLock == GetCurrentTask())
 751     {
 752         hWndClipWindow = 0;
 753
 754         if (bCBHasChanged && hWndViewer)
 755             SendMessage16(hWndViewer, WM_DRAWCLIPBOARD, 0, 0L);
 756         hClipLock = 0;
 757     }
 758     return TRUE;
 759 }
 760
 761
 762 /**************************************************************************
 763  *              EmptyClipboard16 (USER.139)
 764  */
 765 BOOL16 WINAPI EmptyClipboard16(void)
 766 {
 767     return EmptyClipboard();
 768 }
 769
 770
 771 /**************************************************************************
 772  *              EmptyClipboard (USER32.@)
 773  *  Empties and acquires ownership of the clipboard
 774  */
 775 BOOL WINAPI EmptyClipboard(void)
 776 {
 777     TRACE("()\n");
 778
 779     if (hClipLock != GetCurrentTask())
 780     {
 781         WARN("Clipboard not opened by calling task!");
 782         return FALSE;
 783     }
 784
 785     /* destroy private objects */
 786
 787     if (hWndClipOwner)
 788         SendMessage16(hWndClipOwner, WM_DESTROYCLIPBOARD, 0, 0L);
 789
 790     /* empty the cache */
 791     CLIPBOARD_EmptyCache(TRUE);
 792
 793     /* Assign ownership of the clipboard to the current client */
 794     hWndClipOwner = hWndClipWindow;
 795
 796     /* Save the current task */
 797     hTaskClipOwner = GetCurrentTask();
 798
 799     /* Tell the driver to acquire the selection */
 800     USER_Driver.pAcquireClipboard();
 801
 802     return TRUE;
 803 }
 804
 805
 806 /**************************************************************************
 807  *              GetClipboardOwner (USER.140)
 808  *  FIXME: Can't return the owner if the clipbard is owned by an external app
 809  */
 810 HWND16 WINAPI GetClipboardOwner16(void)
 811 {
 812     TRACE("()\n");
 813     return hWndClipOwner;
 814 }
 815
 816
 817 /**************************************************************************
 818  *              GetClipboardOwner (USER32.@)
 819  *  FIXME: Can't return the owner if the clipbard is owned by an external app
 820  */
 821 HWND WINAPI GetClipboardOwner(void)
 822 {
 823     TRACE("()\n");
 824     return hWndClipOwner;
 825 }
 826
 827
 828 /**************************************************************************
 829  *              SetClipboardData (USER.141)
 830  */
 831 HANDLE16 WINAPI SetClipboardData16( UINT16 wFormat, HANDLE16 hData )
 832 {
 833     LPWINE_CLIPFORMAT lpFormat = __lookup_format( ClipFormats, wFormat );
 834
 835     TRACE("(%04X, %04x) !\n", wFormat, hData);
 836
 837     /* NOTE: If the hData is zero and current owner doesn't match
 838      * the window that opened the clipboard then this application
 839      * is screwed because WM_RENDERFORMAT will go to the owner.
 840      * (to become the owner it must call EmptyClipboard() before
 841      *  adding new data).
 842      */
 843
 844     if( CLIPBOARD_IsLocked() || !lpFormat ||
 845         (!hData && (!hWndClipOwner || (hWndClipOwner != hWndClipWindow))) )
 846     {
 847         WARN("Invalid hData or clipboard not opened by calling task!\n");
 848         return 0;
 849     }
 850
 851     /* Pass on the request to the driver */
 852     USER_Driver.pSetClipboardData(wFormat);
 853
 854     if ( lpFormat->wDataPresent || lpFormat->hData16 || lpFormat->hData32 )
 855     {
 856         CLIPBOARD_DeleteRecord(lpFormat, TRUE);
 857
 858         /* delete existing CF_UNICODETEXT/CF_TEXT/CF_OEMTEXT aliases */
 859         if(wFormat == CF_UNICODETEXT)
 860         {
 861             CLIPBOARD_DeleteRecord(&ClipFormats[CF_TEXT-1], TRUE);
 862             CLIPBOARD_DeleteRecord(&ClipFormats[CF_OEMTEXT-1], TRUE);
 863         }
 864         else if(wFormat == CF_TEXT)
 865         {
 866             CLIPBOARD_DeleteRecord(&ClipFormats[CF_UNICODETEXT-1], TRUE);
 867             CLIPBOARD_DeleteRecord(&ClipFormats[CF_OEMTEXT-1], TRUE);
 868         }
 869         else if(wFormat == CF_OEMTEXT)
 870         {
 871             CLIPBOARD_DeleteRecord(&ClipFormats[CF_UNICODETEXT-1], TRUE);
 872             CLIPBOARD_DeleteRecord(&ClipFormats[CF_TEXT-1], TRUE);
 873         }
 874     }
 875
 876     bCBHasChanged = TRUE;
 877     lpFormat->wDataPresent = 1;
 878     lpFormat->hData16 = hData;          /* 0 is legal, see WM_RENDERFORMAT */
 879     lpFormat->hData32 = 0;
 880
 881     return lpFormat->hData16;
 882 }
 883
 884
 885 /**************************************************************************
 886  *              SetClipboardData (USER32.@)
 887  */
 888 HANDLE WINAPI SetClipboardData( UINT wFormat, HANDLE hData )
 889 {
 890     LPWINE_CLIPFORMAT lpFormat = __lookup_format( ClipFormats, wFormat );
 891
 892     TRACE("(%08X, %08x) !\n", wFormat, hData);
 893
 894     /* NOTE: If the hData is zero and current owner doesn't match
 895      * the window that opened the clipboard then this application
 896      * is screwed because WM_RENDERFORMAT will go to the owner.
 897      * (to become the owner it must call EmptyClipboard() before
 898      *  adding new data).
 899      */
 900
 901     if( CLIPBOARD_IsLocked() || !lpFormat ||
 902         (!hData && (!hWndClipOwner || (hWndClipOwner != hWndClipWindow))) )
 903     {
 904         WARN("Invalid hData or clipboard not opened by calling task!\n");
 905         return 0;
 906     }
 907
 908     /* Tell the driver to acquire the selection */
 909     USER_Driver.pAcquireClipboard();
 910
 911     if ( lpFormat->wDataPresent &&
 912          (lpFormat->hData16 || lpFormat->hData32) )
 913     {
 914         CLIPBOARD_DeleteRecord(lpFormat, TRUE);
 915
 916         /* delete existing CF_UNICODETEXT/CF_TEXT/CF_OEMTEXT aliases */
 917         if(wFormat == CF_UNICODETEXT)
 918         {
 919             CLIPBOARD_DeleteRecord(&ClipFormats[CF_TEXT-1], TRUE);
 920             CLIPBOARD_DeleteRecord(&ClipFormats[CF_OEMTEXT-1], TRUE);
 921         }
 922         else if(wFormat == CF_TEXT)
 923         {
 924             CLIPBOARD_DeleteRecord(&ClipFormats[CF_UNICODETEXT-1], TRUE);
 925             CLIPBOARD_DeleteRecord(&ClipFormats[CF_OEMTEXT-1], TRUE);
 926         }
 927         else if(wFormat == CF_OEMTEXT)
 928         {
 929             CLIPBOARD_DeleteRecord(&ClipFormats[CF_UNICODETEXT-1], TRUE);
 930             CLIPBOARD_DeleteRecord(&ClipFormats[CF_TEXT-1], TRUE);
 931         }
 932     }
 933
 934     bCBHasChanged = TRUE;
 935     lpFormat->wDataPresent = 1;
 936     lpFormat->hDataSrc32 = hData;  /* Save the source handle */
 937
 938     /*
 939      * Make a shared duplicate if the memory is not shared
 940      * TODO: What should be done for non-memory objects
 941      */
 942     if ( CLIPBOARD_IsMemoryObject(wFormat) && hData && !(GlobalFlags(hData) & GMEM_DDESHARE) )
 943         lpFormat->hData32 = CLIPBOARD_GlobalDupMem( hData );
 944     else
 945         lpFormat->hData32 = hData;          /* 0 is legal, see WM_RENDERFORMAT */
 946
 947     lpFormat->hData16 = 0;
 948
 949     return lpFormat->hData32;   /* Should we return lpFormat->hDataSrc32 */
 950 }
 951
 952
 953 /**************************************************************************
 954  *              GetClipboardData (USER.142)
 955  */
 956 HANDLE16 WINAPI GetClipboardData16( UINT16 wFormat )
 957 {
 958     LPWINE_CLIPFORMAT lpRender = ClipFormats;
 959
 960     TRACE("(%04X)\n", wFormat);
 961
 962     if (CLIPBOARD_IsLocked())
 963     {
 964         WARN("Clipboard not opened by calling task!\n");
 965         return 0;
 966     }
 967
 968     if( wFormat == CF_UNICODETEXT || wFormat == CF_TEXT || wFormat == CF_OEMTEXT )
 969     {
 970         lpRender = CLIPBOARD_RenderText(wFormat);
 971         if ( !lpRender ) return 0;
 972     }
 973     else
 974     {
 975         lpRender = __lookup_format( ClipFormats, wFormat );
 976         if( !lpRender || !CLIPBOARD_RenderFormat(lpRender) ) return 0;
 977     }
 978
 979     /* Convert between 32 -> 16 bit data, if necessary */
 980     if( lpRender->hData32 && !lpRender->hData16
 981         && CLIPBOARD_IsMemoryObject(wFormat) )
 982     {
 983       int size;
 984       if( lpRender->wFormatID == CF_METAFILEPICT )
 985         size = sizeof( METAFILEPICT16 );
 986       else
 987           size = GlobalSize(lpRender->hData32);
 988
 989       lpRender->hData16 = GlobalAlloc16(GMEM_ZEROINIT, size);
 990       if( !lpRender->hData16 )
 991         ERR("(%04X) -- not enough memory in 16b heap\n", wFormat);
 992       else
 993       {
 994         if( lpRender->wFormatID == CF_METAFILEPICT )
 995         {
 996           FIXME("\timplement function CopyMetaFilePict32to16\n");
 997           FIXME("\tin the appropriate file.\n");
 998   #ifdef SOMEONE_IMPLEMENTED_ME
 999           CopyMetaFilePict32to16( GlobalLock16(lpRender->hData16),
1000                                   GlobalLock(lpRender->hData32) );
1001   #endif
1002         }
1003         else
1004         {
1005           memcpy( GlobalLock16(lpRender->hData16),
1006                   GlobalLock(lpRender->hData32),
1007                   size );
1008         }
1009         GlobalUnlock16(lpRender->hData16);
1010         GlobalUnlock(lpRender->hData32);
1011       }
1012     }
1013
1014     TRACE("\treturning %04x (type %i)\n",
1015                               lpRender->hData16, lpRender->wFormatID);
1016     return lpRender->hData16;
1017 }
1018
1019
1020 /**************************************************************************
1021  *              GetClipboardData (USER32.@)
1022  */
1023 HANDLE WINAPI GetClipboardData( UINT wFormat )
1024 {
1025     LPWINE_CLIPFORMAT lpRender = ClipFormats;
1026
1027     TRACE("(%08X)\n", wFormat);
1028
1029     if (CLIPBOARD_IsLocked())
1030     {
1031         WARN("Clipboard not opened by calling task!");
1032         return 0;
1033     }
1034
1035     if( wFormat == CF_UNICODETEXT || wFormat == CF_TEXT || wFormat == CF_OEMTEXT )
1036     {
1037         lpRender = CLIPBOARD_RenderText(wFormat);
1038         if ( !lpRender ) return 0;
1039     }
1040     else
1041     {
1042         lpRender = __lookup_format( ClipFormats, wFormat );
1043         if( !lpRender || !CLIPBOARD_RenderFormat(lpRender) ) return 0;
1044     }
1045
1046     /* Convert between 16 -> 32 bit data, if necessary */
1047     if( lpRender->hData16 && !lpRender->hData32
1048         && CLIPBOARD_IsMemoryObject(wFormat) )
1049     {
1050       int size;
1051       if( lpRender->wFormatID == CF_METAFILEPICT )
1052         size = sizeof( METAFILEPICT );
1053       else
1054         size = GlobalSize16(lpRender->hData16);
1055       lpRender->hData32 = GlobalAlloc(GMEM_ZEROINIT | GMEM_MOVEABLE | GMEM_DDESHARE,
1056                                       size);
1057       if( lpRender->wFormatID == CF_METAFILEPICT )
1058       {
1059         FIXME("\timplement function CopyMetaFilePict16to32\n");
1060         FIXME("\tin the appropriate file.\n");
1061 #ifdef SOMEONE_IMPLEMENTED_ME
1062         CopyMetaFilePict16to32( GlobalLock16(lpRender->hData32),
1063                                 GlobalLock(lpRender->hData16) );
1064 #endif
1065       }
1066       else
1067       {
1068         memcpy( GlobalLock(lpRender->hData32),
1069                 GlobalLock16(lpRender->hData16),
1070                 size );
1071       }
1072       GlobalUnlock(lpRender->hData32);
1073       GlobalUnlock16(lpRender->hData16);
1074     }
1075
1076     TRACE("\treturning %04x (type %i)\n",
1077                               lpRender->hData32, lpRender->wFormatID);
1078     return lpRender->hData32;
1079 }
1080
1081
1082 /**************************************************************************
1083  *              CountClipboardFormats (USER.143)
1084  */
1085 INT16 WINAPI CountClipboardFormats16(void)
1086 {
1087     return CountClipboardFormats();
1088 }
1089
1090
1091 /**************************************************************************
1092  *              CountClipboardFormats (USER32.@)
1093  */
1094 INT WINAPI CountClipboardFormats(void)
1095 {
1096     INT FormatCount = 0;
1097     LPWINE_CLIPFORMAT lpFormat = ClipFormats;
1098
1099     TRACE("()\n");
1100
1101     while(TRUE)
1102     {
1103         if (lpFormat == NULL) break;
1104
1105         if( lpFormat->wFormatID != CF_TEXT ) /* Don't count CF_TEXT */
1106         {
1107           /*
1108            * The format is available if either:
1109            * 1. The data is already in the cache.
1110            * 2. The selection is not owned by us(WINE) and the data is
1111            *    available to the clipboard driver.
1112            */
1113           if ( lpFormat->wDataPresent ||
1114                ( !USER_Driver.pIsSelectionOwner()
1115                  && USER_Driver.pIsClipboardFormatAvailable( lpFormat->wFormatID ) ) )
1116           {
1117               TRACE("\tdata found for format 0x%04x(%s)\n",
1118                     lpFormat->wFormatID, CLIPBOARD_GetFormatName(lpFormat->wFormatID));
1119               FormatCount++;
1120           }
1121         }
1122
1123         lpFormat = lpFormat->NextFormat;
1124     }
1125
1126     /* these are equivalent, adjust the total */
1127     FormatCount += (ClipFormats[CF_UNICODETEXT-1].wDataPresent ||
1128                     ClipFormats[CF_TEXT-1].wDataPresent ||
1129                     ClipFormats[CF_OEMTEXT-1].wDataPresent) ? 1 : 0;
1130
1131     TRACE("\ttotal %d\n", FormatCount);
1132     return FormatCount;
1133 }
1134
1135 /**************************************************************************
1136  *              EnumClipboardFormats (USER.144)
1137  */
1138 UINT16 WINAPI EnumClipboardFormats16( UINT16 wFormat )
1139 {
1140     return EnumClipboardFormats( wFormat );
1141 }
1142
1143
1144 /**************************************************************************
1145  *              EnumClipboardFormats (USER32.@)
1146  */
1147 UINT WINAPI EnumClipboardFormats( UINT wFormat )
1148 {
1149     TRACE("(%04X)\n", wFormat);
1150
1151     if (CLIPBOARD_IsLocked())
1152     {
1153         WARN("Clipboard not opened by calling task!");
1154         return 0;
1155     }
1156
1157     return CLIPBOARD_EnumClipboardFormats(wFormat);
1158 }
1159
1160
1161 /**************************************************************************
1162  *              RegisterClipboardFormat (USER.145)
1163  */
1164 UINT16 WINAPI RegisterClipboardFormat16( LPCSTR FormatName )
1165 {
1166     LPWINE_CLIPFORMAT lpNewFormat;
1167     LPWINE_CLIPFORMAT lpFormat = ClipFormats;
1168
1169     if (FormatName == NULL) return 0;
1170
1171     TRACE("('%s') !\n", FormatName);
1172
1173     /* walk format chain to see if it's already registered */
1174
1175     while(TRUE)
1176     {
1177         if ( !strcmp(lpFormat->Name,FormatName) )
1178         {
1179              lpFormat->wRefCount++;
1180              return lpFormat->wFormatID;
1181         }
1182
1183         if ( lpFormat->NextFormat == NULL ) break;
1184
1185         lpFormat = lpFormat->NextFormat;
1186     }
1187
1188     /* allocate storage for new format entry */
1189
1190     lpNewFormat = (LPWINE_CLIPFORMAT)HeapAlloc(GetProcessHeap(), 0, sizeof(WINE_CLIPFORMAT));
1191     if(lpNewFormat == NULL) {
1192         WARN("No more memory for a new format!");
1193         return 0;
1194     }
1195     lpFormat->NextFormat = lpNewFormat;
1196     lpNewFormat->wFormatID = LastRegFormat;
1197     lpNewFormat->wRefCount = 1;
1198
1199     lpNewFormat->Name = (LPSTR)HEAP_strdupA(GetProcessHeap(), 0, FormatName);
1200     if(lpNewFormat->Name == NULL) {
1201         WARN("No more memory for the new format name!");
1202         HeapFree(GetProcessHeap(), 0, lpNewFormat);
1203         return 0;
1204     }
1205
1206     lpNewFormat->wDataPresent = 0;
1207     lpNewFormat->hData16 = 0;
1208     lpNewFormat->hDataSrc32 = 0;
1209     lpNewFormat->hData32 = 0;
1210     lpNewFormat->drvData = 0;
1211     lpNewFormat->PrevFormat = lpFormat;
1212     lpNewFormat->NextFormat = NULL;
1213
1214     /* Pass on the registration request to the driver */
1215     USER_Driver.pRegisterClipboardFormat( FormatName );
1216
1217     return LastRegFormat++;
1218 }
1219
1220
1221 /**************************************************************************
1222  *              RegisterClipboardFormatA (USER32.@)
1223  */
1224 UINT WINAPI RegisterClipboardFormatA( LPCSTR formatName )
1225 {
1226     return RegisterClipboardFormat16( formatName );
1227 }
1228
1229
1230 /**************************************************************************
1231  *              RegisterClipboardFormatW (USER32.@)
1232  */
1233 UINT WINAPI RegisterClipboardFormatW( LPCWSTR formatName )
1234 {
1235     LPSTR aFormat = HEAP_strdupWtoA( GetProcessHeap(), 0, formatName );
1236     UINT ret = RegisterClipboardFormatA( aFormat );
1237     HeapFree( GetProcessHeap(), 0, aFormat );
1238     return ret;
1239 }
1240
1241
1242 /**************************************************************************
1243  *              GetClipboardFormatName (USER.146)
1244  */
1245 INT16 WINAPI GetClipboardFormatName16( UINT16 wFormat, LPSTR retStr, INT16 maxlen )
1246 {
1247     return GetClipboardFormatNameA( wFormat, retStr, maxlen );
1248 }
1249
1250
1251 /**************************************************************************
1252  *              GetClipboardFormatNameA (USER32.@)
1253  */
1254 INT WINAPI GetClipboardFormatNameA( UINT wFormat, LPSTR retStr, INT maxlen )
1255 {
1256     LPWINE_CLIPFORMAT lpFormat = __lookup_format( ClipFormats, wFormat );
1257
1258     TRACE("(%04X, %p, %d) !\n", wFormat, retStr, maxlen);
1259
1260     if (lpFormat == NULL || lpFormat->Name == NULL ||
1261         lpFormat->wFormatID < CF_REGFORMATBASE) return 0;
1262
1263     TRACE("Name='%s' !\n", lpFormat->Name);
1264
1265     lstrcpynA( retStr, lpFormat->Name, maxlen );
1266     return strlen(retStr);
1267 }
1268
1269
1270 /**************************************************************************
1271  *              GetClipboardFormatNameW (USER32.@)
1272  */
1273 INT WINAPI GetClipboardFormatNameW( UINT wFormat, LPWSTR retStr, INT maxlen )
1274 {
1275     INT ret;
1276     LPSTR p = HeapAlloc( GetProcessHeap(), 0, maxlen );
1277     if(p == NULL) return 0; /* FIXME: is this the correct failure value? */
1278
1279     ret = GetClipboardFormatNameA( wFormat, p, maxlen );
1280
1281     if (maxlen > 0 && !MultiByteToWideChar( CP_ACP, 0, p, -1, retStr, maxlen ))
1282         retStr[maxlen-1] = 0;
1283     HeapFree( GetProcessHeap(), 0, p );
1284     return ret;
1285 }
1286
1287
1288 /**************************************************************************
1289  *              SetClipboardViewer (USER.147)
1290  */
1291 HWND16 WINAPI SetClipboardViewer16( HWND16 hWnd )
1292 {
1293     TRACE("(%04x)\n", hWnd);
1294     return SetClipboardViewer( hWnd );
1295 }
1296
1297
1298 /**************************************************************************
1299  *              SetClipboardViewer (USER32.@)
1300  */
1301 HWND WINAPI SetClipboardViewer( HWND hWnd )
1302 {
1303     HWND hwndPrev = hWndViewer;
1304
1305     TRACE("(%04x): returning %04x\n", hWnd, hwndPrev);
1306
1307     hWndViewer = hWnd;
1308     return hwndPrev;
1309 }
1310
1311
1312 /**************************************************************************
1313  *              GetClipboardViewer (USER.148)
1314  */
1315 HWND16 WINAPI GetClipboardViewer16(void)
1316 {
1317     TRACE("()\n");
1318     return hWndViewer;
1319 }
1320
1321
1322 /**************************************************************************
1323  *              GetClipboardViewer (USER32.@)
1324  */
1325 HWND WINAPI GetClipboardViewer(void)
1326 {
1327     TRACE("()\n");
1328     return hWndViewer;
1329 }
1330
1331
1332 /**************************************************************************
1333  *              ChangeClipboardChain (USER.149)
1334  */
1335 BOOL16 WINAPI ChangeClipboardChain16(HWND16 hWnd, HWND16 hWndNext)
1336 {
1337     return ChangeClipboardChain(hWnd, hWndNext);
1338 }
1339
1340
1341 /**************************************************************************
1342  *              ChangeClipboardChain (USER32.@)
1343  */
1344 BOOL WINAPI ChangeClipboardChain(HWND hWnd, HWND hWndNext)
1345 {
1346     BOOL bRet = 0;
1347
1348     FIXME("(0x%04x, 0x%04x): stub?\n", hWnd, hWndNext);
1349
1350     if( hWndViewer )
1351         bRet = !SendMessage16( hWndViewer, WM_CHANGECBCHAIN,
1352                              (WPARAM16)hWnd, (LPARAM)hWndNext);
1353     else
1354         WARN("hWndViewer is lost\n");
1355
1356     if( hWnd == hWndViewer ) hWndViewer = hWndNext;
1357
1358     return bRet;
1359 }
1360
1361
1362 /**************************************************************************
1363  *              IsClipboardFormatAvailable16 (USER.193)
1364  */
1365 BOOL16 WINAPI IsClipboardFormatAvailable16( UINT16 wFormat )
1366 {
1367     return IsClipboardFormatAvailable( wFormat );
1368 }
1369
1370
1371 /**************************************************************************
1372  *              IsClipboardFormatAvailable (USER32.@)
1373  */
1374 BOOL WINAPI IsClipboardFormatAvailable( UINT wFormat )
1375 {
1376     BOOL bRet;
1377
1378     if (wFormat == 0)  /* Reject this case quickly */
1379         bRet = FALSE;
1380     else
1381     {
1382         UINT iret = CLIPBOARD_EnumClipboardFormats(wFormat - 1);
1383         if ((wFormat == CF_TEXT) || (wFormat == CF_OEMTEXT) || (wFormat == CF_UNICODETEXT))
1384             bRet = ((iret == CF_TEXT) || (iret == CF_OEMTEXT) || (iret == CF_UNICODETEXT));
1385         else
1386             bRet = iret == wFormat;
1387     }
1388     TRACE("(%04X)- ret(%d)\n", wFormat, bRet);
1389     return bRet;
1390 }
1391
1392
1393 /**************************************************************************
1394  *              GetOpenClipboardWindow (USER.248)
1395  *  FIXME: This wont work if an external app owns the selection
1396  */
1397 HWND16 WINAPI GetOpenClipboardWindow16(void)
1398 {
1399     TRACE("()\n");
1400     return hWndClipWindow;
1401 }
1402
1403
1404 /**************************************************************************
1405  *              GetOpenClipboardWindow (USER32.@)
1406  *  FIXME: This wont work if an external app owns the selection
1407  */
1408 HWND WINAPI GetOpenClipboardWindow(void)
1409 {
1410     TRACE("()\n");
1411     return hWndClipWindow;
1412 }
1413
1414
1415 /**************************************************************************
1416  *              GetPriorityClipboardFormat (USER.402)
1417  */
1418 INT16 WINAPI GetPriorityClipboardFormat16( UINT16 *lpPriorityList, INT16 nCount)
1419 {
1420     FIXME("(%p,%d): stub\n", lpPriorityList, nCount );
1421     return 0;
1422 }
1423
1424
1425 /**************************************************************************
1426  *              GetPriorityClipboardFormat (USER32.@)
1427  */
1428 INT WINAPI GetPriorityClipboardFormat( UINT *lpPriorityList, INT nCount )
1429 {
1430     int Counter;
1431     TRACE("()\n");
1432
1433     if(CountClipboardFormats() == 0)
1434     {
1435         return 0;
1436     }
1437
1438     for(Counter = 0; Counter <= nCount; Counter++)
1439     {
1440         if(IsClipboardFormatAvailable(*(lpPriorityList+sizeof(INT)*Counter)))
1441             return *(lpPriorityList+sizeof(INT)*Counter);
1442     }
1443
1444     return -1;
1445 }
1446
1447
1448 /**************************************************************************
1449  *              GetClipboardSequenceNumber (USER32.@)
1450  * Supported on Win2k/Win98
1451  * MSDN: Windows clipboard code keeps a serial number for the clipboard
1452  * for each window station.  The number is incremented whenever the
1453  * contents change or are emptied.
1454  * If you do not have WINSTA_ACCESSCLIPBOARD then the function returns 0
1455  */
1456 DWORD WINAPI GetClipboardSequenceNumber(VOID)
1457 {
1458         FIXME("Returning 0, see windows/clipboard.c\n");
1459         /* FIXME: Use serial numbers */
1460         return 0;
1461 }
1462