dlls/version/install.c

   1 /*
   2  * Implementation of VERSION.DLL - File Installer routines
   3  *
   4  * Copyright 1996,1997 Marcus Meissner
   5  * Copyright 1997 David Cuthbert
   6  *
   7  * This library is free software; you can redistribute it and/or
   8  * modify it under the terms of the GNU Lesser General Public
   9  * License as published by the Free Software Foundation; either
  10  * version 2.1 of the License, or (at your option) any later version.
  11  *
  12  * This library is distributed in the hope that it will be useful,
  13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  15  * Lesser General Public License for more details.
  16  *
  17  * You should have received a copy of the GNU Lesser General Public
  18  * License along with this library; if not, write to the Free Software
  19  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  20  *
  21  * TODO
  22  *   o Check the installation functions.
  23  */
  24
  25 #include <stdlib.h>
  26 #include <stdarg.h>
  27 #include <stdio.h>
  28 #include <string.h>
  29
  30 #include "windef.h"
  31 #include "winbase.h"
  32 #include "winver.h"
  33 #include "winnls.h"
  34 #include "wine/unicode.h"
  35 #include "winerror.h"
  36 #include "lzexpand.h"
  37 #include "wine/debug.h"
  38
  39 WINE_DEFAULT_DEBUG_CHANNEL(ver);
  40
  41
  42 /******************************************************************************
  43  *   testFileExistenceA
  44  *
  45  *   Tests whether a given path/file combination exists.  If the file does
  46  *   not exist, the return value is zero.  If it does exist, the return
  47  *   value is non-zero.
  48  *
  49  *   Revision history
  50  *      30-May-1997 Dave Cuthbert (dacut@ece.cmu.edu)
  51  *         Original implementation
  52  *
  53  */
  54 static int testFileExistenceA( char const * path, char const * file, BOOL excl )
  55 {
  56     char  filename[1024];
  57     int  filenamelen;
  58     OFSTRUCT  fileinfo;
  59
  60     fileinfo.cBytes = sizeof(OFSTRUCT);
  61
  62     strcpy(filename, path);
  63     filenamelen = strlen(filename);
  64
  65     /* Add a trailing \ if necessary */
  66     if(filenamelen) {
  67         if(filename[filenamelen - 1] != '\\')
  68             strcat(filename, "\\");
  69     }
  70     else /* specify the current directory */
  71         strcpy(filename, ".\\");
  72
  73     /* Create the full pathname */
  74     strcat(filename, file);
  75
  76     return (OpenFile(filename, &fileinfo,
  77                      OF_EXIST | (excl ? OF_SHARE_EXCLUSIVE : 0)) != HFILE_ERROR);
  78 }
  79
  80 /******************************************************************************
  81  *   testFileExistenceW
  82  */
  83 static int testFileExistenceW( const WCHAR *path, const WCHAR *file, BOOL excl )
  84 {
  85     char *filename;
  86     DWORD pathlen, filelen;
  87     int ret;
  88     OFSTRUCT fileinfo;
  89
  90     fileinfo.cBytes = sizeof(OFSTRUCT);
  91
  92     pathlen = WideCharToMultiByte( CP_ACP, 0, path, -1, NULL, 0, NULL, NULL );
  93     filelen = WideCharToMultiByte( CP_ACP, 0, file, -1, NULL, 0, NULL, NULL );
  94     filename = HeapAlloc( GetProcessHeap(), 0, pathlen+filelen+2 );
  95
  96     WideCharToMultiByte( CP_ACP, 0, path, -1, filename, pathlen, NULL, NULL );
  97     /* Add a trailing \ if necessary */
  98     if (pathlen > 1)
  99     {
 100         if (filename[pathlen-2] != '\\') strcpy( &filename[pathlen-1], "\\" );
 101     }
 102     else /* specify the current directory */
 103         strcpy(filename, ".\\");
 104
 105     WideCharToMultiByte( CP_ACP, 0, file, -1, filename+strlen(filename), filelen, NULL, NULL );
 106
 107     ret = (OpenFile(filename, &fileinfo,
 108                     OF_EXIST | (excl ? OF_SHARE_EXCLUSIVE : 0)) != HFILE_ERROR);
 109     HeapFree( GetProcessHeap(), 0, filename );
 110     return ret;
 111 }
 112
 113 /*****************************************************************************
 114  *   VerFindFileA [VERSION.@]
 115  *
 116  *   Determines where to install a file based on whether it locates another
 117  *   version of the file in the system.  The values VerFindFile returns are
 118  *   used in a subsequent call to the VerInstallFile function.
 119  *
 120  *   Revision history:
 121  *      30-May-1997   Dave Cuthbert (dacut@ece.cmu.edu)
 122  *         Reimplementation of VerFindFile from original stub.
 123  */
 124 DWORD WINAPI VerFindFileA(
 125     DWORD flags,
 126     LPCSTR lpszFilename,
 127     LPCSTR lpszWinDir,
 128     LPCSTR lpszAppDir,
 129     LPSTR lpszCurDir,
 130     PUINT lpuCurDirLen,
 131     LPSTR lpszDestDir,
 132     PUINT lpuDestDirLen )
 133 {
 134     DWORD  retval = 0;
 135     const char *curDir;
 136     const char *destDir;
 137     unsigned int  curDirSizeReq;
 138     unsigned int  destDirSizeReq;
 139     char  systemDir[MAX_PATH];
 140
 141     /* Print out debugging information */
 142     TRACE("flags = %x filename=%s windir=%s appdir=%s curdirlen=%p(%u) destdirlen=%p(%u)\n",
 143           flags, debugstr_a(lpszFilename), debugstr_a(lpszWinDir), debugstr_a(lpszAppDir),
 144           lpuCurDirLen, lpuCurDirLen ? *lpuCurDirLen : 0,
 145           lpuDestDirLen, lpuDestDirLen ? *lpuDestDirLen : 0 );
 146
 147     /* Figure out where the file should go; shared files default to the
 148        system directory */
 149
 150     GetSystemDirectoryA(systemDir, sizeof(systemDir));
 151     curDir = "";
 152     destDir = "";
 153
 154     if(flags & VFFF_ISSHAREDFILE)
 155     {
 156         destDir = systemDir;
 157         /* Were we given a filename?  If so, try to find the file. */
 158         if(lpszFilename)
 159         {
 160             if(testFileExistenceA(destDir, lpszFilename, FALSE)) curDir = destDir;
 161             else if(lpszAppDir && testFileExistenceA(lpszAppDir, lpszFilename, FALSE))
 162             {
 163                 curDir = lpszAppDir;
 164                 retval |= VFF_CURNEDEST;
 165             }
 166         }
 167     }
 168     else /* not a shared file */
 169     {
 170         if(lpszAppDir)
 171         {
 172             destDir = lpszAppDir;
 173             if(lpszFilename)
 174             {
 175                 if(testFileExistenceA(destDir, lpszFilename, FALSE)) curDir = destDir;
 176                 else if(testFileExistenceA(systemDir, lpszFilename, FALSE))
 177                 {
 178                     curDir = systemDir;
 179                     retval |= VFF_CURNEDEST;
 180                 }
 181             }
 182         }
 183     }
 184
 185     /* Check to see if the file exists and is inuse by another application */
 186     if (lpszFilename && testFileExistenceA(curDir, lpszFilename, FALSE)) {
 187         if (lpszFilename && !testFileExistenceA(curDir, lpszFilename, TRUE))
 188            retval |= VFF_FILEINUSE;
 189     }
 190
 191     curDirSizeReq = strlen(curDir) + 1;
 192     destDirSizeReq = strlen(destDir) + 1;
 193
 194     /* Make sure that the pointers to the size of the buffers are
 195        valid; if not, do NOTHING with that buffer.  If that pointer
 196        is valid, then make sure that the buffer pointer is valid, too! */
 197
 198     if(lpuDestDirLen && lpszDestDir)
 199     {
 200         if (*lpuDestDirLen < destDirSizeReq) retval |= VFF_BUFFTOOSMALL;
 201         lstrcpynA(lpszDestDir, destDir, *lpuDestDirLen);
 202         *lpuDestDirLen = destDirSizeReq;
 203     }
 204     if(lpuCurDirLen && lpszCurDir)
 205     {
 206         if(*lpuCurDirLen < curDirSizeReq) retval |= VFF_BUFFTOOSMALL;
 207         lstrcpynA(lpszCurDir, curDir, *lpuCurDirLen);
 208         *lpuCurDirLen = curDirSizeReq;
 209     }
 210
 211     TRACE("ret = %u (%s%s%s) curdir=%s destdir=%s\n", retval,
 212           (retval & VFF_CURNEDEST) ? "VFF_CURNEDEST " : "",
 213           (retval & VFF_FILEINUSE) ? "VFF_FILEINUSE " : "",
 214           (retval & VFF_BUFFTOOSMALL) ? "VFF_BUFFTOOSMALL " : "",
 215           debugstr_a(lpszCurDir), debugstr_a(lpszDestDir));
 216
 217     return retval;
 218 }
 219
 220 /*****************************************************************************
 221  * VerFindFileW                                         [VERSION.@]
 222  */
 223 DWORD WINAPI VerFindFileW( DWORD flags,LPCWSTR lpszFilename,LPCWSTR lpszWinDir,
 224                            LPCWSTR lpszAppDir, LPWSTR lpszCurDir,PUINT lpuCurDirLen,
 225                            LPWSTR lpszDestDir,PUINT lpuDestDirLen )
 226 {
 227     static const WCHAR emptyW;
 228     DWORD retval = 0;
 229     const WCHAR *curDir;
 230     const WCHAR *destDir;
 231     unsigned int curDirSizeReq;
 232     unsigned int destDirSizeReq;
 233     WCHAR systemDir[MAX_PATH];
 234
 235     /* Print out debugging information */
 236     TRACE("flags = %x filename=%s windir=%s appdir=%s curdirlen=%p(%u) destdirlen=%p(%u)\n",
 237           flags, debugstr_w(lpszFilename), debugstr_w(lpszWinDir), debugstr_w(lpszAppDir),
 238           lpuCurDirLen, lpuCurDirLen ? *lpuCurDirLen : 0,
 239           lpuDestDirLen, lpuDestDirLen ? *lpuDestDirLen : 0 );
 240
 241     /* Figure out where the file should go; shared files default to the
 242        system directory */
 243
 244     GetSystemDirectoryW(systemDir, sizeof(systemDir)/sizeof(WCHAR));
 245     curDir = &emptyW;
 246     destDir = &emptyW;
 247
 248     if(flags & VFFF_ISSHAREDFILE)
 249     {
 250         destDir = systemDir;
 251         /* Were we given a filename?  If so, try to find the file. */
 252         if(lpszFilename)
 253         {
 254             if(testFileExistenceW(destDir, lpszFilename, FALSE)) curDir = destDir;
 255             else if(lpszAppDir && testFileExistenceW(lpszAppDir, lpszFilename, FALSE))
 256             {
 257                 curDir = lpszAppDir;
 258                 retval |= VFF_CURNEDEST;
 259             }
 260         }
 261     }
 262     else /* not a shared file */
 263     {
 264         if(lpszAppDir)
 265         {
 266             destDir = lpszAppDir;
 267             if(lpszFilename)
 268             {
 269                 if(testFileExistenceW(destDir, lpszFilename, FALSE)) curDir = destDir;
 270                 else if(testFileExistenceW(systemDir, lpszFilename, FALSE))
 271                 {
 272                     curDir = systemDir;
 273                     retval |= VFF_CURNEDEST;
 274                 }
 275             }
 276         }
 277     }
 278
 279     if (lpszFilename && !testFileExistenceW(curDir, lpszFilename, TRUE))
 280         retval |= VFF_FILEINUSE;
 281
 282     curDirSizeReq = strlenW(curDir) + 1;
 283     destDirSizeReq = strlenW(destDir) + 1;
 284
 285     /* Make sure that the pointers to the size of the buffers are
 286        valid; if not, do NOTHING with that buffer.  If that pointer
 287        is valid, then make sure that the buffer pointer is valid, too! */
 288
 289     if(lpuDestDirLen && lpszDestDir)
 290     {
 291         if (*lpuDestDirLen < destDirSizeReq) retval |= VFF_BUFFTOOSMALL;
 292         lstrcpynW(lpszDestDir, destDir, *lpuDestDirLen);
 293         *lpuDestDirLen = destDirSizeReq;
 294     }
 295     if(lpuCurDirLen && lpszCurDir)
 296     {
 297         if(*lpuCurDirLen < curDirSizeReq) retval |= VFF_BUFFTOOSMALL;
 298         lstrcpynW(lpszCurDir, curDir, *lpuCurDirLen);
 299         *lpuCurDirLen = curDirSizeReq;
 300     }
 301
 302     TRACE("ret = %u (%s%s%s) curdir=%s destdir=%s\n", retval,
 303           (retval & VFF_CURNEDEST) ? "VFF_CURNEDEST " : "",
 304           (retval & VFF_FILEINUSE) ? "VFF_FILEINUSE " : "",
 305           (retval & VFF_BUFFTOOSMALL) ? "VFF_BUFFTOOSMALL " : "",
 306           debugstr_w(lpszCurDir), debugstr_w(lpszDestDir));
 307     return retval;
 308 }
 309
 310 static LPBYTE
 311 _fetch_versioninfo(LPSTR fn,VS_FIXEDFILEINFO **vffi) {
 312     DWORD       alloclen;
 313     LPBYTE      buf;
 314     DWORD       ret;
 315
 316     alloclen = 1000;
 317     buf=HeapAlloc(GetProcessHeap(), 0, alloclen);
 318     if(buf == NULL) {
 319         WARN("Memory exausted while fetching version info!\n");
 320         return NULL;
 321     }
 322     while (1) {
 323         ret = GetFileVersionInfoA(fn,0,alloclen,buf);
 324         if (!ret) {
 325             HeapFree(GetProcessHeap(), 0, buf);
 326             return NULL;
 327         }
 328         if (alloclen<*(WORD*)buf) {
 329             alloclen = *(WORD*)buf;
 330             HeapFree(GetProcessHeap(), 0, buf);
 331             buf = HeapAlloc(GetProcessHeap(), 0, alloclen);
 332             if(buf == NULL) {
 333                WARN("Memory exausted while fetching version info!\n");
 334                return NULL;
 335             }
 336         } else {
 337             *vffi = (VS_FIXEDFILEINFO*)(buf+0x14);
 338             if ((*vffi)->dwSignature == 0x004f0049) /* hack to detect unicode */
 339                 *vffi = (VS_FIXEDFILEINFO*)(buf+0x28);
 340             if ((*vffi)->dwSignature != VS_FFI_SIGNATURE)
 341                 WARN("Bad VS_FIXEDFILEINFO signature 0x%08x\n",(*vffi)->dwSignature);
 342             return buf;
 343         }
 344     }
 345 }
 346
 347 static DWORD
 348 _error2vif(DWORD error) {
 349     switch (error) {
 350     case ERROR_ACCESS_DENIED:
 351         return VIF_ACCESSVIOLATION;
 352     case ERROR_SHARING_VIOLATION:
 353         return VIF_SHARINGVIOLATION;
 354     default:
 355         return 0;
 356     }
 357 }
 358
 359
 360 /******************************************************************************
 361  * VerInstallFileA [VERSION.@]
 362  */
 363 DWORD WINAPI VerInstallFileA(
 364         DWORD flags,LPCSTR srcfilename,LPCSTR destfilename,LPCSTR srcdir,
 365         LPCSTR destdir,LPCSTR curdir,LPSTR tmpfile,PUINT tmpfilelen )
 366 {
 367     LPCSTR pdest;
 368     char        destfn[260],tmpfn[260],srcfn[260];
 369     HFILE       hfsrc,hfdst;
 370     DWORD       attr,xret,tmplast;
 371     LONG        ret;
 372     LPBYTE      buf1,buf2;
 373     OFSTRUCT    ofs;
 374
 375     TRACE("(%x,%s,%s,%s,%s,%s,%p,%d)\n",
 376             flags,srcfilename,destfilename,srcdir,destdir,curdir,tmpfile,*tmpfilelen
 377     );
 378     xret = 0;
 379     sprintf(srcfn,"%s\\%s",srcdir,srcfilename);
 380     if (!destdir || !*destdir) pdest = srcdir;
 381     else pdest = destdir;
 382     sprintf(destfn,"%s\\%s",pdest,destfilename);
 383     hfsrc=LZOpenFileA(srcfn,&ofs,OF_READ);
 384     if (hfsrc < 0)
 385         return VIF_CANNOTREADSRC;
 386     sprintf(tmpfn,"%s\\%s",pdest,destfilename);
 387     tmplast=strlen(pdest)+1;
 388     attr = GetFileAttributesA(tmpfn);
 389     if (attr != INVALID_FILE_ATTRIBUTES) {
 390         if (attr & FILE_ATTRIBUTE_READONLY) {
 391             LZClose(hfsrc);
 392             return VIF_WRITEPROT;
 393         }
 394         /* FIXME: check if file currently in use and return VIF_FILEINUSE */
 395     }
 396     attr = INVALID_FILE_ATTRIBUTES;
 397     if (flags & VIFF_FORCEINSTALL) {
 398         if (tmpfile[0]) {
 399             sprintf(tmpfn,"%s\\%s",pdest,tmpfile);
 400             tmplast = strlen(pdest)+1;
 401             attr = GetFileAttributesA(tmpfn);
 402             /* if it exists, it has been copied by the call before.
 403              * we jump over the copy part...
 404              */
 405         }
 406     }
 407     if (attr == INVALID_FILE_ATTRIBUTES) {
 408         char    *s;
 409
 410         GetTempFileNameA(pdest,"ver",0,tmpfn); /* should not fail ... */
 411         s=strrchr(tmpfn,'\\');
 412         if (s)
 413             tmplast = s-tmpfn;
 414         else
 415             tmplast = 0;
 416         hfdst = OpenFile(tmpfn,&ofs,OF_CREATE);
 417         if (hfdst == HFILE_ERROR) {
 418             LZClose(hfsrc);
 419             return VIF_CANNOTCREATE; /* | translated dos error */
 420         }
 421         ret = LZCopy(hfsrc,hfdst);
 422         _lclose(hfdst);
 423         if (ret < 0) {
 424             /* translate LZ errors into VIF_xxx */
 425             switch (ret) {
 426             case LZERROR_BADINHANDLE:
 427             case LZERROR_READ:
 428             case LZERROR_BADVALUE:
 429             case LZERROR_UNKNOWNALG:
 430                 xret = VIF_CANNOTREADSRC;
 431                 break;
 432             case LZERROR_BADOUTHANDLE:
 433             case LZERROR_WRITE:
 434                 xret = VIF_OUTOFSPACE;
 435                 break;
 436             case LZERROR_GLOBALLOC:
 437             case LZERROR_GLOBLOCK:
 438                 xret = VIF_OUTOFMEMORY;
 439                 break;
 440             default: /* unknown error, should not happen */
 441                 FIXME("Unknown LZCopy error %d, ignoring.\n", ret);
 442                 xret = 0;
 443                 break;
 444             }
 445             if (xret) {
 446                 LZClose(hfsrc);
 447                 return xret;
 448             }
 449         }
 450     }
 451     xret = 0;
 452     if (!(flags & VIFF_FORCEINSTALL)) {
 453         VS_FIXEDFILEINFO *destvffi,*tmpvffi;
 454         buf1 = _fetch_versioninfo(destfn,&destvffi);
 455         if (buf1) {
 456             buf2 = _fetch_versioninfo(tmpfn,&tmpvffi);
 457             if (buf2) {
 458                 char    *tbuf1,*tbuf2;
 459                 static const CHAR trans_array[] = "\\VarFileInfo\\Translation";
 460                 UINT    len1,len2;
 461
 462                 len1=len2=40;
 463
 464                 /* compare file versions */
 465                 if ((destvffi->dwFileVersionMS > tmpvffi->dwFileVersionMS)||
 466                     ((destvffi->dwFileVersionMS==tmpvffi->dwFileVersionMS)&&
 467                      (destvffi->dwFileVersionLS > tmpvffi->dwFileVersionLS)
 468                     )
 469                 )
 470                     xret |= VIF_MISMATCH|VIF_SRCOLD;
 471                 /* compare filetypes and filesubtypes */
 472                 if ((destvffi->dwFileType!=tmpvffi->dwFileType) ||
 473                     (destvffi->dwFileSubtype!=tmpvffi->dwFileSubtype)
 474                 )
 475                     xret |= VIF_MISMATCH|VIF_DIFFTYPE;
 476                 if (VerQueryValueA(buf1,trans_array,(LPVOID*)&tbuf1,&len1) &&
 477                     VerQueryValueA(buf2,trans_array,(LPVOID*)&tbuf2,&len2)
 478                 ) {
 479                     /* Do something with tbuf1 and tbuf2
 480                      * generates DIFFLANG|MISMATCH
 481                      */
 482                 }
 483                 HeapFree(GetProcessHeap(), 0, buf2);
 484             } else
 485                 xret=VIF_MISMATCH|VIF_SRCOLD;
 486             HeapFree(GetProcessHeap(), 0, buf1);
 487         }
 488     }
 489     if (xret) {
 490         if (*tmpfilelen<strlen(tmpfn+tmplast)) {
 491             xret|=VIF_BUFFTOOSMALL;
 492             DeleteFileA(tmpfn);
 493         } else {
 494             strcpy(tmpfile,tmpfn+tmplast);
 495             *tmpfilelen = strlen(tmpfn+tmplast)+1;
 496             xret|=VIF_TEMPFILE;
 497         }
 498     } else {
 499         if (INVALID_FILE_ATTRIBUTES!=GetFileAttributesA(destfn))
 500             if (!DeleteFileA(destfn)) {
 501                 xret|=_error2vif(GetLastError())|VIF_CANNOTDELETE;
 502                 DeleteFileA(tmpfn);
 503                 LZClose(hfsrc);
 504                 return xret;
 505             }
 506         if ((!(flags & VIFF_DONTDELETEOLD))     &&
 507             curdir                              &&
 508             *curdir                             &&
 509             lstrcmpiA(curdir,pdest)
 510         ) {
 511             char curfn[260];
 512
 513             sprintf(curfn,"%s\\%s",curdir,destfilename);
 514             if (INVALID_FILE_ATTRIBUTES != GetFileAttributesA(curfn)) {
 515                 /* FIXME: check if in use ... if it is, VIF_CANNOTDELETECUR */
 516                 if (!DeleteFileA(curfn))
 517                     xret|=_error2vif(GetLastError())|VIF_CANNOTDELETECUR;
 518             }
 519         }
 520         if (!MoveFileA(tmpfn,destfn)) {
 521             xret|=_error2vif(GetLastError())|VIF_CANNOTRENAME;
 522             DeleteFileA(tmpfn);
 523         }
 524     }
 525     LZClose(hfsrc);
 526     return xret;
 527 }
 528
 529
 530 /******************************************************************************
 531  * VerInstallFileW                              [VERSION.@]
 532  */
 533 DWORD WINAPI VerInstallFileW(
 534         DWORD flags,LPCWSTR srcfilename,LPCWSTR destfilename,LPCWSTR srcdir,
 535         LPCWSTR destdir,LPCWSTR curdir,LPWSTR tmpfile,PUINT tmpfilelen )
 536 {
 537     LPSTR wsrcf = NULL, wsrcd = NULL, wdestf = NULL, wdestd = NULL, wtmpf = NULL, wcurd = NULL;
 538     DWORD ret;
 539     UINT len;
 540
 541     if (srcfilename)
 542     {
 543         len = WideCharToMultiByte( CP_ACP, 0, srcfilename, -1, NULL, 0, NULL, NULL );
 544         if ((wsrcf = HeapAlloc( GetProcessHeap(), 0, len )))
 545             WideCharToMultiByte( CP_ACP, 0, srcfilename, -1, wsrcf, len, NULL, NULL );
 546     }
 547     if (srcdir)
 548     {
 549         len = WideCharToMultiByte( CP_ACP, 0, srcdir, -1, NULL, 0, NULL, NULL );
 550         if ((wsrcd = HeapAlloc( GetProcessHeap(), 0, len )))
 551             WideCharToMultiByte( CP_ACP, 0, srcdir, -1, wsrcd, len, NULL, NULL );
 552     }
 553     if (destfilename)
 554     {
 555         len = WideCharToMultiByte( CP_ACP, 0, destfilename, -1, NULL, 0, NULL, NULL );
 556         if ((wdestf = HeapAlloc( GetProcessHeap(), 0, len )))
 557             WideCharToMultiByte( CP_ACP, 0, destfilename, -1, wdestf, len, NULL, NULL );
 558     }
 559     if (destdir)
 560     {
 561         len = WideCharToMultiByte( CP_ACP, 0, destdir, -1, NULL, 0, NULL, NULL );
 562         if ((wdestd = HeapAlloc( GetProcessHeap(), 0, len )))
 563             WideCharToMultiByte( CP_ACP, 0, destdir, -1, wdestd, len, NULL, NULL );
 564     }
 565     if (curdir)
 566     {
 567         len = WideCharToMultiByte( CP_ACP, 0, curdir, -1, NULL, 0, NULL, NULL );
 568         if ((wcurd = HeapAlloc( GetProcessHeap(), 0, len )))
 569             WideCharToMultiByte( CP_ACP, 0, curdir, -1, wcurd, len, NULL, NULL );
 570     }
 571     len = *tmpfilelen * sizeof(WCHAR);
 572     wtmpf = HeapAlloc( GetProcessHeap(), 0, len );
 573     ret = VerInstallFileA(flags,wsrcf,wdestf,wsrcd,wdestd,wcurd,wtmpf,&len);
 574     if (!ret)
 575         *tmpfilelen = MultiByteToWideChar( CP_ACP, 0, wtmpf, -1, tmpfile, *tmpfilelen );
 576     else if (ret & VIF_BUFFTOOSMALL)
 577         *tmpfilelen = len;  /* FIXME: not correct */
 578
 579     HeapFree( GetProcessHeap(), 0, wsrcf );
 580     HeapFree( GetProcessHeap(), 0, wsrcd );
 581     HeapFree( GetProcessHeap(), 0, wdestf );
 582     HeapFree( GetProcessHeap(), 0, wdestd );
 583     HeapFree( GetProcessHeap(), 0, wtmpf );
 584     HeapFree( GetProcessHeap(), 0, wcurd );
 585     return ret;
 586 }