1*fc0bc008SAndrew Rist /**************************************************************
2*fc0bc008SAndrew Rist  *
3*fc0bc008SAndrew Rist  * Licensed to the Apache Software Foundation (ASF) under one
4*fc0bc008SAndrew Rist  * or more contributor license agreements.  See the NOTICE file
5*fc0bc008SAndrew Rist  * distributed with this work for additional information
6*fc0bc008SAndrew Rist  * regarding copyright ownership.  The ASF licenses this file
7*fc0bc008SAndrew Rist  * to you under the Apache License, Version 2.0 (the
8*fc0bc008SAndrew Rist  * "License"); you may not use this file except in compliance
9*fc0bc008SAndrew Rist  * with the License.  You may obtain a copy of the License at
10*fc0bc008SAndrew Rist  *
11*fc0bc008SAndrew Rist  *   http://www.apache.org/licenses/LICENSE-2.0
12*fc0bc008SAndrew Rist  *
13*fc0bc008SAndrew Rist  * Unless required by applicable law or agreed to in writing,
14*fc0bc008SAndrew Rist  * software distributed under the License is distributed on an
15*fc0bc008SAndrew Rist  * "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
16*fc0bc008SAndrew Rist  * KIND, either express or implied.  See the License for the
17*fc0bc008SAndrew Rist  * specific language governing permissions and limitations
18*fc0bc008SAndrew Rist  * under the License.
19*fc0bc008SAndrew Rist  *
20*fc0bc008SAndrew Rist  *************************************************************/
21*fc0bc008SAndrew Rist 
22cdf0e10cSrcweir #include "macros.h"
23cdf0e10cSrcweir #ifdef _MSC_VER
24cdf0e10cSrcweir #pragma warning(push,1) // disable warnings within system headers
25cdf0e10cSrcweir #endif
26cdf0e10cSrcweir #include <psapi.h>
27cdf0e10cSrcweir #ifdef _MSC_VER
28cdf0e10cSrcweir #pragma warning(pop)
29cdf0e10cSrcweir #endif
30cdf0e10cSrcweir 
31cdf0e10cSrcweir IMPLEMENT_THUNK( psapi, WINDOWS, DWORD, WINAPI, GetModuleFileNameExW, (HANDLE hProcess, HMODULE hModule, LPWSTR lpFileNameW, DWORD nSize ) )
32cdf0e10cSrcweir {
33cdf0e10cSrcweir 	AUTO_STR( lpFileName, 2 * nSize );
34cdf0e10cSrcweir 
35cdf0e10cSrcweir 	if ( GetModuleFileNameExA( hProcess, hModule, lpFileNameA, 2 * nSize ) )
36cdf0e10cSrcweir 		return (DWORD) STR2WSTR( lpFileName, nSize );
37cdf0e10cSrcweir 	else
38cdf0e10cSrcweir 		return 0;
39cdf0e10cSrcweir }