2006-07-07 01:16:37 +08:00
|
|
|
/* hookapi.cc
|
|
|
|
|
2008-03-27 09:50:40 +08:00
|
|
|
Copyright 2005, 2006, 2007, 2008 Red Hat, Inc.
|
2006-07-07 01:16:37 +08:00
|
|
|
|
|
|
|
This file is part of Cygwin.
|
|
|
|
|
|
|
|
This software is a copyrighted work licensed under the terms of the
|
|
|
|
Cygwin license. Please consult the file "CYGWIN_LICENSE" for
|
|
|
|
details. */
|
|
|
|
|
2005-03-23 03:00:31 +08:00
|
|
|
#include "winsup.h"
|
2008-03-27 09:50:40 +08:00
|
|
|
#include <imagehlp.h>
|
|
|
|
#include <stdlib.h>
|
|
|
|
#include <alloca.h>
|
|
|
|
#include "ntdll.h"
|
2005-03-23 03:00:31 +08:00
|
|
|
#include "cygerrno.h"
|
|
|
|
#include "security.h"
|
|
|
|
#include "path.h"
|
|
|
|
#include "fhandler.h"
|
|
|
|
#include "dtable.h"
|
|
|
|
#include "cygheap.h"
|
2008-03-27 09:50:40 +08:00
|
|
|
#include "pinfo.h"
|
2005-03-23 03:00:31 +08:00
|
|
|
|
|
|
|
#define rva(coerce, base, addr) (coerce) ((char *) (base) + (addr))
|
|
|
|
#define rvacyg(coerce, addr) rva (coerce, cygwin_hmodule, addr)
|
|
|
|
|
|
|
|
struct function_hook
|
|
|
|
{
|
|
|
|
const char *name; // Function name, e.g. "DirectDrawCreateEx".
|
|
|
|
const void *hookfn; // Address of your function.
|
|
|
|
void *origfn; // Stored by HookAPICalls, the address of the original function.
|
|
|
|
};
|
|
|
|
|
|
|
|
/* Given an HMODULE, returns a pointer to the PE header */
|
|
|
|
static PIMAGE_NT_HEADERS
|
|
|
|
PEHeaderFromHModule (HMODULE hModule)
|
|
|
|
{
|
2005-09-07 11:10:17 +08:00
|
|
|
PIMAGE_NT_HEADERS pNTHeader;
|
2005-03-23 03:00:31 +08:00
|
|
|
|
|
|
|
if (PIMAGE_DOS_HEADER(hModule) ->e_magic != IMAGE_DOS_SIGNATURE)
|
2005-09-07 11:10:17 +08:00
|
|
|
pNTHeader = NULL;
|
2005-03-23 03:00:31 +08:00
|
|
|
else
|
|
|
|
{
|
|
|
|
pNTHeader = PIMAGE_NT_HEADERS (PBYTE (hModule)
|
|
|
|
+ PIMAGE_DOS_HEADER (hModule) ->e_lfanew);
|
|
|
|
if (pNTHeader->Signature != IMAGE_NT_SIGNATURE)
|
|
|
|
pNTHeader = NULL;
|
|
|
|
}
|
|
|
|
|
|
|
|
return pNTHeader;
|
|
|
|
}
|
|
|
|
|
2006-07-07 01:16:37 +08:00
|
|
|
static long
|
2005-09-08 08:57:12 +08:00
|
|
|
rvadelta (PIMAGE_NT_HEADERS pnt, DWORD import_rva)
|
2005-09-07 11:10:17 +08:00
|
|
|
{
|
|
|
|
PIMAGE_SECTION_HEADER section = (PIMAGE_SECTION_HEADER) (pnt + 1);
|
|
|
|
for (int i = 0; i < pnt->FileHeader.NumberOfSections; i++)
|
|
|
|
if (section[i].VirtualAddress <= import_rva
|
2006-07-07 01:16:37 +08:00
|
|
|
&& (section[i].VirtualAddress + section[i].Misc.VirtualSize) > import_rva)
|
2008-02-01 20:37:51 +08:00
|
|
|
// if (ascii_strncasematch ((char *) section[i].Name, ".idata", IMAGE_SIZEOF_SHORT_NAME))
|
2005-09-07 11:10:17 +08:00
|
|
|
return section[i].VirtualAddress - section[i].PointerToRawData;
|
|
|
|
return -1;
|
|
|
|
}
|
|
|
|
|
2006-07-07 01:16:37 +08:00
|
|
|
static void *
|
2005-03-23 03:00:31 +08:00
|
|
|
putmem (PIMAGE_THUNK_DATA pi, const void *hookfn)
|
|
|
|
{
|
2005-12-17 02:10:10 +08:00
|
|
|
DWORD ofl;
|
|
|
|
if (!VirtualProtect (pi, sizeof (PVOID), PAGE_READWRITE, &ofl) )
|
2005-03-23 03:00:31 +08:00
|
|
|
return NULL;
|
|
|
|
|
|
|
|
void *origfn = (void *) pi->u1.Function;
|
|
|
|
pi->u1.Function = (DWORD) hookfn;
|
|
|
|
|
2005-12-17 02:10:10 +08:00
|
|
|
VirtualProtect (pi, sizeof (PVOID), ofl, &ofl);
|
2005-03-23 03:00:31 +08:00
|
|
|
return origfn;
|
|
|
|
}
|
|
|
|
|
|
|
|
/* Builds stubs for and redirects the IAT for one DLL (pImportDesc) */
|
|
|
|
|
|
|
|
static bool
|
|
|
|
RedirectIAT (function_hook& fh, PIMAGE_IMPORT_DESCRIPTOR pImportDesc,
|
|
|
|
HMODULE hm)
|
|
|
|
{
|
|
|
|
// If no import names table, we can't redirect this, so bail
|
|
|
|
if (pImportDesc->OriginalFirstThunk == 0)
|
|
|
|
return false;
|
|
|
|
|
|
|
|
/* import address table */
|
|
|
|
PIMAGE_THUNK_DATA pt = rva (PIMAGE_THUNK_DATA, hm, pImportDesc->FirstThunk);
|
|
|
|
/* import names table */
|
|
|
|
PIMAGE_THUNK_DATA pn = rva (PIMAGE_THUNK_DATA, hm, pImportDesc->OriginalFirstThunk);
|
|
|
|
|
|
|
|
/* Scan through the IAT, completing the stubs and redirecting the IAT
|
|
|
|
entries to point to the stubs. */
|
|
|
|
for (PIMAGE_THUNK_DATA pi = pt; pn->u1.Ordinal; pi++, pn++)
|
|
|
|
{
|
|
|
|
if (IMAGE_SNAP_BY_ORDINAL (pn->u1.Ordinal) )
|
|
|
|
continue;
|
|
|
|
|
|
|
|
/* import by name */
|
|
|
|
PIMAGE_IMPORT_BY_NAME pimp = rva (PIMAGE_IMPORT_BY_NAME, hm, pn->u1.AddressOfData);
|
|
|
|
|
|
|
|
if (strcmp (fh.name, (char *) pimp->Name) == 0)
|
|
|
|
{
|
|
|
|
fh.origfn = putmem (pi, fh.hookfn);
|
|
|
|
if (!fh.origfn)
|
|
|
|
return false;
|
|
|
|
hook_chain *hc;
|
|
|
|
for (hc = &cygheap->hooks; hc->next; hc = hc->next)
|
|
|
|
continue;
|
2007-11-27 05:30:49 +08:00
|
|
|
hc->next = (hook_chain *) cmalloc_abort (HEAP_1_HOOK, sizeof (hook_chain));
|
2005-03-23 03:00:31 +08:00
|
|
|
hc->next->loc = (void **) pi;
|
|
|
|
hc->next->func = fh.hookfn;
|
|
|
|
hc->next->next = NULL;
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
return true;
|
|
|
|
}
|
|
|
|
|
2006-07-07 01:16:37 +08:00
|
|
|
static void
|
2005-03-23 03:00:31 +08:00
|
|
|
get_export (function_hook& fh)
|
|
|
|
{
|
|
|
|
PIMAGE_DOS_HEADER pdh = (PIMAGE_DOS_HEADER) cygwin_hmodule;
|
|
|
|
if (pdh->e_magic != IMAGE_DOS_SIGNATURE)
|
|
|
|
return;
|
|
|
|
PIMAGE_NT_HEADERS pnt = (PIMAGE_NT_HEADERS) ((char *) pdh + pdh->e_lfanew);
|
|
|
|
if (pnt->Signature != IMAGE_NT_SIGNATURE || pnt->FileHeader.SizeOfOptionalHeader == 0)
|
|
|
|
return;
|
|
|
|
PIMAGE_EXPORT_DIRECTORY pexp =
|
|
|
|
rvacyg (PIMAGE_EXPORT_DIRECTORY,
|
|
|
|
pnt->OptionalHeader.DataDirectory[IMAGE_DIRECTORY_ENTRY_EXPORT].VirtualAddress);
|
|
|
|
if (!pexp)
|
|
|
|
return;
|
|
|
|
|
|
|
|
PDWORD pfuncs = rvacyg (PDWORD, pexp->AddressOfFunctions);
|
|
|
|
PDWORD pnames = rvacyg (PDWORD, pexp->AddressOfNames);
|
|
|
|
for (DWORD i = 0; i < pexp->NumberOfNames; i++)
|
|
|
|
if (strcmp (fh.name, rvacyg (char *, pnames[i])) == 0)
|
|
|
|
{
|
|
|
|
fh.origfn = rvacyg (void *, pfuncs[i]);
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
static const char *
|
|
|
|
makename (const char *name, char *&buf, int& i, int inc)
|
|
|
|
{
|
|
|
|
i += inc;
|
|
|
|
static const char *testers[] = {"NOTUSED", "64", "32"};
|
|
|
|
if (i < 0 || i >= (int) (sizeof (testers) / sizeof (testers[0])))
|
|
|
|
return NULL;
|
|
|
|
if (i)
|
|
|
|
{
|
|
|
|
__small_sprintf (buf, "_%s%s", name, testers[i]);
|
|
|
|
name = buf;
|
|
|
|
}
|
|
|
|
return name;
|
|
|
|
}
|
|
|
|
|
2008-03-27 09:50:40 +08:00
|
|
|
/* Find first missing dll in a given executable.
|
|
|
|
FIXME: This is not foolproof since it doesn't look for dlls in the
|
|
|
|
same directory as the given executable, like Windows. Instead it
|
|
|
|
searches for dlls in the context of the current executable. */
|
|
|
|
const char *
|
|
|
|
find_first_notloaded_dll (path_conv& pc)
|
|
|
|
{
|
|
|
|
const char *res = "?";
|
|
|
|
HANDLE hc = NULL;
|
|
|
|
HMODULE hm = NULL;
|
|
|
|
OBJECT_ATTRIBUTES attr;
|
|
|
|
IO_STATUS_BLOCK io;
|
|
|
|
HANDLE h;
|
|
|
|
NTSTATUS status;
|
|
|
|
|
|
|
|
status = NtOpenFile (&h, SYNCHRONIZE | GENERIC_READ,
|
|
|
|
pc.get_object_attr (attr, sec_none_nih),
|
|
|
|
&io, FILE_SHARE_READ | FILE_SHARE_WRITE,
|
|
|
|
FILE_SYNCHRONOUS_IO_NONALERT
|
|
|
|
| FILE_OPEN_FOR_BACKUP_INTENT
|
|
|
|
| FILE_NON_DIRECTORY_FILE);
|
|
|
|
if (!NT_SUCCESS (status))
|
|
|
|
goto out;
|
|
|
|
|
|
|
|
hc = CreateFileMapping (h, &sec_none_nih, PAGE_READONLY, 0, 0, NULL);
|
|
|
|
NtClose (h);
|
|
|
|
if (!hc)
|
|
|
|
goto out;
|
|
|
|
hm = (HMODULE) MapViewOfFile(hc, FILE_MAP_READ, 0, 0, 0);
|
|
|
|
CloseHandle (hc);
|
|
|
|
|
|
|
|
PIMAGE_NT_HEADERS pExeNTHdr;
|
|
|
|
pExeNTHdr = PEHeaderFromHModule (hm);
|
|
|
|
|
|
|
|
if (!pExeNTHdr)
|
|
|
|
goto out;
|
|
|
|
|
|
|
|
DWORD importRVA;
|
|
|
|
importRVA = pExeNTHdr->OptionalHeader.DataDirectory[IMAGE_DIRECTORY_ENTRY_IMPORT].VirtualAddress;
|
|
|
|
if (!importRVA)
|
|
|
|
goto out;
|
|
|
|
|
|
|
|
long delta = rvadelta (pExeNTHdr, importRVA);
|
|
|
|
|
|
|
|
// Convert imports RVA to a usable pointer
|
|
|
|
PIMAGE_IMPORT_DESCRIPTOR pdfirst;
|
|
|
|
pdfirst = rva (PIMAGE_IMPORT_DESCRIPTOR, hm, importRVA - delta);
|
|
|
|
|
|
|
|
// Iterate through each import descriptor, and redirect if appropriate
|
|
|
|
for (PIMAGE_IMPORT_DESCRIPTOR pd = pdfirst; pd->FirstThunk; pd++)
|
|
|
|
{
|
|
|
|
const char *lib = rva (PSTR, hm, pd->Name - delta);
|
|
|
|
if (!LoadLibraryEx (lib, NULL, DONT_RESOLVE_DLL_REFERENCES
|
|
|
|
| LOAD_LIBRARY_AS_DATAFILE))
|
|
|
|
{
|
|
|
|
static char buf[NT_MAX_PATH];
|
|
|
|
res = strcpy (buf, lib);
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
out:
|
|
|
|
if (hm)
|
|
|
|
UnmapViewOfFile (hm);
|
|
|
|
|
|
|
|
return res;
|
|
|
|
}
|
|
|
|
|
|
|
|
// Top level routine to find the EXE's imports and redirect them
|
2005-03-23 03:00:31 +08:00
|
|
|
void *
|
2005-12-22 01:14:34 +08:00
|
|
|
hook_or_detect_cygwin (const char *name, const void *fn, WORD& subsys)
|
2005-03-23 03:00:31 +08:00
|
|
|
{
|
2005-09-07 11:10:17 +08:00
|
|
|
HMODULE hm = fn ? GetModuleHandle (NULL) : (HMODULE) name;
|
2005-03-23 03:00:31 +08:00
|
|
|
PIMAGE_NT_HEADERS pExeNTHdr = PEHeaderFromHModule (hm);
|
|
|
|
|
|
|
|
if (!pExeNTHdr)
|
|
|
|
return false;
|
|
|
|
|
2005-12-22 01:14:34 +08:00
|
|
|
subsys = pExeNTHdr->OptionalHeader.Subsystem;
|
|
|
|
|
2005-03-23 03:00:31 +08:00
|
|
|
DWORD importRVA = pExeNTHdr->OptionalHeader.DataDirectory
|
|
|
|
[IMAGE_DIRECTORY_ENTRY_IMPORT].VirtualAddress;
|
|
|
|
if (!importRVA)
|
|
|
|
return false;
|
|
|
|
|
2005-09-07 11:10:17 +08:00
|
|
|
long delta = fn ? 0 : rvadelta (pExeNTHdr, importRVA);
|
|
|
|
if (delta < 0)
|
|
|
|
return false;
|
|
|
|
|
2005-03-23 03:00:31 +08:00
|
|
|
// Convert imports RVA to a usable pointer
|
2005-09-07 11:10:17 +08:00
|
|
|
PIMAGE_IMPORT_DESCRIPTOR pdfirst = rva (PIMAGE_IMPORT_DESCRIPTOR, hm, importRVA - delta);
|
2005-03-23 03:00:31 +08:00
|
|
|
|
|
|
|
function_hook fh;
|
|
|
|
fh.origfn = NULL;
|
|
|
|
fh.hookfn = fn;
|
2005-09-29 04:20:57 +08:00
|
|
|
char *buf = (char *) alloca (strlen (name) + sizeof ("_64"));
|
2005-07-17 08:51:03 +08:00
|
|
|
int i;
|
|
|
|
// Iterate through each import descriptor, and redirect if appropriate
|
|
|
|
for (PIMAGE_IMPORT_DESCRIPTOR pd = pdfirst; pd->FirstThunk; pd++)
|
2005-03-23 03:00:31 +08:00
|
|
|
{
|
2008-02-01 20:37:51 +08:00
|
|
|
if (!ascii_strcasematch (rva (PSTR, hm, pd->Name - delta), "cygwin1.dll"))
|
2005-07-17 08:51:03 +08:00
|
|
|
continue;
|
|
|
|
if (!fn)
|
|
|
|
return (void *) "found it"; // just checking if executable used cygwin1.dll
|
|
|
|
i = -1;
|
|
|
|
while (!fh.origfn && (fh.name = makename (name, buf, i, 1)))
|
|
|
|
RedirectIAT (fh, pd, hm);
|
|
|
|
if (fh.origfn)
|
|
|
|
break;
|
2005-03-23 03:00:31 +08:00
|
|
|
}
|
|
|
|
|
|
|
|
while (!fh.origfn && (fh.name = makename (name, buf, i, -1)))
|
|
|
|
get_export (fh);
|
|
|
|
|
|
|
|
return fh.origfn;
|
|
|
|
}
|
|
|
|
|
|
|
|
void
|
|
|
|
ld_preload ()
|
|
|
|
{
|
|
|
|
char *p = getenv ("LD_PRELOAD");
|
|
|
|
if (!p)
|
|
|
|
return;
|
|
|
|
char *s = (char *) alloca (strlen (p) + 1);
|
|
|
|
strcpy (s, p);
|
|
|
|
char *here = NULL;
|
2005-04-15 01:34:03 +08:00
|
|
|
for (p = strtok_r (s, ":\t\n", &here); p; p = strtok_r (NULL, ":\t\n", &here))
|
2005-03-23 03:00:31 +08:00
|
|
|
{
|
|
|
|
path_conv lib (p);
|
2007-08-20 23:41:08 +08:00
|
|
|
WCHAR libname[lib.get_wide_win32_path_len () + 1];
|
|
|
|
if (!LoadLibraryW (lib.get_wide_win32_path (libname)))
|
2005-03-23 03:00:31 +08:00
|
|
|
{
|
|
|
|
__seterrno ();
|
|
|
|
api_fatal ("error while loading shared libraries: %s: "
|
|
|
|
"cannot open shared object file: %s", p,
|
|
|
|
strerror (get_errno ()));
|
|
|
|
}
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
void
|
|
|
|
fixup_hooks_after_fork ()
|
|
|
|
{
|
|
|
|
for (hook_chain *hc = &cygheap->hooks; (hc = hc->next); )
|
|
|
|
putmem ((PIMAGE_THUNK_DATA) hc->loc, hc->func);
|
|
|
|
}
|