?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
Update ooo320-m1
[ooovba.git] / desktop / win32 / source / setup / setup.cpp
blobaf50d912ef5a0d7f415e62b3f7a8fba325912b19
1 /*************************************************************************
2 *
3 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
4 *
5 * Copyright 2008 by Sun Microsystems, Inc.
6 *
7 * OpenOffice.org - a multi-platform office productivity suite
8 *
9 * $RCSfile: setup.cpp,v $
10 * $Revision: 1.16 $
11 *
12 * This file is part of OpenOffice.org.
13 *
14 * OpenOffice.org is free software: you can redistribute it and/or modify
15 * it under the terms of the GNU Lesser General Public License version 3
16 * only, as published by the Free Software Foundation.
17 *
18 * OpenOffice.org is distributed in the hope that it will be useful,
19 * but WITHOUT ANY WARRANTY; without even the implied warranty of
20 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
21 * GNU Lesser General Public License version 3 for more details
22 * (a copy is included in the LICENSE file that accompanied this code).
23 *
24 * You should have received a copy of the GNU Lesser General Public License
25 * version 3 along with OpenOffice.org. If not, see
26 * <http://www.openoffice.org/license.html>
27 * for a copy of the LGPLv3 License.
28 *
29 ************************************************************************/
30
31 #define WIN // scope W32 API
32
33 #if defined _MSC_VER
34 #pragma warning(push, 1)
35 #endif
36 #include <windows.h>
37 #if defined _MSC_VER
38 #pragma warning(pop)
39 #endif
40 #include <tchar.h>
41 #include <assert.h>
42 #include <shlwapi.h>
43 #include <new>
44 #include <time.h>
45 #include <mbctype.h>
46 #include <locale.h>
47 #include <Msiquery.h>
48 #include <MsiDefs.h>
49 #include "strsafe.h"
50
51 #include "setup.hxx"
52
53 #include "resource.h"
54
55 //--------------------------------------------------------------------------
56
57 #define MAX_STR_LENGTH 32000
58 #define MAX_TEXT_LENGTH 1024
59 #define MAX_LANGUAGE_LEN 80
60 #define MAX_STR_CAPTION 256
61 #define VERSION_SIZE 80
62 #define SECTION_SETUP TEXT( "Setup" )
63 #define SECTION_LANGUAGE TEXT( "Languages" )
64 #define PRODUCT_NAME_VAR TEXT( "%PRODUCTNAME" )
65 #define PRODUCT_VERSION TEXT( "ProductVersion" )
66 #define ERROR_SHOW_USAGE -2
67 #define ERROR_SETUP_TO_OLD -3
68 #define ERROR_SETUP_NOT_FOUND -4
69
70 #define PARAM_SETUP_USED TEXT( " SETUP_USED=1 " )
71 #define PARAM_PACKAGE TEXT( "/I " )
72 #define PARAM_MINOR_UPGRADE TEXT( "/FVOMUS " )
73 #define PARAM_ADMIN TEXT( "/A " )
74 #define PARAM_TRANSFORM TEXT( " TRANSFORMS=" )
75 #define PARAM_REBOOT TEXT( " REBOOT=Force" )
76 #define PARAM_PATCH TEXT( " /update " )
77 #define PARAM_REG_ALL_MSO_TYPES TEXT( "REGISTER_ALL_MSO_TYPES=1 " )
78 #define PARAM_REG_NO_MSO_TYPES TEXT( "REGISTER_NO_MSO_TYPES=1 " )
79
80 #define PARAM_RUNNING TEXT( "ignore_running" )
81 #define CMDLN_REG_ALL_MSO_TYPES TEXT( "msoreg=1" )
82 #define CMDLN_REG_NO_MSO_TYPES TEXT( "msoreg=0" )
83
84 #define MSI_DLL TEXT( "msi.dll" )
85 #define ADVAPI32_DLL TEXT( "advapi32.dll" )
86 #define PROFILE_NAME TEXT( "setup.ini" )
87
88 #define MSIAPI_DllGetVersion "DllGetVersion"
89 #define ADVAPI32API_CheckTokenMembership "CheckTokenMembership"
90
91 typedef HRESULT (CALLBACK* PFnDllGetVersion)( DLLVERSIONINFO *pdvi);
92 typedef BOOL (WINAPI* PFnCheckTokenMembership)(HANDLE TokenHandle, PSID SidToCheck, PBOOL IsMember);
93
94 #ifdef DEBUG
95 inline void OutputDebugStringFormat( LPCTSTR pFormat, ... )
96 {
97 TCHAR buffer[1024];
98 va_list args;
99
100 va_start( args, pFormat );
101 StringCchVPrintf( buffer, sizeof(buffer), pFormat, args );
102 OutputDebugString( buffer );
103 }
104 #else
105 static inline void OutputDebugStringFormat( LPCTSTR, ... )
106 {
107 }
108 #endif
109
110 //--------------------------------------------------------------------------
111
112 const TCHAR sInstKey[] = TEXT( "Software\\Microsoft\\Windows\\CurrentVersion\\Installer" );
113 const TCHAR sInstLocValue[] = TEXT( "InstallerLocation" );
114 const TCHAR sMsiDll[] = TEXT( "\\msi.dll" );
115 const TCHAR sMsiExe[] = TEXT( "\\msiexec.exe" );
116 const TCHAR sDelayReboot[] = TEXT( " /c:\"msiinst /delayreboot\"" );
117 const TCHAR sMsiQuiet[] = TEXT( " /q" );
118 const TCHAR sMemMapName[] = TEXT( "Global\\MsiErrorObject" );
119
120 //--------------------------------------------------------------------------
121 SetupAppX::SetupAppX()
122 {
123 m_hInst = NULL;
124 m_hMapFile = NULL;
125 m_pAppTitle = NULL;
126 m_pCmdLine = NULL;
127
128 m_pDatabase = NULL;
129 m_pReqVersion = NULL;
130 m_pProductName = NULL;
131 m_pAdvertise = NULL;
132 m_pTmpName = NULL;
133 m_pLogFile = NULL;
134 m_pModuleFile = NULL;
135 m_pPatchFiles = NULL;
136 m_pMSIErrorCode = NULL;
137 m_pUpgradeKey = NULL;
138 m_pProductVersion = NULL;
139
140 m_pErrorText = new TCHAR[ MAX_TEXT_LENGTH ];
141 m_pErrorText[0] = '\0';
142
143 m_nLanguageID = 0;
144 m_nLanguageCount = 0;
145 m_ppLanguageList = NULL;
146
147 m_bQuiet = false;
148 m_bRegNoMsoTypes = false;
149 m_bRegAllMsoTypes = false;
150 m_bIsMinorUpgrade = false;
151 m_bSupportsPatch = false;
152
153 m_bIgnoreAlreadyRunning = false;
154 }
155
156 //--------------------------------------------------------------------------
157 SetupAppX::~SetupAppX()
158 {
159 if ( m_ppLanguageList )
160 {
161 for ( int i = 0; i < m_nLanguageCount; i++ )
162 if ( m_ppLanguageList[i] )
163 delete m_ppLanguageList[ i ];
164 delete [] m_ppLanguageList;
165 }
166
167 time_t aTime;
168 time( &aTime );
169 tm *pTime = localtime( &aTime ); // Convert time to struct tm form
170
171 Log( TEXT( "End: %s\n\r\n\r\n" ), _tasctime( pTime ) );
172
173 if ( m_pLogFile ) fclose( m_pLogFile );
174
175 if ( m_pTmpName )
176 {
177 _tremove( m_pTmpName );
178 free( m_pTmpName );
179 }
180
181 if ( m_pMSIErrorCode ) UnmapViewOfFile( m_pMSIErrorCode );
182 if ( m_hMapFile ) CloseHandle( m_hMapFile );
183
184 if ( m_pAppTitle ) delete [] m_pAppTitle;
185 if ( m_pDatabase ) delete [] m_pDatabase;
186 if ( m_pReqVersion ) delete [] m_pReqVersion;
187 if ( m_pProductName ) delete [] m_pProductName;
188 if ( m_pAdvertise ) delete [] m_pAdvertise;
189 if ( m_pLogFile ) delete [] m_pLogFile;
190 if ( m_pErrorText ) delete [] m_pErrorText;
191 if ( m_pModuleFile ) delete [] m_pModuleFile;
192 if ( m_pPatchFiles ) delete [] m_pPatchFiles;
193 if ( m_pUpgradeKey ) delete [] m_pUpgradeKey;
194 if ( m_pProductVersion ) delete [] m_pProductVersion;
195 }
196
197 //--------------------------------------------------------------------------
198 boolean SetupAppX::Initialize( HINSTANCE hInst )
199 {
200 m_pCmdLine = WIN::GetCommandLine();
201 m_hInst = hInst;
202
203 // Load our AppTitle (caption)
204 m_pAppTitle = new TCHAR[ MAX_STR_CAPTION ];
205 m_pAppTitle[0] = '\0';
206 WIN::LoadString( hInst, IDS_APP_TITLE, m_pAppTitle, MAX_STR_CAPTION );
207
208 // Obtain path we are running from
209 m_pModuleFile = new TCHAR[ MAX_PATH ];
210 m_pModuleFile[ 0 ] = '\0';
211
212 if ( 0 == WIN::GetModuleFileName( hInst, m_pModuleFile, MAX_PATH ) )
213 {
214 SetError( WIN::GetLastError() );
215 return false;
216 }
217
218 if ( ! GetCmdLineParameters( &m_pCmdLine ) )
219 return false;
220
221 m_hMapFile = CreateFileMapping(
222 INVALID_HANDLE_VALUE, // use paging file
223 NULL, // default security
224 PAGE_READWRITE, // read/write access
225 0, // max. object size
226 sizeof( int ), // buffer size
227 sMemMapName );
228 if ( m_hMapFile )
229 {
230 m_pMSIErrorCode = (int*) MapViewOfFile( m_hMapFile, // handle to map object
231 FILE_MAP_ALL_ACCESS, // read/write permission
232 0,
233 0,
234 sizeof( int ) );
235 if ( m_pMSIErrorCode )
236 *m_pMSIErrorCode = 0;
237 else
238 OutputDebugStringFormat( TEXT("Could not map view of file (%d).\n"), GetLastError() );
239 }
240 else
241 OutputDebugStringFormat( TEXT("Could not create file mapping object (%d).\n"), GetLastError() );
242
243 Log( TEXT("Starting: %s\r\n"), m_pModuleFile );
244 Log( TEXT(" CommandLine=<%s>\r\n"), m_pCmdLine );
245
246 if ( m_bQuiet )
247 Log( TEXT(" Using quiet install mode\r\n") );
248
249 time_t aTime;
250 time( &aTime );
251 tm* pTime = localtime( &aTime );
252 Log( TEXT(" Begin: %s\n"), _tasctime( pTime ) );
253
254 return true;
255 }
256
257 //--------------------------------------------------------------------------
258 boolean SetupAppX::GetProfileSection( LPCTSTR pFileName, LPCTSTR pSection,
259 DWORD& rSize, LPTSTR *pRetBuf )
260 {
261 if ( !rSize || !*pRetBuf )
262 {
263 rSize = 512;
264 *pRetBuf = new TCHAR[ rSize ];
265 }
266
267 DWORD nRet = GetPrivateProfileSection( pSection, *pRetBuf, rSize, pFileName );
268
269 if ( nRet && ( nRet + 2 > rSize ) ) // buffer was too small, retry with bigger one
270 {
271 if ( nRet < 32767 - 2 )
272 {
273 delete [] (*pRetBuf);
274 rSize = nRet + 2;
275 *pRetBuf = new TCHAR[ rSize ];
276
277 nRet = GetPrivateProfileSection( pSection, *pRetBuf, rSize, pFileName );
278 }
279 }
280
281 if ( !nRet )
282 {
283 SetError( WIN::GetLastError() );
284
285 TCHAR sBuf[80];
286 StringCchPrintf( sBuf, 80, TEXT("ERROR: GetPrivateProfileSection(): GetLastError returned %u\r\n"), GetError() );
287 Log( sBuf );
288 return false;
289 }
290 else if ( nRet + 2 > rSize )
291 {
292 SetError( ERROR_OUTOFMEMORY );
293 Log( TEXT( "ERROR: GetPrivateProfileSection() out of memory\r\n" ) );
294 return false;
295 }
296
297 Log( TEXT( " GetProfileSection read %s\r\n" ), pSection );
298
299 return true;
300 }
301
302 //--------------------------------------------------------------------------
303 boolean SetupAppX::ReadProfile()
304 {
305 boolean bRet = false;
306 TCHAR *sProfilePath = 0;
307
308 if ( GetPathToFile( PROFILE_NAME, &sProfilePath ) )
309 {
310 DWORD nSize = 0;
311 LPTSTR pRetBuf = NULL;
312
313 Log( TEXT( " Open ini file: <%s>\r\n" ), sProfilePath );
314
315 bRet = GetProfileSection( sProfilePath, SECTION_SETUP, nSize, &pRetBuf );
316
317 if ( !bRet )
318 {
319 LPTSTR pTmpFile = CopyIniFile( sProfilePath );
320 delete [] sProfilePath;
321 sProfilePath = pTmpFile;
322
323 if ( sProfilePath )
324 {
325 SetError( ERROR_SUCCESS );
326
327 Log( TEXT( " Could not open inifile, copied ini file to: <%s>\r\n" ), sProfilePath );
328 bRet = GetProfileSection( sProfilePath, SECTION_SETUP, nSize, &pRetBuf );
329 }
330 }
331
332 if ( bRet )
333 {
334 LPTSTR pCurLine = pRetBuf;
335 while ( *pCurLine )
336 {
337 LPTSTR pName = 0;
338 LPTSTR pValue = 0;
339
340 pCurLine += GetNameValue( pCurLine, &pName, &pValue );
341
342 if ( lstrcmpi( TEXT( "database" ), pName ) == 0 )
343 {
344 m_pDatabase = pValue;
345 Log( TEXT( " Database = %s\r\n" ), pValue );
346 }
347 else if ( lstrcmpi( TEXT( "msiversion" ), pName ) == 0 )
348 {
349 m_pReqVersion = pValue;
350 Log( TEXT( " msiversion = %s\r\n" ), pValue );
351 }
352 else if ( lstrcmpi( TEXT( "productname" ), pName ) == 0 )
353 {
354 m_pProductName = pValue;
355 Log( TEXT( " productname = %s\r\n" ), pValue );
356 m_pAppTitle = SetProdToAppTitle( m_pProductName );
357 }
358 else if ( lstrcmpi( TEXT( "upgradekey" ), pName ) == 0 )
359 {
360 m_pUpgradeKey = pValue;
361 Log( TEXT( " upgradekey = %s\r\n" ), pValue );
362 }
363 else if ( lstrcmpi( TEXT( "productversion" ), pName ) == 0 )
364 {
365 m_pProductVersion = pValue;
366 Log( TEXT( " productversion = %s\r\n" ), pValue );
367 }
368 else if ( lstrcmpi( TEXT( "productcode" ), pName ) == 0 )
369 {
370 delete [] pValue;
371 }
372 else
373 {
374 Log( TEXT( "Warning: unknown entry in profile <%s>\r\n" ), pName );
375 delete [] pValue;
376 }
377 }
378 }
379
380 if ( bRet && ( !m_pDatabase || !m_pReqVersion || !m_pProductName ) )
381 {
382 Log( TEXT( "ERROR: incomplete 'Setup' section in profile\r\n" ) );
383 SetError( ERROR_INVALID_DATA );
384 bRet = false;
385 }
386
387 if ( bRet )
388 bRet = GetProfileSection( sProfilePath, SECTION_LANGUAGE, nSize, &pRetBuf );
389
390 if ( bRet )
391 {
392 LPTSTR pName = 0;
393 LPTSTR pValue = 0;
394 LPTSTR pCurLine = pRetBuf;
395 LPTSTR pLastChar;
396 int nNext = 0;
397
398 // first line in this section should be the language count
399 nNext = GetNameValue( pCurLine, &pName, &pValue );
400 if ( lstrcmpi( TEXT( "count" ), pName ) == 0 )
401 {
402 Log( TEXT( " Languages = %s\r\n" ), pValue );
403 m_nLanguageCount = _tcstol( pValue, &pLastChar, 10 );
404 pCurLine += nNext;
405 delete [] pValue;
406 }
407
408 m_ppLanguageList = new LanguageDataX*[ m_nLanguageCount ];
409
410 for ( int i=0; i < m_nLanguageCount; i++ )
411 {
412 if ( !*pCurLine )
413 {
414 m_nLanguageCount = i;
415 break;
416 }
417
418 pCurLine += GetNameValue( pCurLine, &pName, &pValue );
419 m_ppLanguageList[ i ] = new LanguageDataX( pValue );
420 Log( TEXT( " Language = %s\r\n" ), pValue );
421
422 if ( m_ppLanguageList[ i ]->m_pTransform )
423 Log( TEXT( " Transform = %s\r\n" ), m_ppLanguageList[ i ]->m_pTransform );
424
425 delete [] pValue;
426 }
427 }
428
429 if ( pRetBuf )
430 delete [] pRetBuf;
431 }
432
433 if ( sProfilePath && ! m_pTmpName )
434 delete [] sProfilePath;
435
436 return bRet;
437 }
438
439 //--------------------------------------------------------------------------
440 void SetupAppX::AddFileToPatchList( TCHAR* pPath, TCHAR* pFile )
441 {
442 if ( m_pPatchFiles == NULL )
443 {
444 m_pPatchFiles = new TCHAR[ MAX_STR_LENGTH ];
445 StringCchCopy( m_pPatchFiles, MAX_STR_LENGTH, TEXT("\"") );
446 }
447 else
448 StringCchCat( m_pPatchFiles, MAX_STR_LENGTH, TEXT(";") );
449
450 StringCchCat( m_pPatchFiles, MAX_STR_LENGTH, pPath );
451 StringCchCat( m_pPatchFiles, MAX_STR_LENGTH, pFile );
452 }
453
454 //--------------------------------------------------------------------------
455 boolean SetupAppX::GetPatches()
456 {
457 boolean bRet = true;
458
459 int nPatternLen = lstrlen( m_pModuleFile ) + 7; // 1 for null terminator, 1 for back slash, 5 for extensions
460 TCHAR* pPattern = new TCHAR[ nPatternLen ];
461 TCHAR* pBaseDir = new TCHAR[ nPatternLen ];
462
463 // find 'setup.exe' in the path so we can remove it
464 TCHAR *pFilePart = 0;
465 if ( 0 == GetFullPathName( m_pModuleFile, nPatternLen, pPattern, &pFilePart ) )
466 {
467 SetError( WIN::GetLastError() );
468 bRet = false;
469 }
470 else
471 {
472 if ( pFilePart )
473 *pFilePart = '\0';
474 StringCchCopy( pBaseDir, nPatternLen, pPattern );
475 StringCchCat( pPattern, nPatternLen, TEXT("*.msp") );
476
477 WIN32_FIND_DATA aFindFileData;
478
479 HANDLE hFindPatches = FindFirstFile( pPattern, &aFindFileData );
480
481 if ( hFindPatches != INVALID_HANDLE_VALUE )
482 {
483 if ( ! IsPatchInstalled( pBaseDir, aFindFileData.cFileName ) )
484 AddFileToPatchList( pBaseDir, aFindFileData.cFileName );
485
486 while ( FindNextFile( hFindPatches, &aFindFileData ) )
487 {
488 if ( ! IsPatchInstalled( pBaseDir, aFindFileData.cFileName ) )
489 AddFileToPatchList( pBaseDir, aFindFileData.cFileName );
490 }
491
492 if ( m_pPatchFiles != NULL )
493 StringCchCat( m_pPatchFiles, MAX_STR_LENGTH, TEXT("\"") );
494
495 FindClose( hFindPatches );
496 }
497 }
498
499 delete [] pPattern;
500 delete [] pBaseDir;
501
502 return bRet;
503 }
504
505 //--------------------------------------------------------------------------
506 boolean SetupAppX::GetPathToFile( TCHAR* pFileName, TCHAR** pPath )
507 {
508 // generate the path to the file = szModuleFile + FileName
509 // note: FileName is a relative path
510
511 boolean bRet = true;
512
513 int nTempPath = lstrlen( m_pModuleFile ) + lstrlen( pFileName ) + 2; // 1 for null terminator, 1 for back slash
514 TCHAR* pTempPath = new TCHAR[ nTempPath ];
515
516 // find 'setup.exe' in the path so we can remove it
517 TCHAR *pFilePart = 0;
518 if ( 0 == GetFullPathName( m_pModuleFile, nTempPath, pTempPath, &pFilePart ) )
519 {
520 SetError( WIN::GetLastError() );
521 bRet = false;
522 }
523 else
524 {
525 if ( pFilePart )
526 *pFilePart = '\0';
527
528 StringCchCat( pTempPath, nTempPath, pFileName );
529
530 int nPath = 2 * nTempPath;
531 *pPath = new TCHAR[ nPath ];
532
533 // normalize the path
534 int nReturn = GetFullPathName( pTempPath, nPath, *pPath, &pFilePart );
535
536 if ( nReturn > nPath )
537 {
538 // try again, with larger buffer
539 delete [] (*pPath);
540 nPath = nReturn;
541 *pPath = new TCHAR[ nPath ];
542
543 nReturn = GetFullPathName( pTempPath, nPath, *pPath, &pFilePart );
544 }
545
546 if ( 0 == nReturn )
547 {
548 // error -- invalid path
549 SetError( WIN::GetLastError() );
550 bRet = false;
551 }
552 }
553
554 if ( bRet ) // check for the file's existence
555 {
556 DWORD dwFileAttrib = GetFileAttributes( *pPath );
557
558 if (0xFFFFFFFF == dwFileAttrib)
559 {
560 StringCchCopy( m_pErrorText, MAX_TEXT_LENGTH, pFileName );
561 SetError( ERROR_FILE_NOT_FOUND );
562 bRet = false;
563 }
564 }
565
566 delete [] pTempPath;
567 return bRet;
568 }
569
570 //--------------------------------------------------------------------------
571 int SetupAppX::GetNameValue( TCHAR* pLine, TCHAR** pName, TCHAR** pValue )
572 {
573 int nRet = lstrlen( pLine ) + 1;
574 *pValue = 0;
575
576 if ( nRet == 1 )
577 return nRet;
578
579 LPTSTR pChar = pLine;
580 LPTSTR pLast = NULL;
581
582 // Skip leading spaces.
583 while (' ' == *pChar || '\t' == *pChar)
584 pChar = CharNext( pChar );
585
586 *pName = pChar;
587
588 // look for the end of the name
589 while( *pChar && (' ' != *pChar) &&
590 ( '\t' != *pChar ) && ( '=' != *pChar ) )
591 pChar = CharNext( pChar );
592
593 if ( ! *pChar )
594 return nRet;
595
596 pLast = pChar;
597 pChar = CharNext( pChar );
598 *pLast = '\0';
599
600 // look for the start of the value
601 while( ( ' ' == *pChar ) || ( '\t' == *pChar ) ||
602 ( '=' == *pChar ) )
603 pChar = CharNext( pChar );
604
605 int nValueLen = lstrlen( pChar ) + 1;
606 *pValue = new TCHAR[ nValueLen ];
607
608 if ( *pValue )
609 StringCchCopy( *pValue, nValueLen, pChar );
610
611 return nRet;
612 }
613
614 //--------------------------------------------------------------------------
615 boolean SetupAppX::ChooseLanguage( long& rLanguage )
616 {
617 rLanguage = 0;
618
619 if ( m_bQuiet )
620 return true;
621
622 // When there are none or only one language, there is nothing
623 // to do here
624 if ( m_nLanguageCount > 1 )
625 {
626 TCHAR *sString = new TCHAR[ MAX_LANGUAGE_LEN ];
627
628 LANGID nUserDefLang = GetUserDefaultLangID();
629 LANGID nSysDefLang = GetSystemDefaultLangID();
630
631 int nUserPrimary = PRIMARYLANGID( nUserDefLang );
632 int nSysPrimary = PRIMARYLANGID( nSysDefLang );
633
634 long nUserIndex = -1;
635 long nUserPrimIndex = -1;
636 long nSystemIndex = -1;
637 long nSystemPrimIndex = -1;
638 long nParamIndex = -1;
639
640 for ( long i=0; i<GetLanguageCount(); i++ )
641 {
642 long nLanguage = GetLanguageID( i );
643 int nPrimary = PRIMARYLANGID( nLanguage );
644 GetLanguageName( nLanguage, sString );
645 Log( TEXT( " Info: found Language: %s\r\n" ), sString );
646
647 if ( nLanguage == nUserDefLang )
648 nUserIndex = i;
649 if ( nPrimary == nUserPrimary )
650 nUserPrimIndex = i;
651 if ( nLanguage == nSysDefLang )
652 nSystemIndex = i;
653 if ( nPrimary == nSysPrimary )
654 nSystemPrimIndex = i;
655 if ( m_nLanguageID && ( nLanguage == m_nLanguageID ) )
656 nParamIndex = i;
657 }
658
659 if ( m_nLanguageID && ( nParamIndex == -1 ) )
660 {
661 Log( TEXT( "Warning: Language chosen with parameter -lang not found.\r\n" ) );
662 }
663
664 if ( nParamIndex != -1 )
665 {
666 Log( TEXT( "Info: Found language chosen with parameter -lang.\r\n" ) );
667 rLanguage = GetLanguageID( nParamIndex );
668 }
669 else if ( nUserIndex != -1 )
670 {
671 Log( TEXT( "Info: Found user default language.\r\n" ) );
672 rLanguage = GetLanguageID( nUserIndex );
673 }
674 else if ( nUserPrimIndex != -1 )
675 {
676 Log( TEXT( "Info: Found user default primary language.\r\n" ) );
677 rLanguage = GetLanguageID( nUserPrimIndex );
678 }
679 else if ( nSystemIndex != -1 )
680 {
681 Log( TEXT( "Info: Found system default language.\r\n" ) );
682 rLanguage = GetLanguageID( nSystemIndex );
683 }
684 else if ( nSystemPrimIndex != -1 )
685 {
686 Log( TEXT( "Info: Found system default primary language.\r\n" ) );
687 rLanguage = GetLanguageID( nSystemPrimIndex );
688 }
689 else
690 {
691 Log( TEXT( "Info: Use default language from ini file.\r\n" ) );
692 rLanguage = GetLanguageID( 0 );
693 }
694 delete [] sString;
695 }
696
697 return true;
698 }
699
700 //--------------------------------------------------------------------------
701 HMODULE SetupAppX::LoadMsiLibrary()
702 {
703 HMODULE hMsi = NULL;
704 HKEY hInstKey = NULL;
705
706 // find registered location of Msi.dll
707 if ( ERROR_SUCCESS == RegOpenKeyEx( HKEY_LOCAL_MACHINE, sInstKey, 0, KEY_READ, &hInstKey ) )
708 {
709 long nRet = ERROR_SUCCESS;
710 TCHAR *sMsiFolder = new TCHAR[ MAX_PATH + 1 ];
711 DWORD dwMsiFolderSize = MAX_PATH + 1;
712 DWORD dwType = 0;
713
714 if ( ERROR_MORE_DATA == ( nRet = RegQueryValueEx( hInstKey, sInstLocValue, NULL,
715 &dwType, (BYTE*)sMsiFolder, &dwMsiFolderSize ) ) )
716 {
717 // try again with larger buffer
718 delete [] sMsiFolder;
719 sMsiFolder = new TCHAR[ dwMsiFolderSize ];
720
721 nRet = RegQueryValueEx( hInstKey, sInstLocValue, NULL, &dwType,
722 (BYTE*)sMsiFolder, &dwMsiFolderSize );
723 }
724
725 if ( ERROR_SUCCESS == nRet && dwType == REG_SZ && dwMsiFolderSize > 0 )
726 {
727 // load Msi.dll from registered location
728 int nLength = lstrlen( sMsiDll ) + dwMsiFolderSize + 1; // use StringCchLength ?
729 TCHAR *pMsiLocation = new TCHAR[ nLength ];
730
731 if ( SUCCEEDED( StringCchCopy( pMsiLocation, nLength, sMsiFolder ) ) &&
732 SUCCEEDED( StringCchCat( pMsiLocation, nLength, sMsiDll ) ) )
733 {
734 hMsi = LoadLibrary( pMsiLocation );
735 }
736 }
737 }
738
739 if ( !hMsi ) // use the default location
740 {
741 hMsi = LoadLibrary( sMsiDll );
742 }
743
744 return hMsi;
745 }
746
747 //--------------------------------------------------------------------------
748 LPCTSTR SetupAppX::GetPathToMSI()
749 {
750 LPTSTR sMsiPath = NULL;
751 HKEY hInstKey = NULL;
752 TCHAR *sMsiFolder = new TCHAR[ MAX_PATH + 1 ];
753 DWORD nMsiFolderSize = MAX_PATH + 1;
754
755 sMsiFolder[0] = '\0';
756
757 // find registered location of Msi.dll
758 if ( ERROR_SUCCESS == RegOpenKeyEx( HKEY_LOCAL_MACHINE, sInstKey, 0, KEY_READ, &hInstKey ) )
759 {
760 LONG nRet = ERROR_SUCCESS;
761 DWORD dwType = 0;
762
763 if ( ERROR_MORE_DATA == ( nRet = RegQueryValueEx( hInstKey, sInstLocValue, NULL,
764 &dwType, (BYTE*)sMsiFolder, &nMsiFolderSize ) ) )
765 {
766 // try again with larger buffer
767 delete [] sMsiFolder;
768 sMsiFolder = new TCHAR[ nMsiFolderSize ];
769
770 nRet = RegQueryValueEx( hInstKey, sInstLocValue, NULL, &dwType,
771 (BYTE*)sMsiFolder, &nMsiFolderSize );
772 }
773
774 if ( ERROR_SUCCESS != nRet || dwType != REG_SZ || nMsiFolderSize == 0 )
775 sMsiFolder[0] = '\0';
776 }
777
778 if ( sMsiFolder[0] == '\0' ) // use the default location
779 {
780 Log( TEXT( " Could not find path to msiexec.exe in registry" ) );
781
782 DWORD nRet = WIN::GetSystemDirectory( sMsiFolder, nMsiFolderSize );
783 if ( nRet > nMsiFolderSize )
784 {
785 delete [] sMsiFolder;
786 sMsiFolder = new TCHAR[ nRet ];
787 nMsiFolderSize = nRet;
788
789 nRet = WIN::GetSystemDirectory( sMsiFolder, nMsiFolderSize );
790 }
791 if ( 0 == nRet )
792 {
793 sMsiFolder[0] = '\0';
794 SetError( WIN::GetLastError() );
795 }
796 nMsiFolderSize = nRet;
797 }
798
799 if ( sMsiFolder[0] != '\0' )
800 {
801 int nLength = lstrlen( sMsiExe ) + lstrlen( sMsiFolder ) + 1;
802 sMsiPath = new TCHAR[ nLength ];
803
804 if ( FAILED( StringCchCopy( sMsiPath, nLength, sMsiFolder ) ) ||
805 FAILED( StringCchCat( sMsiPath, nLength, sMsiExe ) ) )
806 {
807 delete [] sMsiPath;
808 sMsiPath = NULL;
809 }
810 }
811
812 if ( ! sMsiPath )
813 Log( TEXT( "ERROR: Can't build path to msiexec.exe!" ) );
814
815 return sMsiPath;
816 }
817
818 //--------------------------------------------------------------------------
819 boolean SetupAppX::LaunchInstaller( LPCTSTR pParam )
820 {
821 LPCTSTR sMsiPath = GetPathToMSI();
822
823 if ( !sMsiPath )
824 {
825 Log( TEXT( "ERROR: msiexec not found!" ) );
826 SetError( ERROR_FILE_NOT_FOUND );
827 return false;
828 }
829
830 STARTUPINFO aSUI;
831 PROCESS_INFORMATION aPI;
832
833 Log( TEXT( " Will install using <%s>\r\n" ), sMsiPath );
834 Log( TEXT( " Prameters are: %s\r\n" ), pParam );
835
836 OutputDebugStringFormat( TEXT( " Will install using <%s>\r\n" ), sMsiPath );
837 OutputDebugStringFormat( TEXT( " Prameters are: %s\r\n" ), pParam );
838
839 ZeroMemory( (void*)&aPI, sizeof( PROCESS_INFORMATION ) );
840 ZeroMemory( (void*)&aSUI, sizeof( STARTUPINFO ) );
841
842 aSUI.cb = sizeof(STARTUPINFO);
843 aSUI.dwFlags = STARTF_USESHOWWINDOW;
844 aSUI.wShowWindow = SW_SHOW;
845
846 DWORD nCmdLineLength = lstrlen( sMsiPath ) + lstrlen( pParam ) + 2;
847 TCHAR *sCmdLine = new TCHAR[ nCmdLineLength ];
848
849 if ( FAILED( StringCchCopy( sCmdLine, nCmdLineLength, sMsiPath ) ) ||
850 FAILED( StringCchCat( sCmdLine, nCmdLineLength, TEXT( " " ) ) ) ||
851 FAILED( StringCchCat( sCmdLine, nCmdLineLength, pParam ) ) )
852 {
853 delete [] sCmdLine;
854 SetError( ERROR_INSTALL_FAILURE );
855 return false;
856 }
857
858 if ( !WIN::CreateProcess( NULL, sCmdLine, NULL, NULL, FALSE,
859 CREATE_DEFAULT_ERROR_MODE, NULL, NULL,
860 &aSUI, &aPI ) )
861 {
862 Log( TEXT( "ERROR: Could not create process %s.\r\n" ), sCmdLine );
863 SetError( WIN::GetLastError() );
864 delete [] sCmdLine;
865 return false;
866 }
867
868 DWORD nResult = WaitForProcess( aPI.hProcess );
869 bool bRet = true;
870
871 if( ERROR_SUCCESS != nResult )
872 {
873 Log( TEXT( "ERROR: While waiting for %s.\r\n" ), sCmdLine );
874 SetError( nResult );
875 bRet = false;
876 }
877 else
878 {
879 GetExitCodeProcess( aPI.hProcess, &nResult );
880 SetError( nResult );
881
882 if ( nResult != ERROR_SUCCESS )
883 {
884 TCHAR sBuf[80];
885 StringCchPrintf( sBuf, 80, TEXT("Warning: msiexec returned %u.\r\n"), nResult );
886 Log( sBuf );
887 }
888 else
889 Log( TEXT( " Installation completed successfully.\r\n" ) );
890 }
891
892 CloseHandle( aPI.hProcess );
893
894 delete [] sCmdLine;
895
896 return bRet;
897 }
898
899 //--------------------------------------------------------------------------
900 boolean SetupAppX::Install( long nLanguage )
901 {
902 LPTSTR pTransform = NULL;
903
904 if ( nLanguage ) // look for transformation
905 {
906 for ( int i = 0; i < m_nLanguageCount; i++ )
907 {
908 if ( m_ppLanguageList[i]->m_nLanguageID == nLanguage )
909 {
910 if ( m_ppLanguageList[i]->m_pTransform )
911 {
912 if ( !GetPathToFile( m_ppLanguageList[i]->m_pTransform,
913 &pTransform ) )
914 {
915 Log( TEXT( "ERROR: Could not find transform <%s\r\n" ), m_ppLanguageList[i]->m_pTransform );
916 return false;
917 }
918 }
919 break;
920 }
921 }
922 }
923
924 TCHAR *pDataBasePath = NULL;
925
926 if ( ! GetPathToFile( m_pDatabase, &pDataBasePath ) )
927 {
928 Log( TEXT( "ERROR: Could not find database <%s\r\n" ), m_pDatabase );
929 SetError( ERROR_INSTALL_SOURCE_ABSENT );
930 return false;
931 }
932
933 // we will always use the parameter setup used
934 int nParLen = lstrlen( PARAM_SETUP_USED );
935
936 if ( m_bRegNoMsoTypes )
937 nParLen += lstrlen( PARAM_REG_NO_MSO_TYPES );
938 else if ( m_bRegAllMsoTypes )
939 nParLen += lstrlen( PARAM_REG_ALL_MSO_TYPES );
940
941 if ( m_pAdvertise )
942 nParLen += lstrlen( m_pAdvertise ) + 1; // one for the space
943 else if ( m_bIsMinorUpgrade )
944 nParLen += lstrlen( PARAM_MINOR_UPGRADE );
945 else
946 nParLen += lstrlen( PARAM_PACKAGE );
947
948 nParLen += lstrlen( pDataBasePath ) + 3; // two quotes, one null
949
950 if ( NeedReboot() )
951 nParLen += lstrlen( PARAM_REBOOT );
952
953 if ( m_pPatchFiles )
954 {
955 nParLen += lstrlen( PARAM_PATCH );
956 nParLen += lstrlen( m_pPatchFiles );
957 }
958
959 if ( pTransform )
960 {
961 nParLen += lstrlen( PARAM_TRANSFORM );
962 nParLen += lstrlen( pTransform ) + 2; // two quotes
963 }
964
965 if ( m_pCmdLine )
966 nParLen += lstrlen( m_pCmdLine ) + 1; // one for the space;
967
968 TCHAR *pParams = new TCHAR[ nParLen ];
969
970 StringCchCopy( pParams, nParLen, PARAM_SETUP_USED );
971
972 if ( m_bRegNoMsoTypes )
973 StringCchCat( pParams, nParLen, PARAM_REG_NO_MSO_TYPES );
974 else if ( m_bRegAllMsoTypes )
975 StringCchCat( pParams, nParLen, PARAM_REG_ALL_MSO_TYPES );
976
977 if ( m_pAdvertise )
978 StringCchCat( pParams, nParLen, m_pAdvertise );
979 else if ( IsAdminInstall() )
980 StringCchCat( pParams, nParLen, PARAM_ADMIN );
981 else if ( m_bIsMinorUpgrade )
982 StringCchCat( pParams, nParLen, PARAM_MINOR_UPGRADE );
983 else
984 StringCchCat( pParams, nParLen, PARAM_PACKAGE );
985
986 StringCchCat( pParams, nParLen, TEXT( "\"" ) );
987 StringCchCat( pParams, nParLen, pDataBasePath );
988 StringCchCat( pParams, nParLen, TEXT( "\"" ) );
989
990 if ( NeedReboot() )
991 StringCchCat( pParams, nParLen, PARAM_REBOOT );
992
993 if ( m_pPatchFiles )
994 {
995 StringCchCat( pParams, nParLen, PARAM_PATCH );
996 StringCchCat( pParams, nParLen, m_pPatchFiles );
997 }
998
999 if ( pTransform )
1000 {
1001 StringCchCat( pParams, nParLen, PARAM_TRANSFORM );
1002 StringCchCat( pParams, nParLen, TEXT( "\"" ) );
1003 StringCchCat( pParams, nParLen, pTransform );
1004 StringCchCat( pParams, nParLen, TEXT( "\"" ) );
1005 }
1006
1007 if ( m_pCmdLine )
1008 {
1009 StringCchCat( pParams, nParLen, TEXT( " " ) );
1010 StringCchCat( pParams, nParLen, m_pCmdLine );
1011 }
1012
1013 return LaunchInstaller( pParams );
1014 }
1015
1016 //--------------------------------------------------------------------------
1017 UINT SetupAppX::GetError() const
1018 {
1019 UINT nErr = 0;
1020
1021 if ( m_pMSIErrorCode )
1022 nErr = (UINT) *m_pMSIErrorCode;
1023
1024 if ( nErr == 0 )
1025 nErr = m_uiRet;
1026
1027 if ( nErr != 0 )
1028 OutputDebugStringFormat( TEXT("Setup will return error (%d).\n"), nErr );
1029 return nErr;
1030 }
1031
1032 //--------------------------------------------------------------------------
1033 void SetupAppX::DisplayError( UINT nErr ) const
1034 {
1035 TCHAR sError[ MAX_TEXT_LENGTH ] = {0};
1036 TCHAR sTmp[ MAX_TEXT_LENGTH ] = {0};
1037
1038 UINT nMsgType = MB_OK | MB_ICONERROR;
1039
1040 switch ( nErr )
1041 {
1042 case ERROR_SUCCESS: break; // 0
1043
1044 case ERROR_FILE_NOT_FOUND: // 2
1045 WIN::LoadString( m_hInst, IDS_FILE_NOT_FOUND, sTmp, MAX_TEXT_LENGTH );
1046 StringCchPrintf( sError, MAX_TEXT_LENGTH, sTmp, m_pErrorText );
1047 break;
1048 case ERROR_INVALID_DATA: // 13
1049 WIN::LoadString( m_hInst, IDS_INVALID_PROFILE, sError, MAX_TEXT_LENGTH );
1050 break;
1051 case ERROR_OUTOFMEMORY: WIN::LoadString( m_hInst, IDS_OUTOFMEM, sError, MAX_TEXT_LENGTH );
1052 break;
1053 case ERROR_INSTALL_USEREXIT:
1054 WIN::LoadString( m_hInst, IDS_USER_CANCELLED, sError, MAX_TEXT_LENGTH );
1055 break;
1056 case ERROR_INSTALL_ALREADY_RUNNING: // 1618
1057 WIN::LoadString( m_hInst, IDS_ALREADY_RUNNING, sError, MAX_TEXT_LENGTH );
1058 break;
1059 case ERROR_INSTALL_SOURCE_ABSENT:
1060 WIN::LoadString( m_hInst, IDS_NOMSI, sError, MAX_TEXT_LENGTH );
1061 break;
1062 case ERROR_DS_INSUFF_ACCESS_RIGHTS: // 8344
1063 WIN::LoadString( m_hInst, IDS_REQUIRES_ADMIN_PRIV, sError, MAX_TEXT_LENGTH );
1064 break;
1065 case E_ABORT: WIN::LoadString( m_hInst, IDS_UNKNOWN_ERROR, sError, MAX_TEXT_LENGTH );
1066 break;
1067 case ERROR_INVALID_PARAMETER: // 87
1068 WIN::LoadString( m_hInst, IDS_INVALID_PARAM, sTmp, MAX_TEXT_LENGTH );
1069 StringCchPrintf( sError, MAX_TEXT_LENGTH, sTmp, m_pErrorText );
1070 break;
1071
1072 case ERROR_SETUP_TO_OLD: // - 3
1073 WIN::LoadString( m_hInst, IDS_SETUP_TO_OLD, sTmp, MAX_TEXT_LENGTH );
1074 StringCchPrintf( sError, MAX_TEXT_LENGTH, sTmp, m_pReqVersion, m_pErrorText );
1075 break;
1076 case ERROR_SETUP_NOT_FOUND: // - 4
1077 WIN::LoadString( m_hInst, IDS_SETUP_NOT_FOUND, sTmp, MAX_TEXT_LENGTH );
1078 StringCchPrintf( sError, MAX_TEXT_LENGTH, sTmp, m_pReqVersion );
1079 break;
1080 case ERROR_SHOW_USAGE: // - 2
1081 nMsgType = MB_OK | MB_ICONINFORMATION;
1082 WIN::LoadString( m_hInst, IDS_USAGE, sError, MAX_TEXT_LENGTH );
1083 break;
1084
1085 default: WIN::LoadString( m_hInst, IDS_UNKNOWN_ERROR, sError, MAX_TEXT_LENGTH );
1086 break;
1087 }
1088
1089 if ( sError[0] )
1090 {
1091 if ( !m_bQuiet )
1092 {
1093 ConvertNewline( sError );
1094 WIN::MessageBox( NULL, sError, m_pAppTitle, nMsgType );
1095 }
1096
1097 Log( TEXT( "ERROR: %s\r\n" ), sError );
1098 }
1099 }
1100
1101 //--------------------------------------------------------------------------
1102 long SetupAppX::GetLanguageID( long nIndex ) const
1103 {
1104 if ( nIndex >=0 && nIndex < m_nLanguageCount )
1105 return m_ppLanguageList[ nIndex ]->m_nLanguageID;
1106 else
1107 return 0;
1108 }
1109
1110 //--------------------------------------------------------------------------
1111 void SetupAppX::GetLanguageName( long nLanguage, LPTSTR sName ) const
1112 {
1113 switch ( nLanguage )
1114 {
1115 case 1028: WIN::LoadString( m_hInst, IDS_LANGUAGE_ZH_TW, sName, MAX_LANGUAGE_LEN ); break;
1116 case 1029: WIN::LoadString( m_hInst, IDS_LANGUAGE_CS, sName, MAX_LANGUAGE_LEN ); break;
1117 case 1030: WIN::LoadString( m_hInst, IDS_LANGUAGE_DA, sName, MAX_LANGUAGE_LEN ); break;
1118 case 1031: WIN::LoadString( m_hInst, IDS_LANGUAGE_DE_DE, sName, MAX_LANGUAGE_LEN ); break;
1119 case 1032: WIN::LoadString( m_hInst, IDS_LANGUAGE_EL, sName, MAX_LANGUAGE_LEN ); break;
1120 case 1033: WIN::LoadString( m_hInst, IDS_LANGUAGE_EN_US, sName, MAX_LANGUAGE_LEN ); break;
1121 case 1034: WIN::LoadString( m_hInst, IDS_LANGUAGE_ES, sName, MAX_LANGUAGE_LEN ); break;
1122 case 1035: WIN::LoadString( m_hInst, IDS_LANGUAGE_FI, sName, MAX_LANGUAGE_LEN ); break;
1123 case 1036: WIN::LoadString( m_hInst, IDS_LANGUAGE_FR_FR, sName, MAX_LANGUAGE_LEN ); break;
1124 case 1037: WIN::LoadString( m_hInst, IDS_LANGUAGE_HE, sName, MAX_LANGUAGE_LEN ); break;
1125 case 1038: WIN::LoadString( m_hInst, IDS_LANGUAGE_HU, sName, MAX_LANGUAGE_LEN ); break;
1126 case 1040: WIN::LoadString( m_hInst, IDS_LANGUAGE_IT_IT, sName, MAX_LANGUAGE_LEN ); break;
1127 case 1041: WIN::LoadString( m_hInst, IDS_LANGUAGE_JA, sName, MAX_LANGUAGE_LEN ); break;
1128 case 1042: WIN::LoadString( m_hInst, IDS_LANGUAGE_KO, sName, MAX_LANGUAGE_LEN ); break;
1129 case 1043: WIN::LoadString( m_hInst, IDS_LANGUAGE_NL_NL, sName, MAX_LANGUAGE_LEN ); break;
1130 case 1044: WIN::LoadString( m_hInst, IDS_LANGUAGE_NO_NO, sName, MAX_LANGUAGE_LEN ); break;
1131 case 1045: WIN::LoadString( m_hInst, IDS_LANGUAGE_PL, sName, MAX_LANGUAGE_LEN ); break;
1132 case 1046: WIN::LoadString( m_hInst, IDS_LANGUAGE_PT_BR, sName, MAX_LANGUAGE_LEN ); break;
1133 case 1049: WIN::LoadString( m_hInst, IDS_LANGUAGE_RU, sName, MAX_LANGUAGE_LEN ); break;
1134 case 1051: WIN::LoadString( m_hInst, IDS_LANGUAGE_SK, sName, MAX_LANGUAGE_LEN ); break;
1135 case 1053: WIN::LoadString( m_hInst, IDS_LANGUAGE_SV_SE, sName, MAX_LANGUAGE_LEN ); break;
1136 case 1054: WIN::LoadString( m_hInst, IDS_LANGUAGE_TH, sName, MAX_LANGUAGE_LEN ); break;
1137 case 1055: WIN::LoadString( m_hInst, IDS_LANGUAGE_TR, sName, MAX_LANGUAGE_LEN ); break;
1138 case 1061: WIN::LoadString( m_hInst, IDS_LANGUAGE_ET, sName, MAX_LANGUAGE_LEN ); break;
1139 case 2052: WIN::LoadString( m_hInst, IDS_LANGUAGE_ZH_CN, sName, MAX_LANGUAGE_LEN ); break;
1140 case 2070: WIN::LoadString( m_hInst, IDS_LANGUAGE_PT_PT, sName, MAX_LANGUAGE_LEN ); break;
1141
1142 default:
1143 {
1144 TCHAR sTmp[ MAX_LANGUAGE_LEN ] = {0};
1145
1146 WIN::LoadString( m_hInst, IDS_UNKNOWN_LANG, sTmp, MAX_LANGUAGE_LEN );
1147 StringCchPrintf( sName, MAX_LANGUAGE_LEN, sTmp, nLanguage );
1148 }
1149 }
1150 }
1151
1152 //--------------------------------------------------------------------------
1153 boolean SetupAppX::CheckVersion()
1154 {
1155 boolean bRet = false;
1156 HMODULE hMsi = LoadMsiLibrary();
1157
1158 Log( TEXT( " Looking for installed MSI with version >= %s\r\n" ), m_pReqVersion );
1159
1160 if ( !hMsi )
1161 {
1162 Log( TEXT( "Error: No MSI found!\r\n" ) );
1163 SetError( (UINT) ERROR_SETUP_NOT_FOUND );
1164 }
1165 else
1166 {
1167 PFnDllGetVersion pDllGetVersion = (PFnDllGetVersion) GetProcAddress( hMsi, MSIAPI_DllGetVersion );
1168
1169 if ( pDllGetVersion )
1170 {
1171 DLLVERSIONINFO aInfo;
1172
1173 aInfo.cbSize = sizeof( DLLVERSIONINFO );
1174 if ( NOERROR == pDllGetVersion( &aInfo ) )
1175 {
1176 TCHAR pMsiVersion[ VERSION_SIZE ];
1177 StringCchPrintf( pMsiVersion, VERSION_SIZE, TEXT("%d.%d.%4d"),
1178 aInfo.dwMajorVersion,
1179 aInfo.dwMinorVersion,
1180 aInfo.dwBuildNumber );
1181 if ( _tcsncmp( pMsiVersion, m_pReqVersion, _tcslen( pMsiVersion ) ) < 0 )
1182 {
1183 StringCchCopy( m_pErrorText, MAX_TEXT_LENGTH, pMsiVersion );
1184 SetError( (UINT) ERROR_SETUP_TO_OLD );
1185 Log( TEXT( "Warning: Old MSI version found <%s>, update needed!\r\n" ), pMsiVersion );
1186 }
1187 else
1188 {
1189 Log( TEXT( " Found MSI version <%s>, no update needed\r\n" ), pMsiVersion );
1190 bRet = true;
1191 }
1192 if ( aInfo.dwMajorVersion >= 3 )
1193 m_bSupportsPatch = true;
1194 else
1195 Log( TEXT("Warning: Patching not supported! MSI-Version <%s>\r\n"), pMsiVersion );
1196 }
1197 }
1198
1199 FreeLibrary( hMsi );
1200 }
1201
1202 return bRet;
1203 }
1204
1205 //--------------------------------------------------------------------------
1206 boolean SetupAppX::CheckForUpgrade()
1207 {
1208 // When we have patch files we will never try an Minor upgrade
1209 if ( m_pPatchFiles ) return true;
1210
1211 if ( !m_pUpgradeKey || ( _tcslen( m_pUpgradeKey ) == 0 ) )
1212 {
1213 Log( TEXT( " No Upgrade Key Found -> continue with standard installation!\r\n" ) );
1214 return true;
1215 }
1216
1217 HKEY hInstKey = NULL;
1218
1219 if ( ERROR_SUCCESS == RegOpenKeyEx( HKEY_LOCAL_MACHINE, m_pUpgradeKey, 0, KEY_READ, &hInstKey ) )
1220 {
1221 Log( TEXT( " Found Upgrade Key in Registry (HKLM) -> will try minor upgrade!\r\n" ) );
1222 m_bIsMinorUpgrade = true;
1223 }
1224 else if ( ERROR_SUCCESS == RegOpenKeyEx( HKEY_CURRENT_USER, m_pUpgradeKey, 0, KEY_READ, &hInstKey ) )
1225 {
1226 Log( TEXT( " Found Upgrade Key in Registry (HKCU) -> will try minor upgrade!\r\n" ) );
1227 m_bIsMinorUpgrade = true;
1228 }
1229 else
1230 {
1231 Log( TEXT( " Didn't Find Upgrade Key in Registry -> continue with standard installation!\r\n" ) );
1232 return true;
1233 }
1234
1235 if ( m_pProductVersion && ( _tcslen( m_pProductVersion ) > 0 ) )
1236 {
1237 TCHAR *sProductVersion = new TCHAR[ MAX_PATH + 1 ];
1238 DWORD nSize = MAX_PATH + 1;
1239
1240 sProductVersion[0] = '\0';
1241
1242 // get product version
1243 if ( ERROR_SUCCESS == RegQueryValueEx( hInstKey, PRODUCT_VERSION, NULL, NULL, (LPBYTE)sProductVersion, &nSize ) )
1244 {
1245 if ( lstrcmpi( sProductVersion, m_pProductVersion ) == 0 )
1246 {
1247 Log( TEXT( " Same Product Version already installed, no minor upgrade!\r\n" ) );
1248 m_bIsMinorUpgrade = false;
1249 }
1250 }
1251
1252 delete [] sProductVersion;
1253 }
1254
1255 return true;
1256 }
1257
1258 //--------------------------------------------------------------------------
1259 boolean SetupAppX::IsTerminalServerInstalled() const
1260 {
1261 boolean bIsTerminalServer = false;
1262
1263 const TCHAR sSearchStr[] = TEXT("Terminal Server");
1264 const TCHAR sKey[] = TEXT("System\\CurrentControlSet\\Control\\ProductOptions");
1265 const TCHAR sValue[] = TEXT("ProductSuite");
1266
1267 DWORD dwSize = 0;
1268 HKEY hKey = 0;
1269 DWORD dwType = 0;
1270
1271 if ( ERROR_SUCCESS == RegOpenKeyEx( HKEY_LOCAL_MACHINE, sKey, 0, KEY_READ, &hKey ) &&
1272 ERROR_SUCCESS == RegQueryValueEx( hKey, sValue, NULL, &dwType, NULL, &dwSize ) &&
1273 dwSize > 0 &&
1274 REG_MULTI_SZ == dwType )
1275 {
1276 TCHAR* sSuiteList = new TCHAR[ (dwSize*sizeof(byte)/sizeof(TCHAR)) + 1 ];
1277
1278 ZeroMemory(sSuiteList, dwSize);
1279
1280 if ( ERROR_SUCCESS == RegQueryValueEx( hKey, sValue, NULL, &dwType, (LPBYTE)sSuiteList, &dwSize) )
1281 {
1282 DWORD nMulti = 0;
1283 DWORD nSrch = lstrlen( sSearchStr );
1284 const TCHAR *sSubString = sSuiteList;
1285
1286 while (*sSubString)
1287 {
1288 nMulti = lstrlen( sSubString );
1289 if ( nMulti == nSrch && 0 == lstrcmp( sSearchStr, sSubString ) )
1290 {
1291 bIsTerminalServer = true;
1292 break;
1293 }
1294
1295 sSubString += (nMulti + 1);
1296 }
1297 }
1298 delete [] sSuiteList;
1299 }
1300
1301 if ( hKey )
1302 RegCloseKey( hKey );
1303
1304 return bIsTerminalServer;
1305 }
1306
1307 //--------------------------------------------------------------------------
1308 boolean SetupAppX::AlreadyRunning() const
1309 {
1310 if ( m_bIgnoreAlreadyRunning )
1311 {
1312 Log( TEXT("Ignoring already running MSI instance!\r\n") );
1313 return false;
1314 }
1315
1316 const TCHAR *sMutexName = NULL;
1317 const TCHAR sGUniqueName[] = TEXT( "Global\\_MSISETUP_{EA8130C1-8D3D-4338-9309-1A52D530D846}" );
1318 const TCHAR sUniqueName[] = TEXT( "_MSISETUP_{EA8130C1-8D3D-4338-9309-1A52D530D846}" );
1319
1320 if ( IsWin9x() )
1321 sMutexName = sUniqueName;
1322 else if ( ( GetOSVersion() < 5 ) && ! IsTerminalServerInstalled() )
1323 sMutexName = sUniqueName;
1324 else
1325 sMutexName = sGUniqueName;
1326
1327 HANDLE hMutex = 0;
1328
1329 hMutex = WIN::CreateMutex( NULL, FALSE, sMutexName );
1330
1331 if ( !hMutex || ERROR_ALREADY_EXISTS == WIN::GetLastError() )
1332 {
1333 if ( !hMutex )
1334 Log( TEXT( "ERROR: AlreadyRunning() could not create mutex!\r\n" ) );
1335 else
1336 Log( TEXT( "ERROR: There's already a setup running!\r\n" ) );
1337
1338 return true;
1339 }
1340 Log( TEXT( " No running Setup found\r\n" ) );
1341
1342 return false;
1343 }
1344
1345 //--------------------------------------------------------------------------
1346 DWORD SetupAppX::WaitForProcess( HANDLE hHandle )
1347 {
1348 DWORD nResult = NOERROR;
1349 boolean bLoop = true;
1350
1351 MSG aMsg;
1352 ZeroMemory( (void*) &aMsg, sizeof(MSG) );
1353
1354 while ( bLoop )
1355 {
1356 switch ( WIN::MsgWaitForMultipleObjects( 1, &hHandle, false,
1357 INFINITE, QS_ALLINPUT ) )
1358 {
1359 case WAIT_OBJECT_0: bLoop = false;
1360 break;
1361
1362 case (WAIT_OBJECT_0 + 1):
1363 {
1364 if ( WIN::PeekMessage( &aMsg, NULL, NULL, NULL, PM_REMOVE ) )
1365 {
1366 WIN::TranslateMessage( &aMsg );
1367 WIN::DispatchMessage( &aMsg );
1368 }
1369 break;
1370 }
1371
1372 default:
1373 {
1374 nResult = WIN::GetLastError();
1375 bLoop = false;
1376 }
1377 }
1378 }
1379
1380 return nResult;
1381 }
1382
1383 //--------------------------------------------------------------------------
1384 void SetupAppX::Log( LPCTSTR pMessage, LPCTSTR pText ) const
1385 {
1386 if ( m_pLogFile )
1387 {
1388 static boolean bInit = false;
1389
1390 if ( !bInit )
1391 {
1392 bInit = true;
1393 if ( ! IsWin9x() )
1394 _ftprintf( m_pLogFile, TEXT("%c"), 0xfeff );
1395
1396 _tsetlocale( LC_ALL, TEXT("") );
1397 _ftprintf( m_pLogFile, TEXT("\nCodepage=%s\nMultiByte Codepage=[%d]\n"),
1398 _tsetlocale( LC_ALL, NULL ), _getmbcp() );
1399 }
1400 if ( pText )
1401 {
1402 _ftprintf( m_pLogFile, pMessage, pText );
1403 OutputDebugStringFormat( pMessage, pText );
1404 }
1405 else
1406 {
1407 _ftprintf( m_pLogFile, pMessage );
1408 OutputDebugStringFormat( pMessage );
1409 }
1410
1411 fflush( m_pLogFile );
1412 }
1413 }
1414
1415 //--------------------------------------------------------------------------
1416 DWORD SetupAppX::GetNextArgument( LPCTSTR pStr, LPTSTR *pArg, LPTSTR *pNext,
1417 boolean bStripQuotes )
1418 {
1419 boolean bInQuotes = false;
1420 boolean bFoundArgEnd = false;
1421 LPCTSTR pChar = pStr;
1422 LPCTSTR pFirst = NULL;
1423
1424 if ( NULL == pChar )
1425 return ERROR_NO_MORE_ITEMS;
1426
1427 while ( ' ' == (*pChar) || '\t' == (*pChar) )
1428 pChar = CharNext( pChar );
1429
1430 if ( '\0' == (*pChar) )
1431 return ERROR_NO_MORE_ITEMS;
1432
1433 int nCount = 1;
1434 pFirst = pChar;
1435
1436 while ( ! bFoundArgEnd )
1437 {
1438 if ( '\0' == (*pChar) )
1439 bFoundArgEnd = true;
1440 else if ( !bInQuotes && ' ' == (*pChar) )
1441 bFoundArgEnd = true;
1442 else if ( !bInQuotes && '\t' == (*pChar) )
1443 bFoundArgEnd = true;
1444 else
1445 {
1446 if ( '\"' == (*pChar) )
1447 {
1448 bInQuotes = !bInQuotes;
1449 if ( bStripQuotes )
1450 {
1451 if ( pChar == pFirst )
1452 pFirst = CharNext( pFirst );
1453 nCount -= 1;
1454 }
1455 }
1456
1457 pChar = CharNext( pChar );
1458 nCount += 1;
1459 }
1460 }
1461
1462 if ( pArg )
1463 {
1464 *pArg = new TCHAR[ nCount ];
1465 StringCchCopyN ( *pArg, nCount, pFirst, nCount-1 );
1466 }
1467
1468 if ( pNext )
1469 *pNext = CharNext( pChar );
1470
1471 return ERROR_SUCCESS;
1472 }
1473
1474 //--------------------------------------------------------------------------
1475 boolean SetupAppX::GetCmdLineParameters( LPTSTR *pCmdLine )
1476 {
1477 int nRet = ERROR_SUCCESS;
1478 LPTSTR pStart = NULL;
1479 LPTSTR pNext = NULL;
1480
1481 if ( GetNextArgument( *pCmdLine, NULL, &pNext ) != ERROR_SUCCESS )
1482 {
1483 SetError( ERROR_NO_MORE_ITEMS );
1484 return false;
1485 }
1486
1487 int nSize = lstrlen( *pCmdLine ) + 2;
1488 TCHAR *pNewCmdLine = new TCHAR[ nSize ];
1489 pNewCmdLine[0] = '\0';
1490
1491 while ( GetNextArgument( pNext, &pStart, &pNext ) == ERROR_SUCCESS )
1492 {
1493 boolean bDeleteStart = true;
1494
1495 if ( (*pStart) == '/' || (*pStart) == '-' )
1496 {
1497 LPTSTR pSub = CharNext( pStart );
1498 if ( (*pSub) == 'l' || (*pSub) == 'L' )
1499 {
1500 pSub = CharNext( pSub );
1501 if ( (*pSub) == 'a' || (*pSub) == 'A' )
1502 { // --- handle the lang parameter ---
1503 LPTSTR pLanguage = NULL;
1504 LPTSTR pLastChar;
1505 if ( GetNextArgument( pNext, &pLanguage, &pNext, true ) != ERROR_SUCCESS )
1506 {
1507 StringCchCopy( m_pErrorText, MAX_TEXT_LENGTH, pStart );
1508 nRet = ERROR_INVALID_PARAMETER;
1509 break;
1510 }
1511
1512 m_nLanguageID = _tcstol( pLanguage, &pLastChar, 10 );
1513 delete [] pLanguage;
1514 }
1515 else
1516 { // --- handle the l(og) parameter ---
1517 boolean bAppend = false;
1518 LPTSTR pFileName = NULL;
1519
1520 while ( *pSub )
1521 {
1522 if ( *pSub == '+' )
1523 {
1524 bAppend = true;
1525 break;
1526 }
1527 pSub = CharNext( pSub );
1528 }
1529
1530 if ( GetNextArgument( pNext, &pFileName, &pNext, true ) != ERROR_SUCCESS )
1531 {
1532 StringCchCopy( m_pErrorText, MAX_TEXT_LENGTH, pStart );
1533 nRet = ERROR_INVALID_PARAMETER;
1534 break;
1535 }
1536
1537 if ( FAILED( StringCchCat( pNewCmdLine, nSize, pStart ) ) )
1538 {
1539 nRet = ERROR_OUTOFMEMORY;
1540 break;
1541 }
1542 // we need to append a '+' otherwise msiexec would overwrite our log file
1543 if ( !bAppend && FAILED( StringCchCat( pNewCmdLine, nSize, TEXT( "+" ) ) ) )
1544 {
1545 nRet = ERROR_OUTOFMEMORY;
1546 break;
1547 }
1548 if ( FAILED( StringCchCat( pNewCmdLine, nSize, TEXT( " \"" ) ) ) ||
1549 FAILED( StringCchCat( pNewCmdLine, nSize, pFileName ) ) ||
1550 FAILED( StringCchCat( pNewCmdLine, nSize, TEXT( "\" " ) ) ) )
1551 {
1552 nRet = ERROR_OUTOFMEMORY;
1553 break;
1554 }
1555
1556 if ( bAppend )
1557 m_pLogFile = _tfopen( pFileName, TEXT( "ab" ) );
1558 else
1559 m_pLogFile = _tfopen( pFileName, TEXT( "wb" ) );
1560
1561 delete [] pFileName;
1562 }
1563 }
1564 else if ( (*pSub) == 'q' || (*pSub) == 'Q' )
1565 { // --- Handle quiet file parameter ---
1566 pSub = CharNext( pSub );
1567 if ( ! (*pSub) || (*pSub) == 'n' || (*pSub) == 'N' )
1568 m_bQuiet = true;
1569
1570 if ( FAILED( StringCchCat( pNewCmdLine, nSize, pStart ) ) ||
1571 FAILED( StringCchCat( pNewCmdLine, nSize, TEXT( " " ) ) ) )
1572 {
1573 nRet = ERROR_OUTOFMEMORY;
1574 break;
1575 }
1576 }
1577 else if ( _tcsnicmp( pSub, PARAM_RUNNING, _tcslen( PARAM_RUNNING ) ) == 0 )
1578 {
1579 m_bIgnoreAlreadyRunning = true;
1580 }
1581 else if ( _tcsnicmp( pSub, CMDLN_REG_ALL_MSO_TYPES, _tcslen( CMDLN_REG_ALL_MSO_TYPES ) ) == 0 )
1582 {
1583 m_bRegAllMsoTypes = true;
1584 }
1585 else if ( _tcsnicmp( pSub, CMDLN_REG_NO_MSO_TYPES, _tcslen( CMDLN_REG_NO_MSO_TYPES ) ) == 0 )
1586 {
1587 m_bRegNoMsoTypes = true;
1588 }
1589 else if ( (*pSub) == 'i' || (*pSub) == 'I' || (*pSub) == 'f' || (*pSub) == 'F' ||
1590 (*pSub) == 'p' || (*pSub) == 'P' || (*pSub) == 'x' || (*pSub) == 'X' ||
1591 (*pSub) == 'y' || (*pSub) == 'Y' || (*pSub) == 'z' || (*pSub) == 'Z' )
1592 {
1593 StringCchCopy( m_pErrorText, MAX_TEXT_LENGTH, pStart );
1594 nRet = ERROR_INVALID_PARAMETER;
1595 break;
1596 }
1597 else if ( (*pSub) == 'a' || (*pSub) == 'A' )
1598 { // --- Handle Adminstrative Installation ---
1599 SetAdminInstall( true );
1600 }
1601 else if ( (*pSub) == 'j' || (*pSub) == 'J' )
1602 { // --- Handle Adminstrative Installation ---
1603 m_pAdvertise = pStart;
1604 m_bQuiet = true;
1605 bDeleteStart = false;
1606 }
1607 else if ( (*pSub) == '?' || (*pSub) == 'h' || (*pSub) == 'H' )
1608 { // --- Handle Show Usage ---
1609 nRet = ERROR_SHOW_USAGE;
1610 break;
1611 }
1612 else
1613 {
1614 if ( FAILED( StringCchCat( pNewCmdLine, nSize, pStart ) ) ||
1615 FAILED( StringCchCat( pNewCmdLine, nSize, TEXT( " " ) ) ) )
1616 {
1617 nRet = ERROR_OUTOFMEMORY;
1618 break;
1619 }
1620 }
1621 }
1622 else
1623 {
1624 if ( FAILED( StringCchCat( pNewCmdLine, nSize, pStart ) ) ||
1625 FAILED( StringCchCat( pNewCmdLine, nSize, TEXT( " " ) ) ) )
1626 {
1627 nRet = ERROR_OUTOFMEMORY;
1628 break;
1629 }
1630 }
1631
1632 if ( bDeleteStart ) delete [] pStart;
1633 pStart = NULL;
1634 }
1635
1636 if ( pStart ) delete [] pStart;
1637
1638 *pCmdLine = pNewCmdLine;
1639
1640 if ( nRet != ERROR_SUCCESS )
1641 {
1642 SetError( nRet );
1643 return false;
1644 }
1645 else
1646 return true;;
1647 }
1648
1649 //--------------------------------------------------------------------------
1650 boolean SetupAppX::IsAdmin()
1651 {
1652 if ( IsWin9x() )
1653 return true;
1654
1655 PSID aPsidAdmin;
1656 SID_IDENTIFIER_AUTHORITY aAuthority = SECURITY_NT_AUTHORITY;
1657
1658 if ( !AllocateAndInitializeSid( &aAuthority, 2, SECURITY_BUILTIN_DOMAIN_RID,
1659 DOMAIN_ALIAS_RID_ADMINS, 0, 0, 0, 0, 0, 0,
1660 &aPsidAdmin ) )
1661 return false;
1662
1663 BOOL bIsAdmin = FALSE;
1664
1665 if ( GetOSVersion() >= 5 )
1666 {
1667 HMODULE hAdvapi32 = LoadLibrary( ADVAPI32_DLL );
1668
1669 if ( !hAdvapi32 )
1670 bIsAdmin = FALSE;
1671 else
1672 {
1673 PFnCheckTokenMembership pfnCheckTokenMembership = (PFnCheckTokenMembership) GetProcAddress( hAdvapi32, ADVAPI32API_CheckTokenMembership);
1674 if ( !pfnCheckTokenMembership || !pfnCheckTokenMembership( NULL, aPsidAdmin, &bIsAdmin ) )
1675 bIsAdmin = FALSE;
1676 }
1677 FreeLibrary( hAdvapi32 );
1678 }
1679 else
1680 {
1681 // NT4, check groups of user
1682 HANDLE hAccessToken = 0;
1683 UCHAR *szInfoBuffer = new UCHAR[ 1024 ]; // may need to resize if TokenInfo too big
1684 DWORD dwInfoBufferSize = 1024;
1685 DWORD dwRetInfoBufferSize = 0;
1686 UINT i=0;
1687
1688 if ( WIN::OpenProcessToken( WIN::GetCurrentProcess(), TOKEN_READ, &hAccessToken ) )
1689 {
1690 bool bSuccess = false;
1691 bSuccess = WIN::GetTokenInformation( hAccessToken, TokenGroups,
1692 szInfoBuffer, dwInfoBufferSize,
1693 &dwRetInfoBufferSize ) == TRUE;
1694
1695 if( dwRetInfoBufferSize > dwInfoBufferSize )
1696 {
1697 delete [] szInfoBuffer;
1698 szInfoBuffer = new UCHAR[ dwRetInfoBufferSize ];
1699 dwInfoBufferSize = dwRetInfoBufferSize;
1700 bSuccess = WIN::GetTokenInformation( hAccessToken, TokenGroups,
1701 szInfoBuffer, dwInfoBufferSize,
1702 &dwRetInfoBufferSize ) == TRUE;
1703 }
1704
1705 WIN::CloseHandle( hAccessToken );
1706
1707 if ( bSuccess )
1708 {
1709 PTOKEN_GROUPS pGroups = (PTOKEN_GROUPS)(UCHAR*) szInfoBuffer;
1710 for( i=0; i<pGroups->GroupCount; i++ )
1711 {
1712 if( WIN::EqualSid( aPsidAdmin, pGroups->Groups[i].Sid ) )
1713 {
1714 bIsAdmin = TRUE;
1715 break;
1716 }
1717 }
1718 }
1719
1720 delete [] szInfoBuffer;
1721 }
1722 }
1723
1724 WIN::FreeSid( aPsidAdmin );
1725
1726 return bIsAdmin ? true : false;
1727 }
1728
1729 //--------------------------------------------------------------------------
1730 LPTSTR SetupAppX::CopyIniFile( LPCTSTR pIniFile )
1731 {
1732 m_pTmpName = _ttempnam( TEXT( "C:\\" ), TEXT( "Setup" ) );
1733
1734 if ( !m_pTmpName )
1735 {
1736 Log( TEXT( "ERROR: Could not create temp file\n" ) );
1737 return NULL;
1738 }
1739
1740 FILE *pOut = _tfopen( m_pTmpName, TEXT( "wb" ) );
1741 FILE *pIn = _tfopen( pIniFile, TEXT( "rb" ) );
1742
1743 if ( pOut && pIn )
1744 {
1745 size_t nRead, nWritten;
1746 BYTE pBuf[1024];
1747
1748 nRead = fread( pBuf, sizeof( BYTE ), 1024, pIn );
1749 while ( nRead && !ferror( pIn ) )
1750 {
1751 nWritten = fwrite( pBuf, sizeof( BYTE ), nRead, pOut );
1752 if ( nWritten != nRead )
1753 {
1754 Log( TEXT( "ERROR: Could not write all bytes to temp file\n" ) );
1755 break;
1756 }
1757 nRead = fread( pBuf, sizeof( BYTE ), 1024, pIn );
1758 }
1759 }
1760
1761 if ( pOut ) fclose( pOut );
1762 if ( pIn ) fclose( pIn );
1763
1764 return m_pTmpName;
1765 }
1766
1767 //--------------------------------------------------------------------------
1768 void SetupAppX::ConvertNewline( LPTSTR pText ) const
1769 {
1770 int i=0;
1771
1772 while ( pText[i] != 0 )
1773 {
1774 if ( ( pText[i] == '\\' ) && ( pText[i+1] == 'n' ) )
1775 {
1776 pText[i] = 0x0d;
1777 pText[i+1] = 0x0a;
1778 i+=2;
1779 }
1780 else
1781 i+=1;
1782 }
1783 }
1784
1785 //--------------------------------------------------------------------------
1786 LPTSTR SetupAppX::SetProdToAppTitle( LPCTSTR pProdName )
1787 {
1788 if ( !pProdName ) return m_pAppTitle;
1789
1790 LPTSTR pAppProdTitle = new TCHAR[ MAX_STR_CAPTION ];
1791 pAppProdTitle[0] = '\0';
1792
1793 WIN::LoadString( m_hInst, IDS_APP_PROD_TITLE, pAppProdTitle, MAX_STR_CAPTION );
1794
1795 int nAppLen = lstrlen( pAppProdTitle );
1796 int nProdLen = lstrlen( pProdName );
1797
1798 if ( ( nAppLen == 0 ) || ( nProdLen == 0 ) )
1799 {
1800 delete [] pAppProdTitle;
1801 return m_pAppTitle;
1802 }
1803
1804 int nLen = nAppLen + nProdLen + 3;
1805
1806 if ( nLen > STRSAFE_MAX_CCH ) return m_pAppTitle;
1807
1808 LPTSTR pIndex = _tcsstr( pAppProdTitle, PRODUCT_NAME_VAR );
1809
1810 if ( pIndex )
1811 {
1812 int nOffset = pIndex - pAppProdTitle;
1813 int nVarLen = lstrlen( PRODUCT_NAME_VAR );
1814
1815 LPTSTR pNewTitle = new TCHAR[ nLen ];
1816 pNewTitle[0] = '\0';
1817
1818 if ( nOffset > 0 )
1819 {
1820 StringCchCopyN( pNewTitle, nLen, pAppProdTitle, nOffset );
1821 }
1822
1823 StringCchCat( pNewTitle, nLen, pProdName );
1824
1825 if ( nOffset + nVarLen < nAppLen )
1826 {
1827 StringCchCat( pNewTitle, nLen, pIndex + nVarLen );
1828 }
1829
1830 delete [] m_pAppTitle;
1831 m_pAppTitle = pNewTitle;
1832 }
1833
1834 delete [] pAppProdTitle;
1835
1836 return m_pAppTitle;
1837 }
1838
1839
1840 //--------------------------------------------------------------------------
1841 boolean SetupAppX::IsPatchInstalled( TCHAR* pBaseDir, TCHAR* pFileName )
1842 {
1843 if ( !m_bSupportsPatch )
1844 return false;
1845
1846 PMSIHANDLE hSummaryInfo;
1847 int nLen = lstrlen( pBaseDir ) + lstrlen( pFileName ) + 1;
1848 TCHAR *szDatabasePath = new TCHAR [ nLen ];
1849 TCHAR sBuf[80];
1850
1851 StringCchCopy( szDatabasePath, nLen, pBaseDir );
1852 StringCchCat( szDatabasePath, nLen, pFileName );
1853
1854 UINT nRet = MsiGetSummaryInformation( NULL, szDatabasePath, 0, &hSummaryInfo );
1855
1856 if ( nRet != ERROR_SUCCESS )
1857 {
1858 StringCchPrintf( sBuf, 80, TEXT("ERROR: IsPatchInstalled: MsiGetSummaryInformation returned %u.\r\n"), nRet );
1859 Log( sBuf );
1860 return false;
1861 }
1862
1863 UINT uiDataType;
1864 LPTSTR szPatchID = new TCHAR[ 64 ];
1865 DWORD cchValueBuf = 64;
1866 nRet = MsiSummaryInfoGetProperty( hSummaryInfo, PID_REVNUMBER, &uiDataType, NULL, NULL, szPatchID, &cchValueBuf );
1867
1868 if ( nRet != ERROR_SUCCESS )
1869 {
1870 StringCchPrintf( sBuf, 80, TEXT("ERROR: IsPatchInstalled: MsiSummaryInfoGetProperty returned %u.\r\n"), nRet );
1871 Log( sBuf );
1872 return false;
1873 }
1874
1875 nRet = MsiGetPatchInfo( szPatchID, INSTALLPROPERTY_LOCALPACKAGE, NULL, NULL );
1876
1877 StringCchPrintf( sBuf, 80, TEXT(" GetPatchInfo for (%s) returned (%u)\r\n"), szPatchID, nRet );
1878 Log( sBuf );
1879
1880 delete []szPatchID;
1881
1882 if ( nRet == ERROR_BAD_CONFIGURATION )
1883 return false;
1884 else if ( nRet == ERROR_INVALID_PARAMETER )
1885 return false;
1886 else if ( nRet == ERROR_MORE_DATA )
1887 return true;
1888 else if ( nRet == ERROR_SUCCESS )
1889 return true;
1890 else if ( nRet == ERROR_UNKNOWN_PRODUCT )
1891 return false;
1892 else if ( nRet == ERROR_UNKNOWN_PROPERTY )
1893 return false;
1894 else return false;
1895
1896 return false;
1897 }
1898
1899 //--------------------------------------------------------------------------
1900 //--------------------------------------------------------------------------
1901 LanguageDataX::LanguageDataX( LPTSTR pData )
1902 {
1903 m_nLanguageID = 0;
1904 m_pTransform = NULL;
1905
1906 LPTSTR pLastChar;
1907
1908 m_nLanguageID = _tcstol( pData, &pLastChar, 10 );
1909
1910 if ( *pLastChar == ',' )
1911 {
1912 pLastChar += 1;
1913 int nLen = lstrlen( pLastChar ) + 1;
1914 m_pTransform = new TCHAR [ nLen ];
1915 StringCchCopy( m_pTransform, nLen, pLastChar );
1916 }
1917 }
1918
1919 //--------------------------------------------------------------------------
1920 LanguageDataX::~LanguageDataX()
1921 {
1922 if ( m_pTransform ) delete [] m_pTransform;
1923 }
1924
1925 //--------------------------------------------------------------------------
1926 //--------------------------------------------------------------------------
1927 SetupApp* Create_SetupAppX()
1928 {
1929 return new SetupAppX;
1930 }
1931
1932 //--------------------------------------------------------------------------
vba interoperability for OOo