dlls/dbghelp/path.c

   1 /*
   2  * File path.c - managing path in debugging environments
   3  *
   4  * Copyright (C) 2004, Eric Pouech
   5  *
   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.
  10  *
  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.
  15  *
  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., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  19  */
  20
  21 #include "config.h"
  22 #include <stdlib.h>
  23 #include <stdio.h>
  24 #include <string.h>
  25
  26 #include "dbghelp_private.h"
  27 #include "wine/debug.h"
  28
  29 WINE_DEFAULT_DEBUG_CHANNEL(dbghelp);
  30
  31 static inline BOOL is_sep(char ch) {return ch == '/' || ch == '\\';}
  32
  33 static inline char* file_name(char* str)
  34 {
  35     char*       p;
  36
  37     for (p = str + strlen(str) - 1; p >= str && !is_sep(*p); p--);
  38     return p + 1;
  39 }
  40
  41 /******************************************************************
  42  *              FindDebugInfoFile (DBGHELP.@)
  43  *
  44  */
  45 HANDLE WINAPI FindDebugInfoFile(PSTR FileName, PSTR SymbolPath, PSTR DebugFilePath)
  46 {
  47     HANDLE      h;
  48
  49     h = CreateFileA(DebugFilePath, GENERIC_READ, FILE_SHARE_READ, NULL,
  50                     OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, NULL);
  51     if (h == INVALID_HANDLE_VALUE)
  52     {
  53         if (!SearchPathA(SymbolPath, file_name(FileName), NULL, MAX_PATH, DebugFilePath, NULL))
  54             return NULL;
  55         h = CreateFileA(DebugFilePath, GENERIC_READ, FILE_SHARE_READ, NULL,
  56                         OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, NULL);
  57     }
  58     return (h == INVALID_HANDLE_VALUE) ? NULL : h;
  59 }
  60
  61 /******************************************************************
  62  *              FindDebugInfoFileEx (DBGHELP.@)
  63  *
  64  */
  65 HANDLE WINAPI FindDebugInfoFileEx(PSTR FileName, PSTR SymbolPath,
  66                                   PSTR DebugFilePath,
  67                                   PFIND_DEBUG_FILE_CALLBACK Callback,
  68                                   PVOID CallerData)
  69 {
  70     FIXME("(%s %s %p %p %p): stub\n",
  71           FileName, SymbolPath, DebugFilePath, Callback, CallerData);
  72     return NULL;
  73 }
  74
  75 /******************************************************************
  76  *              FindExecutableImage (DBGHELP.@)
  77  *
  78  */
  79 HANDLE WINAPI FindExecutableImage(PSTR FileName, PSTR SymbolPath, PSTR ImageFilePath)
  80 {
  81     HANDLE h;
  82     if (!SearchPathA(SymbolPath, FileName, NULL, MAX_PATH, ImageFilePath, NULL))
  83         return NULL;
  84     h = CreateFileA(ImageFilePath, GENERIC_READ, FILE_SHARE_READ, NULL,
  85                     OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, NULL);
  86     return (h == INVALID_HANDLE_VALUE) ? NULL : h;
  87 }
  88
  89 /***********************************************************************
  90  *           MakeSureDirectoryPathExists (DBGHELP.@)
  91  */
  92 BOOL WINAPI MakeSureDirectoryPathExists(LPCSTR DirPath)
  93 {
  94     if (CreateDirectoryA(DirPath, NULL)) return TRUE;
  95     if (GetLastError() == ERROR_ALREADY_EXISTS)
  96     {
  97         SetLastError(ERROR_SUCCESS);
  98         return TRUE;
  99     }
 100     return FALSE;
 101 }
 102
 103 /******************************************************************
 104  *              SymMatchFileName (DBGHELP.@)
 105  *
 106  */
 107 BOOL WINAPI SymMatchFileName(char* file, char* match,
 108                              char** filestop, char** matchstop)
 109 {
 110     char*       fptr;
 111     char*       mptr;
 112
 113     TRACE("(%s %s %p %p)\n", file, match, filestop, matchstop);
 114
 115     fptr = file + strlen(file) - 1;
 116     mptr = match + strlen(match) - 1;
 117
 118     while (fptr >= file && mptr >= match)
 119     {
 120         if (toupper(*fptr) != toupper(*mptr) && !(is_sep(*fptr) && is_sep(*mptr)))
 121             break;
 122         fptr--; mptr--;
 123     }
 124     if (filestop) *filestop = fptr;
 125     if (matchstop) *matchstop = mptr;
 126
 127     return mptr == match - 1;
 128 }
 129
 130 static BOOL do_search(const char* file, char* buffer,
 131                       PENUMDIRTREE_CALLBACK cb, void* user)
 132 {
 133     HANDLE              h;
 134     WIN32_FIND_DATAA    fd;
 135     unsigned            pos;
 136     BOOL                found = FALSE;
 137
 138     pos = strlen(buffer);
 139     if (buffer[pos - 1] != '\\') buffer[pos++] = '\\';
 140     strcpy(buffer + pos, "*.*");
 141     if ((h = FindFirstFileA(buffer, &fd)) == INVALID_HANDLE_VALUE)
 142         return FALSE;
 143     /* doc doesn't specify how the tree is enumerated...
 144      * doing a depth first based on, but may be wrong
 145      */
 146     do
 147     {
 148         if (!strcmp(fd.cFileName, ".") || !strcmp(fd.cFileName, "..")) continue;
 149
 150         strcpy(buffer + pos, fd.cFileName);
 151         if (fd.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY)
 152             found = do_search(file, buffer, cb, user);
 153         else if (SymMatchFileName(buffer, (char*)file, NULL, NULL))
 154         {
 155             if (!cb || cb(buffer, user)) found = TRUE;
 156         }
 157     } while (!found && FindNextFileA(h, &fd));
 158     if (!found) buffer[--pos] = '\0';
 159     FindClose(h);
 160
 161     return found;
 162 }
 163
 164 /***********************************************************************
 165  *           SearchTreeForFile (DBGHELP.@)
 166  */
 167 BOOL WINAPI SearchTreeForFile(LPSTR root, LPSTR file, LPSTR buffer)
 168 {
 169     TRACE("(%s, %s, %p)\n",
 170           debugstr_a(root), debugstr_a(file), buffer);
 171     strcpy(buffer, root);
 172     return do_search(file, buffer, NULL, NULL);
 173 }
 174
 175 /******************************************************************
 176  *              EnumDirTree (DBGHELP.@)
 177  *
 178  *
 179  */
 180 BOOL WINAPI EnumDirTree(HANDLE hProcess, PCSTR root, PCSTR file,
 181                         LPSTR buffer, PENUMDIRTREE_CALLBACK cb, void* user)
 182 {
 183     TRACE("(%p %s %s %p %p %p)\n", hProcess, root, file, buffer, cb, user);
 184
 185     strcpy(buffer, root);
 186     return do_search(file, buffer, cb, user);
 187 }
 188
 189 struct sffip
 190 {
 191     PVOID                       id;
 192     DWORD                       two;
 193     DWORD                       three;
 194     DWORD                       flags;
 195     PFINDFILEINPATHCALLBACK     cb;
 196     void*                       user;
 197 };
 198
 199 static BOOL CALLBACK sffip_cb(LPCSTR buffer, void* user)
 200 {
 201     struct sffip*       s = (struct sffip*)user;
 202
 203     /* FIXME: should check that id/two/three match the file pointed
 204      * by buffer
 205      */
 206     /* yes, EnumDirTree and SymFindFileInPath callbacks use the opposite
 207      * convention to stop/continue enumeration. sigh.
 208      */
 209     return !(s->cb)((char*)buffer, s->user);
 210 }
 211
 212 /******************************************************************
 213  *              SymFindFileInPath (DBGHELP.@)
 214  *
 215  */
 216 BOOL WINAPI SymFindFileInPath(HANDLE hProcess, LPSTR searchPath, LPSTR file,
 217                               PVOID id, DWORD two, DWORD three, DWORD flags,
 218                               LPSTR buffer, PFINDFILEINPATHCALLBACK cb,
 219                               PVOID user)
 220 {
 221     struct sffip        s;
 222     struct process*     pcs = process_find_by_handle(hProcess);
 223     char                tmp[MAX_PATH];
 224     char*               ptr;
 225
 226     TRACE("(%p %s %s %p %08lx %08lx %08lx %p %p %p)\n",
 227           hProcess, searchPath, file, id, two, three, flags,
 228           buffer, cb, user);
 229
 230     if (!pcs) return FALSE;
 231     if (!searchPath) searchPath = pcs->search_path;
 232
 233     s.id = id;
 234     s.two = two;
 235     s.three = three;
 236     s.flags = flags;
 237     s.cb = cb;
 238     s.user = user;
 239
 240     file = file_name(file);
 241
 242     while (searchPath)
 243     {
 244         ptr = strchr(searchPath, ';');
 245         if (ptr)
 246         {
 247             memcpy(tmp, searchPath, ptr - searchPath);
 248             tmp[ptr - searchPath] = 0;
 249             searchPath = ptr + 1;
 250         }
 251         else
 252         {
 253             strcpy(tmp, searchPath);
 254             searchPath = NULL;
 255         }
 256         if (EnumDirTree(hProcess, tmp, file, buffer, sffip_cb, &s)) return TRUE;
 257     }
 258     return FALSE;
 259 }