git.oblomov.eu Git - wine/blob - dlls/kernel32/actctx.c

   1 /*
   2  * Activation contexts
   3  *
   4  * Copyright 2004 Jon Griffiths
   5  * Copyright 2007 Eric Pouech
   6  * Copyright 2007 Jacek Caban for CodeWeavers
   7  *
   8  * This library is free software; you can redistribute it and/or
   9  * modify it under the terms of the GNU Lesser General Public
  10  * License as published by the Free Software Foundation; either
  11  * version 2.1 of the License, or (at your option) any later version.
  12  *
  13  * This library is distributed in the hope that it will be useful,
  14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  16  * Lesser General Public License for more details.
  17  *
  18  * You should have received a copy of the GNU Lesser General Public
  19  * License along with this library; if not, write to the Free Software
  20  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  21  */
  22
  23 #include "config.h"
  24 #include "wine/port.h"
  25
  26 #include <stdarg.h>
  27 #include "windef.h"
  28 #include "winbase.h"
  29 #include "winerror.h"
  30 #include "winnls.h"
  31 #include "winternl.h"
  32 #include "wine/debug.h"
  33
  34 WINE_DEFAULT_DEBUG_CHANNEL(actctx);
  35
  36
  37 #define ACTCTX_FAKE_HANDLE ((HANDLE) 0xf00baa)
  38
  39 /***********************************************************************
  40  * CreateActCtxA (KERNEL32.@)
  41  *
  42  * Create an activation context.
  43  */
  44 HANDLE WINAPI CreateActCtxA(PCACTCTXA pActCtx)
  45 {
  46     ACTCTXW     actw;
  47     SIZE_T      len;
  48     HANDLE      ret = INVALID_HANDLE_VALUE;
  49     LPWSTR      src = NULL, assdir = NULL, resname = NULL, appname = NULL;
  50
  51     TRACE("%p %08x\n", pActCtx, pActCtx ? pActCtx->dwFlags : 0);
  52
  53     if (!pActCtx || pActCtx->cbSize != sizeof(*pActCtx))
  54     {
  55         SetLastError(ERROR_INVALID_PARAMETER);
  56         return INVALID_HANDLE_VALUE;
  57     }
  58
  59     actw.cbSize = sizeof(actw);
  60     actw.dwFlags = pActCtx->dwFlags;
  61     if (pActCtx->lpSource)
  62     {
  63         len = MultiByteToWideChar(CP_ACP, 0, pActCtx->lpSource, -1, NULL, 0);
  64         src = HeapAlloc(GetProcessHeap(), 0, len * sizeof(WCHAR));
  65         if (!src) return INVALID_HANDLE_VALUE;
  66         MultiByteToWideChar(CP_ACP, 0, pActCtx->lpSource, -1, src, len);
  67     }
  68     actw.lpSource = src;
  69
  70     if (actw.dwFlags & ACTCTX_FLAG_PROCESSOR_ARCHITECTURE_VALID)
  71         actw.wProcessorArchitecture = pActCtx->wProcessorArchitecture;
  72     if (actw.dwFlags & ACTCTX_FLAG_LANGID_VALID)
  73         actw.wLangId = pActCtx->wLangId;
  74     if (actw.dwFlags & ACTCTX_FLAG_ASSEMBLY_DIRECTORY_VALID)
  75     {
  76         len = MultiByteToWideChar(CP_ACP, 0, pActCtx->lpAssemblyDirectory, -1, NULL, 0);
  77         assdir = HeapAlloc(GetProcessHeap(), 0, len * sizeof(WCHAR));
  78         if (!assdir) goto done;
  79         MultiByteToWideChar(CP_ACP, 0, pActCtx->lpAssemblyDirectory, -1, assdir, len);
  80         actw.lpAssemblyDirectory = assdir;
  81     }
  82     if (actw.dwFlags & ACTCTX_FLAG_RESOURCE_NAME_VALID)
  83     {
  84         if ((ULONG_PTR)pActCtx->lpResourceName >> 16)
  85         {
  86             len = MultiByteToWideChar(CP_ACP, 0, pActCtx->lpResourceName, -1, NULL, 0);
  87             resname = HeapAlloc(GetProcessHeap(), 0, len * sizeof(WCHAR));
  88             if (!resname) goto done;
  89             MultiByteToWideChar(CP_ACP, 0, pActCtx->lpResourceName, -1, resname, len);
  90             actw.lpResourceName = resname;
  91         }
  92         else actw.lpResourceName = (LPWSTR)pActCtx->lpResourceName;
  93     }
  94     if (actw.dwFlags & ACTCTX_FLAG_APPLICATION_NAME_VALID)
  95     {
  96         len = MultiByteToWideChar(CP_ACP, 0, pActCtx->lpApplicationName, -1, NULL, 0);
  97         appname = HeapAlloc(GetProcessHeap(), 0, len * sizeof(WCHAR));
  98         if (!appname) goto done;
  99         MultiByteToWideChar(CP_ACP, 0, pActCtx->lpApplicationName, -1, appname, len);
 100         actw.lpApplicationName = appname;
 101     }
 102     if (actw.dwFlags & ACTCTX_FLAG_HMODULE_VALID)
 103         actw.hModule = pActCtx->hModule;
 104
 105     ret = CreateActCtxW(&actw);
 106
 107 done:
 108     HeapFree(GetProcessHeap(), 0, src);
 109     HeapFree(GetProcessHeap(), 0, assdir);
 110     HeapFree(GetProcessHeap(), 0, resname);
 111     HeapFree(GetProcessHeap(), 0, appname);
 112     return ret;
 113 }
 114
 115 /***********************************************************************
 116  * CreateActCtxW (KERNEL32.@)
 117  *
 118  * Create an activation context.
 119  */
 120 HANDLE WINAPI CreateActCtxW(PCACTCTXW pActCtx)
 121 {
 122     NTSTATUS    status;
 123     HANDLE      hActCtx;
 124
 125     TRACE("%p %08x\n", pActCtx, pActCtx ? pActCtx->dwFlags : 0);
 126
 127     if ((status = RtlCreateActivationContext(&hActCtx, pActCtx)))
 128     {
 129         SetLastError(RtlNtStatusToDosError(status));
 130         return INVALID_HANDLE_VALUE;
 131     }
 132     return hActCtx;
 133 }
 134
 135 /***********************************************************************
 136  * ActivateActCtx (KERNEL32.@)
 137  *
 138  * Activate an activation context.
 139  */
 140 BOOL WINAPI ActivateActCtx(HANDLE hActCtx, ULONG_PTR *ulCookie)
 141 {
 142     NTSTATUS status;
 143
 144     if ((status = RtlActivateActivationContext( 0, hActCtx, ulCookie )))
 145     {
 146         SetLastError(RtlNtStatusToDosError(status));
 147         return FALSE;
 148     }
 149     return TRUE;
 150 }
 151
 152 /***********************************************************************
 153  * DeactivateActCtx (KERNEL32.@)
 154  *
 155  * Deactivate an activation context.
 156  */
 157 BOOL WINAPI DeactivateActCtx(DWORD dwFlags, ULONG_PTR ulCookie)
 158 {
 159     RtlDeactivateActivationContext( dwFlags, ulCookie );
 160     return TRUE;
 161 }
 162
 163 /***********************************************************************
 164  * GetCurrentActCtx (KERNEL32.@)
 165  *
 166  * Get the current activation context.
 167  */
 168 BOOL WINAPI GetCurrentActCtx(HANDLE* phActCtx)
 169 {
 170     NTSTATUS status;
 171
 172     if ((status = RtlGetActiveActivationContext(phActCtx)))
 173     {
 174         SetLastError(RtlNtStatusToDosError(status));
 175         return FALSE;
 176     }
 177     return TRUE;
 178 }
 179
 180 /***********************************************************************
 181  * AddRefActCtx (KERNEL32.@)
 182  *
 183  * Add a reference to an activation context.
 184  */
 185 void WINAPI AddRefActCtx(HANDLE hActCtx)
 186 {
 187     RtlAddRefActivationContext(hActCtx);
 188 }
 189
 190 /***********************************************************************
 191  * ReleaseActCtx (KERNEL32.@)
 192  *
 193  * Release a reference to an activation context.
 194  */
 195 void WINAPI ReleaseActCtx(HANDLE hActCtx)
 196 {
 197     RtlReleaseActivationContext(hActCtx);
 198 }
 199
 200 /***********************************************************************
 201  * ZombifyActCtx (KERNEL32.@)
 202  *
 203  * Release a reference to an activation context.
 204  */
 205 BOOL WINAPI ZombifyActCtx(HANDLE hActCtx)
 206 {
 207   FIXME("%p\n", hActCtx);
 208   if (hActCtx != ACTCTX_FAKE_HANDLE)
 209     return FALSE;
 210   return TRUE;
 211 }
 212
 213 /***********************************************************************
 214  * FindActCtxSectionStringA (KERNEL32.@)
 215  *
 216  * Find information about a GUID in an activation context.
 217  */
 218 BOOL WINAPI FindActCtxSectionStringA(DWORD dwFlags, const GUID* lpExtGuid,
 219                                     ULONG ulId, LPCSTR lpSearchStr,
 220                                     PACTCTX_SECTION_KEYED_DATA pInfo)
 221 {
 222   FIXME("%08x %s %u %s %p\n", dwFlags, debugstr_guid(lpExtGuid),
 223        ulId, debugstr_a(lpSearchStr), pInfo);
 224   SetLastError( ERROR_CALL_NOT_IMPLEMENTED);
 225   return FALSE;
 226 }
 227
 228 /***********************************************************************
 229  * FindActCtxSectionStringW (KERNEL32.@)
 230  *
 231  * Find information about a GUID in an activation context.
 232  */
 233 BOOL WINAPI FindActCtxSectionStringW(DWORD dwFlags, const GUID* lpExtGuid,
 234                                     ULONG ulId, LPCWSTR lpSearchStr,
 235                                     PACTCTX_SECTION_KEYED_DATA pInfo)
 236 {
 237   FIXME("%08x %s %u %s %p\n", dwFlags, debugstr_guid(lpExtGuid),
 238         ulId, debugstr_w(lpSearchStr), pInfo);
 239
 240   if (lpExtGuid)
 241   {
 242     FIXME("expected lpExtGuid == NULL\n");
 243     SetLastError(ERROR_INVALID_PARAMETER);
 244     return FALSE;
 245   }
 246
 247   if (dwFlags & ~FIND_ACTCTX_SECTION_KEY_RETURN_HACTCTX)
 248   {
 249     FIXME("unknown dwFlags %08x\n", dwFlags);
 250     SetLastError(ERROR_INVALID_PARAMETER);
 251     return FALSE;
 252   }
 253
 254   if (!pInfo || pInfo->cbSize < sizeof (ACTCTX_SECTION_KEYED_DATA))
 255   {
 256     SetLastError(ERROR_INVALID_PARAMETER);
 257     return FALSE;
 258   }
 259
 260   pInfo->ulDataFormatVersion = 1;
 261   pInfo->lpData = NULL;
 262   pInfo->lpSectionGlobalData = NULL;
 263   pInfo->ulSectionGlobalDataLength = 0;
 264   pInfo->lpSectionBase = NULL;
 265   pInfo->ulSectionTotalLength = 0;
 266   pInfo->hActCtx = ACTCTX_FAKE_HANDLE;
 267   pInfo->ulAssemblyRosterIndex = 0;
 268
 269   return TRUE;
 270 }
 271
 272 /***********************************************************************
 273  * FindActCtxSectionGuid (KERNEL32.@)
 274  *
 275  * Find information about a GUID in an activation context.
 276  */
 277 BOOL WINAPI FindActCtxSectionGuid(DWORD dwFlags, const GUID* lpExtGuid,
 278                                   ULONG ulId, const GUID* lpSearchGuid,
 279                                   PACTCTX_SECTION_KEYED_DATA pInfo)
 280 {
 281   FIXME("%08x %s %u %s %p\n", dwFlags, debugstr_guid(lpExtGuid),
 282        ulId, debugstr_guid(lpSearchGuid), pInfo);
 283   SetLastError( ERROR_CALL_NOT_IMPLEMENTED);
 284   return FALSE;
 285 }
 286
 287 /***********************************************************************
 288  * QueryActCtxW (KERNEL32.@)
 289  *
 290  * Get information about an activation context.
 291  */
 292 BOOL WINAPI QueryActCtxW(DWORD dwFlags, HANDLE hActCtx, PVOID pvSubInst,
 293                          ULONG ulClass, PVOID pvBuff, SIZE_T cbBuff,
 294                          SIZE_T *pcbLen)
 295 {
 296     NTSTATUS status;
 297
 298     if ((status = RtlQueryInformationActivationContext( dwFlags, hActCtx, pvSubInst, ulClass,
 299                                                         pvBuff, cbBuff, pcbLen )))
 300     {
 301         SetLastError(RtlNtStatusToDosError(status));
 302         return FALSE;
 303     }
 304     return TRUE;
 305 }