2 * Implementation of the AppSearch action of the Microsoft Installer (msi.dll)
4 * Copyright 2005 Juan Lang
6 * This library is free software; you can redistribute it and/or
7 * modify it under the terms of the GNU Lesser General Public
8 * License as published by the Free Software Foundation; either
9 * version 2.1 of the License, or (at your option) any later version.
11 * This library is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 * Lesser General Public License for more details.
16 * You should have received a copy of the GNU Lesser General Public
17 * License along with this library; if not, write to the Free Software
18 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
32 #include "wine/unicode.h"
33 #include "wine/debug.h"
36 WINE_DEFAULT_DEBUG_CHANNEL(msi);
38 typedef struct tagMSISIGNATURE
40 LPCWSTR Name; /* NOT owned by this structure */
53 void msi_parse_version_string(LPCWSTR verStr, PDWORD ms, PDWORD ls)
56 int x1 = 0, x2 = 0, x3 = 0, x4 = 0;
59 ptr = strchrW(verStr, '.');
63 ptr = strchrW(ptr + 1, '.');
68 ptr = strchrW(ptr + 1, '.');
72 /* FIXME: byte-order dependent? */
77 /* Fills in sig with the values from the Signature table, where name is the
78 * signature to find. Upon return, sig->File will be NULL if the record is not
79 * found, and not NULL if it is found.
80 * Warning: clears all fields in sig!
81 * Returns ERROR_SUCCESS upon success (where not finding the record counts as
82 * success), something else on error.
84 static UINT ACTION_AppSearchGetSignature(MSIPACKAGE *package, MSISIGNATURE *sig, LPCWSTR name)
86 static const WCHAR query[] = {
87 's','e','l','e','c','t',' ','*',' ',
89 'S','i','g','n','a','t','u','r','e',' ',
90 'w','h','e','r','e',' ','S','i','g','n','a','t','u','r','e',' ','=',' ',
92 LPWSTR minVersion, maxVersion;
96 TRACE("package %p, sig %p\n", package, sig);
98 memset(sig, 0, sizeof(*sig));
100 row = MSI_QueryGetRecord( package->db, query, name );
103 TRACE("failed to query signature for %s\n", debugstr_w(name));
104 return ERROR_SUCCESS;
108 sig->File = msi_dup_record_field(row,2);
109 minVersion = msi_dup_record_field(row,3);
112 msi_parse_version_string( minVersion, &sig->MinVersionMS, &sig->MinVersionLS );
113 msi_free( minVersion );
115 maxVersion = msi_dup_record_field(row,4);
118 msi_parse_version_string( maxVersion, &sig->MaxVersionMS, &sig->MaxVersionLS );
119 msi_free( maxVersion );
121 sig->MinSize = MSI_RecordGetInteger(row,5);
122 if (sig->MinSize == MSI_NULL_INTEGER)
124 sig->MaxSize = MSI_RecordGetInteger(row,6);
125 if (sig->MaxSize == MSI_NULL_INTEGER)
127 sig->Languages = msi_dup_record_field(row,9);
128 time = MSI_RecordGetInteger(row,7);
129 if (time != MSI_NULL_INTEGER)
130 DosDateTimeToFileTime(HIWORD(time), LOWORD(time), &sig->MinTime);
131 time = MSI_RecordGetInteger(row,8);
132 if (time != MSI_NULL_INTEGER)
133 DosDateTimeToFileTime(HIWORD(time), LOWORD(time), &sig->MaxTime);
135 TRACE("Found file name %s for Signature_ %s;\n",
136 debugstr_w(sig->File), debugstr_w(name));
137 TRACE("MinVersion is %d.%d.%d.%d\n", HIWORD(sig->MinVersionMS),
138 LOWORD(sig->MinVersionMS), HIWORD(sig->MinVersionLS),
139 LOWORD(sig->MinVersionLS));
140 TRACE("MaxVersion is %d.%d.%d.%d\n", HIWORD(sig->MaxVersionMS),
141 LOWORD(sig->MaxVersionMS), HIWORD(sig->MaxVersionLS),
142 LOWORD(sig->MaxVersionLS));
143 TRACE("MinSize is %d, MaxSize is %d;\n", sig->MinSize, sig->MaxSize);
144 TRACE("Languages is %s\n", debugstr_w(sig->Languages));
146 msiobj_release( &row->hdr );
148 return ERROR_SUCCESS;
151 /* Frees any memory allocated in sig */
152 static void ACTION_FreeSignature(MSISIGNATURE *sig)
155 msi_free(sig->Languages);
158 static LPWSTR app_search_file(LPWSTR path, MSISIGNATURE *sig)
160 VS_FIXEDFILEINFO *info;
161 DWORD attr, handle, size;
167 PathRemoveFileSpecW(path);
168 PathAddBackslashW(path);
170 attr = GetFileAttributesW(path);
171 if (attr != INVALID_FILE_ATTRIBUTES &&
172 (attr & FILE_ATTRIBUTE_DIRECTORY))
173 return strdupW(path);
178 attr = GetFileAttributesW(path);
179 if (attr == INVALID_FILE_ATTRIBUTES ||
180 (attr & FILE_ATTRIBUTE_DIRECTORY))
183 size = GetFileVersionInfoSizeW(path, &handle);
185 return strdupW(path);
187 buffer = msi_alloc(size);
191 if (!GetFileVersionInfoW(path, 0, size, buffer))
194 if (!VerQueryValueW(buffer, szBackSlash, (LPVOID)&info, &size) || !info)
197 if (sig->MinVersionLS || sig->MinVersionMS)
199 if (info->dwFileVersionMS < sig->MinVersionMS)
202 if (info->dwFileVersionMS == sig->MinVersionMS &&
203 info->dwFileVersionLS < sig->MinVersionLS)
207 if (sig->MaxVersionLS || sig->MaxVersionMS)
209 if (info->dwFileVersionMS > sig->MaxVersionMS)
212 if (info->dwFileVersionMS == sig->MaxVersionMS &&
213 info->dwFileVersionLS > sig->MaxVersionLS)
224 static UINT ACTION_AppSearchComponents(MSIPACKAGE *package, LPWSTR *appValue, MSISIGNATURE *sig)
226 static const WCHAR query[] = {
227 'S','E','L','E','C','T',' ','*',' ',
229 '`','C','o','m','p','L','o','c','a','t','o','r','`',' ',
230 'W','H','E','R','E',' ','`','S','i','g','n','a','t','u','r','e','_','`',' ','=',' ',
231 '\'','%','s','\'',0};
232 static const WCHAR sigquery[] = {
233 'S','E','L','E','C','T',' ','*',' ','F','R','O','M',' ',
234 '`','S','i','g','n','a','t','u','r','e','`',' ',
235 'W','H','E','R','E',' ','`','S','i','g','n','a','t','u','r','e','`',' ','=',' ',
236 '\'','%','s','\'',0};
238 MSIRECORD *row, *rec;
239 LPCWSTR signature, guid;
240 BOOL sigpresent = TRUE;
243 WCHAR path[MAX_PATH];
244 DWORD size = MAX_PATH;
248 TRACE("%s\n", debugstr_w(sig->Name));
252 row = MSI_QueryGetRecord(package->db, query, sig->Name);
255 TRACE("failed to query CompLocator for %s\n", debugstr_w(sig->Name));
256 return ERROR_SUCCESS;
259 signature = MSI_RecordGetString(row, 1);
260 guid = MSI_RecordGetString(row, 2);
261 type = MSI_RecordGetInteger(row, 3);
263 rec = MSI_QueryGetRecord(package->db, sigquery, signature);
268 MsiLocateComponentW(guid, path, &size);
272 attr = GetFileAttributesW(path);
273 if (attr == INVALID_FILE_ATTRIBUTES)
276 isdir = (attr & FILE_ATTRIBUTE_DIRECTORY);
278 if (type != msidbLocatorTypeDirectory && sigpresent && !isdir)
280 *appValue = app_search_file(path, sig);
282 else if (!sigpresent && (type != msidbLocatorTypeDirectory || isdir))
284 if (type == msidbLocatorTypeFileName)
286 ptr = strrchrW(path, '\\');
290 PathAddBackslashW(path);
292 *appValue = strdupW(path);
296 PathAddBackslashW(path);
297 lstrcatW(path, MSI_RecordGetString(rec, 2));
299 attr = GetFileAttributesW(path);
300 if (attr != INVALID_FILE_ATTRIBUTES &&
301 !(attr & FILE_ATTRIBUTE_DIRECTORY))
302 *appValue = strdupW(path);
306 if (rec) msiobj_release(&rec->hdr);
307 msiobj_release(&row->hdr);
308 return ERROR_SUCCESS;
311 static void ACTION_ConvertRegValue(DWORD regType, const BYTE *value, DWORD sz,
314 static const WCHAR dwordFmt[] = { '#','%','d','\0' };
315 static const WCHAR binPre[] = { '#','x','\0' };
316 static const WCHAR binFmt[] = { '%','0','2','X','\0' };
323 if (*(LPCWSTR)value == '#')
325 /* escape leading pound with another */
326 *appValue = msi_alloc(sz + sizeof(WCHAR));
327 (*appValue)[0] = '#';
328 strcpyW(*appValue + 1, (LPCWSTR)value);
332 *appValue = msi_alloc(sz);
333 strcpyW(*appValue, (LPCWSTR)value);
337 /* 7 chars for digits, 1 for NULL, 1 for #, and 1 for sign
340 *appValue = msi_alloc(10 * sizeof(WCHAR));
341 sprintfW(*appValue, dwordFmt, *(const DWORD *)value);
344 sz = ExpandEnvironmentStringsW((LPCWSTR)value, NULL, 0);
345 *appValue = msi_alloc(sz * sizeof(WCHAR));
346 ExpandEnvironmentStringsW((LPCWSTR)value, *appValue, sz);
350 *appValue = msi_alloc((sz * 2 + 3) * sizeof(WCHAR));
351 lstrcpyW(*appValue, binPre);
352 ptr = *appValue + lstrlenW(binPre);
353 for (i = 0; i < sz; i++, ptr += 2)
354 sprintfW(ptr, binFmt, value[i]);
357 WARN("unimplemented for values of type %d\n", regType);
362 static UINT ACTION_SearchDirectory(MSIPACKAGE *package, MSISIGNATURE *sig,
363 LPCWSTR path, int depth, LPWSTR *appValue);
365 static UINT ACTION_AppSearchReg(MSIPACKAGE *package, LPWSTR *appValue, MSISIGNATURE *sig)
367 static const WCHAR query[] = {
368 's','e','l','e','c','t',' ','*',' ',
370 'R','e','g','L','o','c','a','t','o','r',' ',
371 'w','h','e','r','e',' ',
372 'S','i','g','n','a','t','u','r','e','_',' ','=',' ', '\'','%','s','\'',0};
373 LPWSTR keyPath = NULL, valueName = NULL;
374 LPWSTR deformatted = NULL;
375 LPWSTR ptr = NULL, end;
377 HKEY rootKey, key = NULL;
378 DWORD sz = 0, regType;
383 TRACE("%s\n", debugstr_w(sig->Name));
387 row = MSI_QueryGetRecord( package->db, query, sig->Name );
390 TRACE("failed to query RegLocator for %s\n", debugstr_w(sig->Name));
391 return ERROR_SUCCESS;
394 root = MSI_RecordGetInteger(row,2);
395 keyPath = msi_dup_record_field(row,3);
396 valueName = msi_dup_record_field(row,4);
397 type = MSI_RecordGetInteger(row,5);
399 deformat_string(package, keyPath, &deformatted);
403 case msidbRegistryRootClassesRoot:
404 rootKey = HKEY_CLASSES_ROOT;
406 case msidbRegistryRootCurrentUser:
407 rootKey = HKEY_CURRENT_USER;
409 case msidbRegistryRootLocalMachine:
410 rootKey = HKEY_LOCAL_MACHINE;
412 case msidbRegistryRootUsers:
413 rootKey = HKEY_USERS;
416 WARN("Unknown root key %d\n", root);
420 rc = RegOpenKeyW(rootKey, deformatted, &key);
423 TRACE("RegOpenKeyW returned %d\n", rc);
427 rc = RegQueryValueExW(key, valueName, NULL, NULL, NULL, &sz);
430 TRACE("RegQueryValueExW returned %d\n", rc);
433 /* FIXME: sanity-check sz before allocating (is there an upper-limit
434 * on the value of a property?)
436 value = msi_alloc( sz );
437 rc = RegQueryValueExW(key, valueName, NULL, ®Type, value, &sz);
440 TRACE("RegQueryValueExW returned %d\n", rc);
444 /* bail out if the registry key is empty */
448 if ((regType == REG_SZ || regType == REG_EXPAND_SZ) &&
449 (ptr = strchrW((LPWSTR)value, '"')) && (end = strchrW(++ptr, '"')))
456 case msidbLocatorTypeDirectory:
457 rc = ACTION_SearchDirectory(package, sig, ptr, 0, appValue);
459 case msidbLocatorTypeFileName:
460 *appValue = app_search_file(ptr, sig);
462 case msidbLocatorTypeRawValue:
463 ACTION_ConvertRegValue(regType, value, sz, appValue);
466 FIXME("unimplemented for type %d (key path %s, value %s)\n",
467 type, debugstr_w(keyPath), debugstr_w(valueName));
474 msi_free( valueName );
475 msi_free( deformatted );
477 msiobj_release(&row->hdr);
479 return ERROR_SUCCESS;
482 static LPWSTR get_ini_field(LPWSTR buf, int field)
491 while ((end = strchrW(beg, ',')) && i < field)
494 while (*beg && *beg == ' ')
500 end = strchrW(beg, ',');
502 end = beg + lstrlenW(beg);
508 static UINT ACTION_AppSearchIni(MSIPACKAGE *package, LPWSTR *appValue,
511 static const WCHAR query[] = {
512 's','e','l','e','c','t',' ','*',' ',
514 'I','n','i','L','o','c','a','t','o','r',' ',
515 'w','h','e','r','e',' ',
516 'S','i','g','n','a','t','u','r','e','_',' ','=',' ','\'','%','s','\'',0};
518 LPWSTR fileName, section, key;
522 TRACE("%s\n", debugstr_w(sig->Name));
526 row = MSI_QueryGetRecord( package->db, query, sig->Name );
529 TRACE("failed to query IniLocator for %s\n", debugstr_w(sig->Name));
530 return ERROR_SUCCESS;
533 fileName = msi_dup_record_field(row, 2);
534 section = msi_dup_record_field(row, 3);
535 key = msi_dup_record_field(row, 4);
536 field = MSI_RecordGetInteger(row, 5);
537 type = MSI_RecordGetInteger(row, 6);
538 if (field == MSI_NULL_INTEGER)
540 if (type == MSI_NULL_INTEGER)
543 GetPrivateProfileStringW(section, key, NULL, buf, MAX_PATH, fileName);
548 case msidbLocatorTypeDirectory:
549 ACTION_SearchDirectory(package, sig, buf, 0, appValue);
551 case msidbLocatorTypeFileName:
552 *appValue = app_search_file(buf, sig);
554 case msidbLocatorTypeRawValue:
555 *appValue = get_ini_field(buf, field);
564 msiobj_release(&row->hdr);
566 return ERROR_SUCCESS;
569 /* Expands the value in src into a path without property names and only
570 * containing long path names into dst. Replaces at most len characters of dst,
571 * and always NULL-terminates dst if dst is not NULL and len >= 1.
573 * Assumes src and dst are non-overlapping.
574 * FIXME: return code probably needed:
575 * - what does AppSearch return if the table values are invalid?
576 * - what if dst is too small?
578 static void ACTION_ExpandAnyPath(MSIPACKAGE *package, WCHAR *src, WCHAR *dst,
581 WCHAR *ptr, *deformatted;
583 if (!src || !dst || !len)
585 if (dst) *dst = '\0';
591 /* Ignore the short portion of the path */
592 if ((ptr = strchrW(src, '|')))
597 deformat_string(package, ptr, &deformatted);
598 if (!deformatted || strlenW(deformatted) > len - 1)
600 msi_free(deformatted);
604 lstrcpyW(dst, deformatted);
605 dst[lstrlenW(deformatted)] = '\0';
606 msi_free(deformatted);
609 /* Sets *matches to whether the file (whose path is filePath) matches the
610 * versions set in sig.
611 * Return ERROR_SUCCESS in case of success (whether or not the file matches),
612 * something else if an install-halting error occurs.
614 static UINT ACTION_FileVersionMatches(const MSISIGNATURE *sig, LPCWSTR filePath,
617 UINT rc = ERROR_SUCCESS;
622 FIXME(": need to check version for languages %s\n",
623 debugstr_w(sig->Languages));
627 DWORD zero, size = GetFileVersionInfoSizeW(filePath, &zero);
631 LPVOID buf = msi_alloc( size);
636 LPVOID subBlock = NULL;
638 if (GetFileVersionInfoW(filePath, 0, size, buf))
639 VerQueryValueW(buf, szBackSlash, &subBlock, &versionLen);
642 VS_FIXEDFILEINFO *info = subBlock;
644 TRACE("Comparing file version %d.%d.%d.%d:\n",
645 HIWORD(info->dwFileVersionMS),
646 LOWORD(info->dwFileVersionMS),
647 HIWORD(info->dwFileVersionLS),
648 LOWORD(info->dwFileVersionLS));
649 if (info->dwFileVersionMS < sig->MinVersionMS
650 || (info->dwFileVersionMS == sig->MinVersionMS &&
651 info->dwFileVersionLS < sig->MinVersionLS))
653 TRACE("Less than minimum version %d.%d.%d.%d\n",
654 HIWORD(sig->MinVersionMS),
655 LOWORD(sig->MinVersionMS),
656 HIWORD(sig->MinVersionLS),
657 LOWORD(sig->MinVersionLS));
659 else if ((sig->MaxVersionMS || sig->MaxVersionLS) &&
660 (info->dwFileVersionMS > sig->MaxVersionMS ||
661 (info->dwFileVersionMS == sig->MaxVersionMS &&
662 info->dwFileVersionLS > sig->MaxVersionLS)))
664 TRACE("Greater than maximum version %d.%d.%d.%d\n",
665 HIWORD(sig->MaxVersionMS),
666 LOWORD(sig->MaxVersionMS),
667 HIWORD(sig->MaxVersionLS),
668 LOWORD(sig->MaxVersionLS));
676 rc = ERROR_OUTOFMEMORY;
682 /* Sets *matches to whether the file in findData matches that in sig.
683 * fullFilePath is assumed to be the full path of the file specified in
684 * findData, which may be necessary to compare the version.
685 * Return ERROR_SUCCESS in case of success (whether or not the file matches),
686 * something else if an install-halting error occurs.
688 static UINT ACTION_FileMatchesSig(const MSISIGNATURE *sig,
689 const WIN32_FIND_DATAW *findData, LPCWSTR fullFilePath, BOOL *matches)
691 UINT rc = ERROR_SUCCESS;
694 /* assumes the caller has already ensured the filenames match, so check
697 if (sig->MinTime.dwLowDateTime || sig->MinTime.dwHighDateTime)
699 if (findData->ftCreationTime.dwHighDateTime <
700 sig->MinTime.dwHighDateTime ||
701 (findData->ftCreationTime.dwHighDateTime == sig->MinTime.dwHighDateTime
702 && findData->ftCreationTime.dwLowDateTime <
703 sig->MinTime.dwLowDateTime))
706 if (*matches && (sig->MaxTime.dwLowDateTime || sig->MaxTime.dwHighDateTime))
708 if (findData->ftCreationTime.dwHighDateTime >
709 sig->MaxTime.dwHighDateTime ||
710 (findData->ftCreationTime.dwHighDateTime == sig->MaxTime.dwHighDateTime
711 && findData->ftCreationTime.dwLowDateTime >
712 sig->MaxTime.dwLowDateTime))
715 if (*matches && sig->MinSize && findData->nFileSizeLow < sig->MinSize)
717 if (*matches && sig->MaxSize && findData->nFileSizeLow > sig->MaxSize)
719 if (*matches && (sig->MinVersionMS || sig->MinVersionLS ||
720 sig->MaxVersionMS || sig->MaxVersionLS))
721 rc = ACTION_FileVersionMatches(sig, fullFilePath, matches);
725 /* Recursively searches the directory dir for files that match the signature
726 * sig, up to (depth + 1) levels deep. That is, if depth is 0, it searches dir
727 * (and only dir). If depth is 1, searches dir and its immediate
729 * Assumes sig->File is not NULL.
730 * Returns ERROR_SUCCESS on success (which may include non-critical errors),
731 * something else on failures which should halt the install.
733 static UINT ACTION_RecurseSearchDirectory(MSIPACKAGE *package, LPWSTR *appValue,
734 MSISIGNATURE *sig, LPCWSTR dir, int depth)
737 WIN32_FIND_DATAW findData;
738 UINT rc = ERROR_SUCCESS;
739 size_t dirLen = lstrlenW(dir), fileLen = lstrlenW(sig->File);
740 WCHAR subpath[MAX_PATH];
744 static const WCHAR starDotStarW[] = { '*','.','*',0 };
746 TRACE("Searching directory %s for file %s, depth %d\n", debugstr_w(dir),
747 debugstr_w(sig->File), depth);
750 return ERROR_SUCCESS;
753 /* We need the buffer in both paths below, so go ahead and allocate it
754 * here. Add two because we might need to add a backslash if the dir name
755 * isn't backslash-terminated.
757 len = dirLen + max(fileLen, strlenW(starDotStarW)) + 2;
758 buf = msi_alloc(len * sizeof(WCHAR));
760 return ERROR_OUTOFMEMORY;
763 PathAddBackslashW(buf);
764 lstrcatW(buf, sig->File);
766 hFind = FindFirstFileW(buf, &findData);
767 if (hFind != INVALID_HANDLE_VALUE)
769 if (!(findData.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY))
773 rc = ACTION_FileMatchesSig(sig, &findData, buf, &matches);
774 if (rc == ERROR_SUCCESS && matches)
776 TRACE("found file, returning %s\n", debugstr_w(buf));
783 if (rc == ERROR_SUCCESS && !*appValue)
786 PathAddBackslashW(buf);
787 lstrcatW(buf, starDotStarW);
789 hFind = FindFirstFileW(buf, &findData);
790 if (hFind != INVALID_HANDLE_VALUE)
792 if (findData.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY &&
793 lstrcmpW(findData.cFileName, szDot) &&
794 lstrcmpW(findData.cFileName, szDotDot))
796 lstrcpyW(subpath, dir);
797 PathAppendW(subpath, findData.cFileName);
798 rc = ACTION_RecurseSearchDirectory(package, appValue, sig,
802 while (rc == ERROR_SUCCESS && !*appValue &&
803 FindNextFileW(hFind, &findData) != 0)
805 if (!lstrcmpW(findData.cFileName, szDot) ||
806 !lstrcmpW(findData.cFileName, szDotDot))
809 lstrcpyW(subpath, dir);
810 PathAppendW(subpath, findData.cFileName);
811 if (findData.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY)
812 rc = ACTION_RecurseSearchDirectory(package, appValue,
813 sig, subpath, depth - 1);
820 if (*appValue != buf)
826 static UINT ACTION_CheckDirectory(MSIPACKAGE *package, LPCWSTR dir,
829 DWORD attr = GetFileAttributesW(dir);
831 if (attr != INVALID_FILE_ATTRIBUTES && (attr & FILE_ATTRIBUTE_DIRECTORY))
833 TRACE("directory exists, returning %s\n", debugstr_w(dir));
834 *appValue = strdupW(dir);
837 return ERROR_SUCCESS;
840 static BOOL ACTION_IsFullPath(LPCWSTR path)
842 WCHAR first = toupperW(path[0]);
845 if (first >= 'A' && first <= 'Z' && path[1] == ':')
847 else if (path[0] == '\\' && path[1] == '\\')
854 static UINT ACTION_SearchDirectory(MSIPACKAGE *package, MSISIGNATURE *sig,
855 LPCWSTR path, int depth, LPWSTR *appValue)
861 TRACE("%p, %p, %s, %d, %p\n", package, sig, debugstr_w(path), depth,
864 if (ACTION_IsFullPath(path))
867 rc = ACTION_RecurseSearchDirectory(package, &val, sig, path, depth);
870 /* Recursively searching a directory makes no sense when the
871 * directory to search is the thing you're trying to find.
873 rc = ACTION_CheckDirectory(package, path, &val);
878 WCHAR pathWithDrive[MAX_PATH] = { 'C',':','\\',0 };
879 DWORD drives = GetLogicalDrives();
883 for (i = 0; rc == ERROR_SUCCESS && !val && i < 26; i++)
885 if (!(drives & (1 << i)))
888 pathWithDrive[0] = 'A' + i;
889 if (GetDriveTypeW(pathWithDrive) != DRIVE_FIXED)
892 lstrcpynW(pathWithDrive + 3, path,
893 sizeof(pathWithDrive) / sizeof(pathWithDrive[0]) - 3);
896 rc = ACTION_RecurseSearchDirectory(package, &val, sig,
897 pathWithDrive, depth);
899 rc = ACTION_CheckDirectory(package, pathWithDrive, &val);
903 attr = GetFileAttributesW(val);
904 if (attr != INVALID_FILE_ATTRIBUTES &&
905 (attr & FILE_ATTRIBUTE_DIRECTORY) &&
906 val && val[lstrlenW(val) - 1] != '\\')
908 val = msi_realloc(val, (lstrlenW(val) + 2) * sizeof(WCHAR));
910 rc = ERROR_OUTOFMEMORY;
912 PathAddBackslashW(val);
917 TRACE("returning %d\n", rc);
921 static UINT ACTION_AppSearchSigName(MSIPACKAGE *package, LPCWSTR sigName,
922 MSISIGNATURE *sig, LPWSTR *appValue);
924 static UINT ACTION_AppSearchDr(MSIPACKAGE *package, LPWSTR *appValue, MSISIGNATURE *sig)
926 static const WCHAR query[] = {
927 's','e','l','e','c','t',' ','*',' ',
929 'D','r','L','o','c','a','t','o','r',' ',
930 'w','h','e','r','e',' ',
931 'S','i','g','n','a','t','u','r','e','_',' ','=',' ', '\'','%','s','\'',0};
932 LPWSTR parent = NULL;
934 WCHAR path[MAX_PATH];
935 WCHAR expanded[MAX_PATH];
941 TRACE("%s\n", debugstr_w(sig->Name));
945 row = MSI_QueryGetRecord( package->db, query, sig->Name );
948 TRACE("failed to query DrLocator for %s\n", debugstr_w(sig->Name));
949 return ERROR_SUCCESS;
952 /* check whether parent is set */
953 parentName = MSI_RecordGetString(row, 2);
956 MSISIGNATURE parentSig;
958 rc = ACTION_AppSearchSigName(package, parentName, &parentSig, &parent);
959 ACTION_FreeSignature(&parentSig);
962 msiobj_release(&row->hdr);
963 return ERROR_SUCCESS;
968 MSI_RecordGetStringW(row, 3, path, &sz);
970 if (MSI_RecordIsNull(row,4))
973 depth = MSI_RecordGetInteger(row,4);
976 ACTION_ExpandAnyPath(package, path, expanded, MAX_PATH);
978 strcpyW(expanded, path);
982 attr = GetFileAttributesW(parent);
983 if (attr != INVALID_FILE_ATTRIBUTES &&
984 !(attr & FILE_ATTRIBUTE_DIRECTORY))
986 PathRemoveFileSpecW(parent);
987 PathAddBackslashW(parent);
990 strcpyW(path, parent);
991 strcatW(path, expanded);
994 strcpyW(path, expanded);
996 PathAddBackslashW(path);
998 rc = ACTION_SearchDirectory(package, sig, path, depth, appValue);
1001 msiobj_release(&row->hdr);
1003 TRACE("returning %d\n", rc);
1007 static UINT ACTION_AppSearchSigName(MSIPACKAGE *package, LPCWSTR sigName,
1008 MSISIGNATURE *sig, LPWSTR *appValue)
1013 rc = ACTION_AppSearchGetSignature(package, sig, sigName);
1014 if (rc == ERROR_SUCCESS)
1016 rc = ACTION_AppSearchComponents(package, appValue, sig);
1017 if (rc == ERROR_SUCCESS && !*appValue)
1019 rc = ACTION_AppSearchReg(package, appValue, sig);
1020 if (rc == ERROR_SUCCESS && !*appValue)
1022 rc = ACTION_AppSearchIni(package, appValue, sig);
1023 if (rc == ERROR_SUCCESS && !*appValue)
1024 rc = ACTION_AppSearchDr(package, appValue, sig);
1031 static UINT iterate_appsearch(MSIRECORD *row, LPVOID param)
1033 MSIPACKAGE *package = param;
1034 LPCWSTR propName, sigName;
1035 LPWSTR value = NULL;
1040 /* get property and signature */
1041 propName = MSI_RecordGetString(row, 1);
1042 sigName = MSI_RecordGetString(row, 2);
1044 TRACE("%s %s\n", debugstr_w(propName), debugstr_w(sigName));
1046 r = ACTION_AppSearchSigName(package, sigName, &sig, &value);
1049 r = msi_set_property( package->db, propName, value );
1050 if (r == ERROR_SUCCESS && !strcmpW( propName, cszSourceDir ))
1051 msi_reset_folders( package, TRUE );
1055 ACTION_FreeSignature(&sig);
1057 uirow = MSI_CreateRecord( 2 );
1058 MSI_RecordSetStringW( uirow, 1, propName );
1059 MSI_RecordSetStringW( uirow, 2, sigName );
1060 ui_actiondata( package, szAppSearch, uirow );
1061 msiobj_release( &uirow->hdr );
1066 UINT ACTION_AppSearch(MSIPACKAGE *package)
1068 static const WCHAR query[] = {
1069 's','e','l','e','c','t',' ','*',' ',
1070 'f','r','o','m',' ',
1071 'A','p','p','S','e','a','r','c','h',0};
1072 MSIQUERY *view = NULL;
1075 if (check_unique_action(package, szAppSearch))
1077 TRACE("Skipping AppSearch action: already done in UI sequence\n");
1078 return ERROR_SUCCESS;
1081 register_unique_action(package, szAppSearch);
1083 r = MSI_OpenQuery( package->db, &view, query );
1084 if (r != ERROR_SUCCESS)
1085 return ERROR_SUCCESS;
1087 r = MSI_IterateRecords( view, NULL, iterate_appsearch, package );
1088 msiobj_release( &view->hdr );
1093 static UINT ITERATE_CCPSearch(MSIRECORD *row, LPVOID param)
1095 MSIPACKAGE *package = param;
1097 LPWSTR value = NULL;
1099 UINT r = ERROR_SUCCESS;
1101 static const WCHAR success[] = {'C','C','P','_','S','u','c','c','e','s','s',0};
1103 signature = MSI_RecordGetString(row, 1);
1105 TRACE("%s\n", debugstr_w(signature));
1107 ACTION_AppSearchSigName(package, signature, &sig, &value);
1110 TRACE("Found signature %s\n", debugstr_w(signature));
1111 msi_set_property(package->db, success, szOne);
1113 r = ERROR_NO_MORE_ITEMS;
1116 ACTION_FreeSignature(&sig);
1121 UINT ACTION_CCPSearch(MSIPACKAGE *package)
1123 static const WCHAR query[] = {
1124 's','e','l','e','c','t',' ','*',' ',
1125 'f','r','o','m',' ',
1126 'C','C','P','S','e','a','r','c','h',0};
1127 MSIQUERY *view = NULL;
1130 if (check_unique_action(package, szCCPSearch))
1132 TRACE("Skipping AppSearch action: already done in UI sequence\n");
1133 return ERROR_SUCCESS;
1136 register_unique_action(package, szCCPSearch);
1138 r = MSI_OpenQuery(package->db, &view, query);
1139 if (r != ERROR_SUCCESS)
1140 return ERROR_SUCCESS;
1142 r = MSI_IterateRecords(view, NULL, ITERATE_CCPSearch, package);
1143 msiobj_release(&view->hdr);