/* * NT process handling * * Copyright 1996-1998 Marcus Meissner * Copyright 2018, 2020 Alexandre Julliard * * This library is free software; you can redistribute it and/or * modify it under the terms of the GNU Lesser General Public * License as published by the Free Software Foundation; either * version 2.1 of the License, or (at your option) any later version. * * This library is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU * Lesser General Public License for more details. * * You should have received a copy of the GNU Lesser General Public * License along with this library; if not, write to the Free Software * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA */ #if 0 #pragma makedep unix #endif #include "config.h" #include "wine/port.h" #include #include #include #include #include #include #include #include #ifdef HAVE_SYS_SOCKET_H #include #endif #ifdef HAVE_SYS_TIME_H # include #endif #ifdef HAVE_SYS_TIMES_H # include #endif #include #ifdef HAVE_SYS_WAIT_H # include #endif #ifdef HAVE_UNISTD_H # include #endif #ifdef __APPLE__ # include # include #endif #ifdef HAVE_MACH_MACH_H # include #endif #include "ntstatus.h" #define WIN32_NO_STATUS #include "windef.h" #include "winternl.h" #include "unix_private.h" #include "wine/exception.h" #include "wine/server.h" #include "wine/debug.h" WINE_DEFAULT_DEBUG_CHANNEL(process); static ULONG execute_flags = MEM_EXECUTE_OPTION_DISABLE | (sizeof(void *) > sizeof(int) ? MEM_EXECUTE_OPTION_DISABLE_THUNK_EMULATION | MEM_EXECUTE_OPTION_PERMANENT : 0); static const BOOL is_win64 = (sizeof(void *) > sizeof(int)); static const char * const cpu_names[] = { "x86", "x86_64", "PowerPC", "ARM", "ARM64" }; static UINT process_error_mode; static char **build_argv( const UNICODE_STRING *cmdline, int reserved ) { char **argv, *arg, *src, *dst; int argc, in_quotes = 0, bcount = 0, len = cmdline->Length / sizeof(WCHAR); if (!(src = malloc( len * 3 + 1 ))) return NULL; len = ntdll_wcstoumbs( cmdline->Buffer, len, src, len * 3, FALSE ); src[len++] = 0; argc = reserved + 2 + len / 2; argv = malloc( argc * sizeof(*argv) + len ); arg = dst = (char *)(argv + argc); argc = reserved; while (*src) { if ((*src == ' ' || *src == '\t') && !in_quotes) { /* skip the remaining spaces */ while (*src == ' ' || *src == '\t') src++; if (!*src) break; /* close the argument and copy it */ *dst++ = 0; argv[argc++] = arg; /* start with a new argument */ arg = dst; bcount = 0; } else if (*src == '\\') { *dst++ = *src++; bcount++; } else if (*src == '"') { if ((bcount & 1) == 0) { /* Preceded by an even number of '\', this is half that * number of '\', plus a '"' which we discard. */ dst -= bcount / 2; src++; if (in_quotes && *src == '"') *dst++ = *src++; else in_quotes = !in_quotes; } else { /* Preceded by an odd number of '\', this is half that * number of '\' followed by a '"' */ dst -= bcount / 2 + 1; *dst++ = *src++; } bcount = 0; } else /* a regular character */ { *dst++ = *src++; bcount = 0; } } *dst = 0; argv[argc++] = arg; argv[argc] = NULL; return argv; } #ifdef __APPLE__ /*********************************************************************** * terminate_main_thread * * On some versions of Mac OS X, the execve system call fails with * ENOTSUP if the process has multiple threads. Wine is always multi- * threaded on Mac OS X because it specifically reserves the main thread * for use by the system frameworks (see apple_main_thread() in * libs/wine/loader.c). So, when we need to exec without first forking, * we need to terminate the main thread first. We do this by installing * a custom run loop source onto the main run loop and signaling it. * The source's "perform" callback is pthread_exit and it will be * executed on the main thread, terminating it. * * Returns TRUE if there's still hope the main thread has terminated or * will soon. Return FALSE if we've given up. */ static BOOL terminate_main_thread(void) { static int delayms; if (!delayms) { CFRunLoopSourceContext source_context = { 0 }; CFRunLoopSourceRef source; source_context.perform = pthread_exit; if (!(source = CFRunLoopSourceCreate( NULL, 0, &source_context ))) return FALSE; CFRunLoopAddSource( CFRunLoopGetMain(), source, kCFRunLoopCommonModes ); CFRunLoopSourceSignal( source ); CFRunLoopWakeUp( CFRunLoopGetMain() ); CFRelease( source ); delayms = 20; } if (delayms > 1000) return FALSE; usleep(delayms * 1000); delayms *= 2; return TRUE; } #endif static inline const WCHAR *get_params_string( const RTL_USER_PROCESS_PARAMETERS *params, const UNICODE_STRING *str ) { if (params->Flags & PROCESS_PARAMS_FLAG_NORMALIZED) return str->Buffer; return (const WCHAR *)((const char *)params + (UINT_PTR)str->Buffer); } static inline DWORD append_string( void **ptr, const RTL_USER_PROCESS_PARAMETERS *params, const UNICODE_STRING *str ) { const WCHAR *buffer = get_params_string( params, str ); memcpy( *ptr, buffer, str->Length ); *ptr = (WCHAR *)*ptr + str->Length / sizeof(WCHAR); return str->Length; } /*********************************************************************** * create_startup_info */ static startup_info_t *create_startup_info( const RTL_USER_PROCESS_PARAMETERS *params, DWORD *info_size ) { startup_info_t *info; DWORD size; void *ptr; size = sizeof(*info); size += params->CurrentDirectory.DosPath.Length; size += params->DllPath.Length; size += params->ImagePathName.Length; size += params->CommandLine.Length; size += params->WindowTitle.Length; size += params->Desktop.Length; size += params->ShellInfo.Length; size += params->RuntimeInfo.Length; size = (size + 1) & ~1; *info_size = size; if (!(info = RtlAllocateHeap( GetProcessHeap(), HEAP_ZERO_MEMORY, size ))) return NULL; info->debug_flags = params->DebugFlags; info->console_flags = params->ConsoleFlags; info->console = wine_server_obj_handle( params->ConsoleHandle ); info->hstdin = wine_server_obj_handle( params->hStdInput ); info->hstdout = wine_server_obj_handle( params->hStdOutput ); info->hstderr = wine_server_obj_handle( params->hStdError ); info->x = params->dwX; info->y = params->dwY; info->xsize = params->dwXSize; info->ysize = params->dwYSize; info->xchars = params->dwXCountChars; info->ychars = params->dwYCountChars; info->attribute = params->dwFillAttribute; info->flags = params->dwFlags; info->show = params->wShowWindow; ptr = info + 1; info->curdir_len = append_string( &ptr, params, ¶ms->CurrentDirectory.DosPath ); info->dllpath_len = append_string( &ptr, params, ¶ms->DllPath ); info->imagepath_len = append_string( &ptr, params, ¶ms->ImagePathName ); info->cmdline_len = append_string( &ptr, params, ¶ms->CommandLine ); info->title_len = append_string( &ptr, params, ¶ms->WindowTitle ); info->desktop_len = append_string( &ptr, params, ¶ms->Desktop ); info->shellinfo_len = append_string( &ptr, params, ¶ms->ShellInfo ); info->runtime_len = append_string( &ptr, params, ¶ms->RuntimeInfo ); return info; } /*************************************************************************** * is_builtin_path */ static BOOL is_builtin_path( UNICODE_STRING *path, BOOL *is_64bit ) { static const WCHAR systemW[] = {'\\','?','?','\\','c',':','\\','w','i','n','d','o','w','s','\\', 's','y','s','t','e','m','3','2','\\'}; static const WCHAR wow64W[] = {'\\','?','?','\\','c',':','\\','w','i','n','d','o','w','s','\\', 's','y','s','w','o','w','6','4'}; *is_64bit = is_win64; if (path->Length > sizeof(systemW) && !wcsnicmp( path->Buffer, systemW, ARRAY_SIZE(systemW) )) { if (is_wow64 && !ntdll_get_thread_data()->wow64_redir) *is_64bit = TRUE; return TRUE; } if ((is_win64 || is_wow64) && path->Length > sizeof(wow64W) && !wcsnicmp( path->Buffer, wow64W, ARRAY_SIZE(wow64W) )) { *is_64bit = FALSE; return TRUE; } return FALSE; } /*********************************************************************** * get_so_file_info */ static BOOL get_so_file_info( HANDLE handle, pe_image_info_t *info ) { union { struct { unsigned char magic[4]; unsigned char class; unsigned char data; unsigned char version; unsigned char ignored1[9]; unsigned short type; unsigned short machine; unsigned char ignored2[8]; unsigned int phoff; unsigned char ignored3[12]; unsigned short phnum; } elf; struct { unsigned char magic[4]; unsigned char class; unsigned char data; unsigned char ignored1[10]; unsigned short type; unsigned short machine; unsigned char ignored2[12]; unsigned __int64 phoff; unsigned char ignored3[16]; unsigned short phnum; } elf64; struct { unsigned int magic; unsigned int cputype; unsigned int cpusubtype; unsigned int filetype; } macho; IMAGE_DOS_HEADER mz; } header; IO_STATUS_BLOCK io; LARGE_INTEGER offset; offset.QuadPart = 0; if (NtReadFile( handle, 0, NULL, NULL, &io, &header, sizeof(header), &offset, 0 )) return FALSE; if (io.Information != sizeof(header)) return FALSE; if (!memcmp( header.elf.magic, "\177ELF", 4 )) { unsigned int type; unsigned short phnum; if (header.elf.version != 1 /* EV_CURRENT */) return FALSE; #ifdef WORDS_BIGENDIAN if (header.elf.data != 2 /* ELFDATA2MSB */) return FALSE; #else if (header.elf.data != 1 /* ELFDATA2LSB */) return FALSE; #endif switch (header.elf.machine) { case 3: info->cpu = CPU_x86; break; case 40: info->cpu = CPU_ARM; break; case 62: info->cpu = CPU_x86_64; break; case 183: info->cpu = CPU_ARM64; break; } if (header.elf.type != 3 /* ET_DYN */) return FALSE; if (header.elf.class == 2 /* ELFCLASS64 */) { offset.QuadPart = header.elf64.phoff; phnum = header.elf64.phnum; } else { offset.QuadPart = header.elf.phoff; phnum = header.elf.phnum; } while (phnum--) { if (NtReadFile( handle, 0, NULL, NULL, &io, &type, sizeof(type), &offset, 0 )) return FALSE; if (io.Information < sizeof(type)) return FALSE; if (type == 3 /* PT_INTERP */) return FALSE; offset.QuadPart += (header.elf.class == 2) ? 56 : 32; } return TRUE; } else if (header.macho.magic == 0xfeedface || header.macho.magic == 0xfeedfacf) { switch (header.macho.cputype) { case 0x00000007: info->cpu = CPU_x86; break; case 0x01000007: info->cpu = CPU_x86_64; break; case 0x0000000c: info->cpu = CPU_ARM; break; case 0x0100000c: info->cpu = CPU_ARM64; break; } if (header.macho.filetype == 8) return TRUE; } return FALSE; } /*********************************************************************** * get_pe_file_info */ static NTSTATUS get_pe_file_info( UNICODE_STRING *path, HANDLE *handle, pe_image_info_t *info ) { NTSTATUS status; HANDLE mapping; OBJECT_ATTRIBUTES attr; IO_STATUS_BLOCK io; memset( info, 0, sizeof(*info) ); InitializeObjectAttributes( &attr, path, OBJ_CASE_INSENSITIVE, 0, 0 ); if ((status = NtOpenFile( handle, GENERIC_READ, &attr, &io, FILE_SHARE_READ | FILE_SHARE_DELETE, FILE_SYNCHRONOUS_IO_NONALERT ))) { BOOL is_64bit; if (is_builtin_path( path, &is_64bit )) { TRACE( "assuming %u-bit builtin for %s\n", is_64bit ? 64 : 32, debugstr_us(path)); /* assume current arch */ #if defined(__i386__) || defined(__x86_64__) info->cpu = is_64bit ? CPU_x86_64 : CPU_x86; #else info->cpu = client_cpu; #endif *handle = 0; return STATUS_SUCCESS; } return status; } if (!(status = NtCreateSection( &mapping, STANDARD_RIGHTS_REQUIRED | SECTION_QUERY | SECTION_MAP_READ | SECTION_MAP_EXECUTE, NULL, NULL, PAGE_EXECUTE_READ, SEC_IMAGE, *handle ))) { SERVER_START_REQ( get_mapping_info ) { req->handle = wine_server_obj_handle( mapping ); req->access = SECTION_QUERY; wine_server_set_reply( req, info, sizeof(*info) ); status = wine_server_call( req ); } SERVER_END_REQ; NtClose( mapping ); } else if (status == STATUS_INVALID_IMAGE_NOT_MZ) { if (get_so_file_info( *handle, info )) return STATUS_SUCCESS; } return status; } /*********************************************************************** * get_env_size */ static ULONG get_env_size( const RTL_USER_PROCESS_PARAMETERS *params, char **winedebug ) { WCHAR *ptr = params->Environment; while (*ptr) { static const WCHAR WINEDEBUG[] = {'W','I','N','E','D','E','B','U','G','=',0}; if (!*winedebug && !wcsncmp( ptr, WINEDEBUG, ARRAY_SIZE( WINEDEBUG ) - 1 )) { DWORD len = wcslen(ptr) * 3 + 1; if ((*winedebug = RtlAllocateHeap( GetProcessHeap(), 0, len ))) ntdll_wcstoumbs( ptr, wcslen(ptr) + 1, *winedebug, len, FALSE ); } ptr += wcslen(ptr) + 1; } ptr++; return (ptr - params->Environment) * sizeof(WCHAR); } /*********************************************************************** * get_unix_curdir */ static int get_unix_curdir( const RTL_USER_PROCESS_PARAMETERS *params ) { UNICODE_STRING nt_name; OBJECT_ATTRIBUTES attr; IO_STATUS_BLOCK io; NTSTATUS status; HANDLE handle; int fd = -1; if (!RtlDosPathNameToNtPathName_U( params->CurrentDirectory.DosPath.Buffer, &nt_name, NULL, NULL )) return -1; InitializeObjectAttributes( &attr, &nt_name, OBJ_CASE_INSENSITIVE, 0, NULL ); status = NtOpenFile( &handle, FILE_TRAVERSE | SYNCHRONIZE, &attr, &io, FILE_SHARE_READ | FILE_SHARE_WRITE, FILE_DIRECTORY_FILE | FILE_SYNCHRONOUS_IO_NONALERT ); RtlFreeUnicodeString( &nt_name ); if (status) return -1; server_handle_to_fd( handle, FILE_TRAVERSE, &fd, NULL ); NtClose( handle ); return fd; } /*********************************************************************** * set_stdio_fd */ static void set_stdio_fd( int stdin_fd, int stdout_fd ) { int fd = -1; if (stdin_fd == -1 || stdout_fd == -1) { fd = open( "/dev/null", O_RDWR ); if (stdin_fd == -1) stdin_fd = fd; if (stdout_fd == -1) stdout_fd = fd; } dup2( stdin_fd, 0 ); dup2( stdout_fd, 1 ); if (fd != -1) close( fd ); } /*********************************************************************** * spawn_process */ static NTSTATUS spawn_process( const RTL_USER_PROCESS_PARAMETERS *params, int socketfd, int unixdir, char *winedebug, const pe_image_info_t *pe_info ) { NTSTATUS status = STATUS_SUCCESS; int stdin_fd = -1, stdout_fd = -1; pid_t pid; char **argv; server_handle_to_fd( params->hStdInput, FILE_READ_DATA, &stdin_fd, NULL ); server_handle_to_fd( params->hStdOutput, FILE_WRITE_DATA, &stdout_fd, NULL ); if (!(pid = fork())) /* child */ { if (!(pid = fork())) /* grandchild */ { if (params->ConsoleFlags || params->ConsoleHandle == (HANDLE)1 /* KERNEL32_CONSOLE_ALLOC */ || (params->hStdInput == INVALID_HANDLE_VALUE && params->hStdOutput == INVALID_HANDLE_VALUE)) { setsid(); set_stdio_fd( -1, -1 ); /* close stdin and stdout */ } else set_stdio_fd( stdin_fd, stdout_fd ); if (stdin_fd != -1) close( stdin_fd ); if (stdout_fd != -1) close( stdout_fd ); if (winedebug) putenv( winedebug ); if (unixdir != -1) { fchdir( unixdir ); close( unixdir ); } argv = build_argv( ¶ms->CommandLine, 2 ); exec_wineloader( argv, socketfd, pe_info ); _exit(1); } _exit(pid == -1); } if (pid != -1) { /* reap child */ pid_t wret; do { wret = waitpid(pid, NULL, 0); } while (wret < 0 && errno == EINTR); } else status = STATUS_NO_MEMORY; if (stdin_fd != -1) close( stdin_fd ); if (stdout_fd != -1) close( stdout_fd ); return status; } /*********************************************************************** * exec_process */ NTSTATUS CDECL exec_process( UNICODE_STRING *path, UNICODE_STRING *cmdline, NTSTATUS status ) { pe_image_info_t pe_info; int unixdir, socketfd[2]; char **argv; HANDLE handle; if (startup_info_size) return status; /* started from another Win32 process */ switch (status) { case STATUS_CONFLICTING_ADDRESSES: case STATUS_NO_MEMORY: case STATUS_INVALID_IMAGE_FORMAT: case STATUS_INVALID_IMAGE_NOT_MZ: if (getenv( "WINEPRELOADRESERVE" )) return status; if ((status = get_pe_file_info( path, &handle, &pe_info ))) return status; break; case STATUS_INVALID_IMAGE_WIN_16: case STATUS_INVALID_IMAGE_NE_FORMAT: case STATUS_INVALID_IMAGE_PROTECT: /* we'll start winevdm */ memset( &pe_info, 0, sizeof(pe_info) ); pe_info.cpu = CPU_x86; break; default: return status; } unixdir = get_unix_curdir( NtCurrentTeb()->Peb->ProcessParameters ); if (socketpair( PF_UNIX, SOCK_STREAM, 0, socketfd ) == -1) return STATUS_TOO_MANY_OPENED_FILES; #ifdef SO_PASSCRED else { int enable = 1; setsockopt( socketfd[0], SOL_SOCKET, SO_PASSCRED, &enable, sizeof(enable) ); } #endif server_send_fd( socketfd[1] ); close( socketfd[1] ); SERVER_START_REQ( exec_process ) { req->socket_fd = socketfd[1]; req->cpu = pe_info.cpu; status = wine_server_call( req ); } SERVER_END_REQ; if (!status) { if (!(argv = build_argv( cmdline, 2 ))) return STATUS_NO_MEMORY; fchdir( unixdir ); do { status = exec_wineloader( argv, socketfd[0], &pe_info ); } #ifdef __APPLE__ while (errno == ENOTSUP && terminate_main_thread()); #else while (0); #endif free( argv ); } close( socketfd[0] ); return status; } /*********************************************************************** * fork_and_exec * * Fork and exec a new Unix binary, checking for errors. */ static NTSTATUS fork_and_exec( UNICODE_STRING *path, int unixdir, const RTL_USER_PROCESS_PARAMETERS *params ) { pid_t pid; int fd[2], stdin_fd = -1, stdout_fd = -1; char **argv, **envp; ANSI_STRING unix_name; NTSTATUS status; status = nt_to_unix_file_name( path, &unix_name, FILE_OPEN, FALSE ); if (status) return status; #ifdef HAVE_PIPE2 if (pipe2( fd, O_CLOEXEC ) == -1) #endif { if (pipe(fd) == -1) { status = STATUS_TOO_MANY_OPENED_FILES; goto done; } fcntl( fd[0], F_SETFD, FD_CLOEXEC ); fcntl( fd[1], F_SETFD, FD_CLOEXEC ); } server_handle_to_fd( params->hStdInput, FILE_READ_DATA, &stdin_fd, NULL ); server_handle_to_fd( params->hStdOutput, FILE_WRITE_DATA, &stdout_fd, NULL ); if (!(pid = fork())) /* child */ { if (!(pid = fork())) /* grandchild */ { close( fd[0] ); if (params->ConsoleFlags || params->ConsoleHandle == (HANDLE)1 /* KERNEL32_CONSOLE_ALLOC */ || (params->hStdInput == INVALID_HANDLE_VALUE && params->hStdOutput == INVALID_HANDLE_VALUE)) { setsid(); set_stdio_fd( -1, -1 ); /* close stdin and stdout */ } else set_stdio_fd( stdin_fd, stdout_fd ); if (stdin_fd != -1) close( stdin_fd ); if (stdout_fd != -1) close( stdout_fd ); /* Reset signals that we previously set to SIG_IGN */ signal( SIGPIPE, SIG_DFL ); argv = build_argv( ¶ms->CommandLine, 0 ); envp = build_envp( params->Environment ); if (unixdir != -1) { fchdir( unixdir ); close( unixdir ); } execve( unix_name.Buffer, argv, envp ); } if (pid <= 0) /* grandchild if exec failed or child if fork failed */ { switch (errno) { case EPERM: case EACCES: status = STATUS_ACCESS_DENIED; break; case ENOENT: status = STATUS_OBJECT_NAME_NOT_FOUND; break; case EMFILE: case ENFILE: status = STATUS_TOO_MANY_OPENED_FILES; break; case ENOEXEC: case EINVAL: status = STATUS_INVALID_IMAGE_FORMAT; break; default: status = STATUS_NO_MEMORY; break; } write( fd[1], &status, sizeof(status) ); _exit(1); } _exit(0); /* child if fork succeeded */ } close( fd[1] ); if (pid != -1) { /* reap child */ pid_t wret; do { wret = waitpid(pid, NULL, 0); } while (wret < 0 && errno == EINTR); read( fd[0], &status, sizeof(status) ); /* if we read something, exec or second fork failed */ } else status = STATUS_NO_MEMORY; close( fd[0] ); if (stdin_fd != -1) close( stdin_fd ); if (stdout_fd != -1) close( stdout_fd ); done: RtlFreeAnsiString( &unix_name ); return status; } /********************************************************************** * NtCreateUserProcess (NTDLL.@) */ NTSTATUS WINAPI NtCreateUserProcess( HANDLE *process_handle_ptr, HANDLE *thread_handle_ptr, ACCESS_MASK process_access, ACCESS_MASK thread_access, OBJECT_ATTRIBUTES *process_attr, OBJECT_ATTRIBUTES *thread_attr, ULONG process_flags, ULONG thread_flags, RTL_USER_PROCESS_PARAMETERS *params, PS_CREATE_INFO *info, PS_ATTRIBUTE_LIST *attr ) { NTSTATUS status; BOOL success = FALSE; HANDLE file_handle, process_info = 0, process_handle = 0, thread_handle = 0; struct object_attributes *objattr; data_size_t attr_len; char *winedebug = NULL; startup_info_t *startup_info = NULL; ULONG startup_info_size, env_size; int unixdir, socketfd[2] = { -1, -1 }; pe_image_info_t pe_info; CLIENT_ID id; HANDLE parent = 0, debug = 0, token = 0; UNICODE_STRING path = {0}; SIZE_T i, attr_count = (attr->TotalLength - sizeof(attr->TotalLength)) / sizeof(PS_ATTRIBUTE); for (i = 0; i < attr_count; i++) { switch (attr->Attributes[i].Attribute) { case PS_ATTRIBUTE_PARENT_PROCESS: parent = attr->Attributes[i].ValuePtr; break; case PS_ATTRIBUTE_DEBUG_PORT: debug = attr->Attributes[i].ValuePtr; break; case PS_ATTRIBUTE_IMAGE_NAME: path.Length = attr->Attributes[i].Size; path.Buffer = attr->Attributes[i].ValuePtr; break; case PS_ATTRIBUTE_TOKEN: token = attr->Attributes[i].ValuePtr; break; default: if (attr->Attributes[i].Attribute & PS_ATTRIBUTE_INPUT) FIXME( "unhandled input attribute %lx\n", attr->Attributes[i].Attribute ); break; } } TRACE( "%s image %s cmdline %s parent %p\n", debugstr_us( &path ), debugstr_us( ¶ms->ImagePathName ), debugstr_us( ¶ms->CommandLine ), parent ); if (debug) FIXME( "debug port %p not supported yet\n", debug ); if (token) FIXME( "token %p not supported yet\n", token ); unixdir = get_unix_curdir( params ); if ((status = get_pe_file_info( &path, &file_handle, &pe_info ))) { if (status == STATUS_INVALID_IMAGE_NOT_MZ && !fork_and_exec( &path, unixdir, params )) { memset( info, 0, sizeof(*info) ); return STATUS_SUCCESS; } goto done; } if (!(startup_info = create_startup_info( params, &startup_info_size ))) goto done; env_size = get_env_size( params, &winedebug ); if ((status = alloc_object_attributes( process_attr, &objattr, &attr_len ))) goto done; /* create the socket for the new process */ if (socketpair( PF_UNIX, SOCK_STREAM, 0, socketfd ) == -1) { status = STATUS_TOO_MANY_OPENED_FILES; free( objattr ); goto done; } #ifdef SO_PASSCRED else { int enable = 1; setsockopt( socketfd[0], SOL_SOCKET, SO_PASSCRED, &enable, sizeof(enable) ); } #endif server_send_fd( socketfd[1] ); close( socketfd[1] ); /* create the process on the server side */ SERVER_START_REQ( new_process ) { req->parent_process = wine_server_obj_handle( parent ); req->inherit_all = !!(process_flags & PROCESS_CREATE_FLAGS_INHERIT_HANDLES); req->create_flags = params->DebugFlags; /* hack: creation flags stored in DebugFlags for now */ req->socket_fd = socketfd[1]; req->exe_file = wine_server_obj_handle( file_handle ); req->access = process_access; req->cpu = pe_info.cpu; req->info_size = startup_info_size; wine_server_add_data( req, objattr, attr_len ); wine_server_add_data( req, startup_info, startup_info_size ); wine_server_add_data( req, params->Environment, env_size ); if (!(status = wine_server_call( req ))) { process_handle = wine_server_ptr_handle( reply->handle ); id.UniqueProcess = ULongToHandle( reply->pid ); } process_info = wine_server_ptr_handle( reply->info ); } SERVER_END_REQ; free( objattr ); if (status) { switch (status) { case STATUS_INVALID_IMAGE_WIN_64: ERR( "64-bit application %s not supported in 32-bit prefix\n", debugstr_us(&path) ); break; case STATUS_INVALID_IMAGE_FORMAT: ERR( "%s not supported on this installation (%s binary)\n", debugstr_us(&path), cpu_names[pe_info.cpu] ); break; } goto done; } if ((status = alloc_object_attributes( thread_attr, &objattr, &attr_len ))) goto done; SERVER_START_REQ( new_thread ) { req->process = wine_server_obj_handle( process_handle ); req->access = thread_access; req->suspend = !!(thread_flags & THREAD_CREATE_FLAGS_CREATE_SUSPENDED); req->request_fd = -1; wine_server_add_data( req, objattr, attr_len ); if (!(status = wine_server_call( req ))) { thread_handle = wine_server_ptr_handle( reply->handle ); id.UniqueThread = ULongToHandle( reply->tid ); } } SERVER_END_REQ; free( objattr ); if (status) goto done; /* create the child process */ if ((status = spawn_process( params, socketfd[0], unixdir, winedebug, &pe_info ))) goto done; close( socketfd[0] ); socketfd[0] = -1; /* wait for the new process info to be ready */ NtWaitForSingleObject( process_info, FALSE, NULL ); SERVER_START_REQ( get_new_process_info ) { req->info = wine_server_obj_handle( process_info ); wine_server_call( req ); success = reply->success; status = reply->exit_code; } SERVER_END_REQ; if (!success) { if (!status) status = STATUS_INTERNAL_ERROR; goto done; } TRACE( "%s pid %04x tid %04x handles %p/%p\n", debugstr_us(&path), HandleToULong(id.UniqueProcess), HandleToULong(id.UniqueThread), process_handle, thread_handle ); /* update output attributes */ for (i = 0; i < attr_count; i++) { switch (attr->Attributes[i].Attribute) { case PS_ATTRIBUTE_CLIENT_ID: { SIZE_T size = min( attr->Attributes[i].Size, sizeof(id) ); memcpy( attr->Attributes[i].ValuePtr, &id, size ); if (attr->Attributes[i].ReturnLength) *attr->Attributes[i].ReturnLength = size; break; } case PS_ATTRIBUTE_IMAGE_INFO: { SECTION_IMAGE_INFORMATION info; SIZE_T size = min( attr->Attributes[i].Size, sizeof(info) ); virtual_fill_image_information( &pe_info, &info ); memcpy( attr->Attributes[i].ValuePtr, &info, size ); if (attr->Attributes[i].ReturnLength) *attr->Attributes[i].ReturnLength = size; break; } case PS_ATTRIBUTE_TEB_ADDRESS: default: if (!(attr->Attributes[i].Attribute & PS_ATTRIBUTE_INPUT)) FIXME( "unhandled output attribute %lx\n", attr->Attributes[i].Attribute ); break; } } *process_handle_ptr = process_handle; *thread_handle_ptr = thread_handle; process_handle = thread_handle = 0; status = STATUS_SUCCESS; done: if (file_handle) NtClose( file_handle ); if (process_info) NtClose( process_info ); if (process_handle) NtClose( process_handle ); if (thread_handle) NtClose( thread_handle ); if (socketfd[0] != -1) close( socketfd[0] ); if (unixdir != -1) close( unixdir ); RtlFreeHeap( GetProcessHeap(), 0, startup_info ); RtlFreeHeap( GetProcessHeap(), 0, winedebug ); return status; } /****************************************************************************** * NtTerminateProcess (NTDLL.@) */ NTSTATUS WINAPI NtTerminateProcess( HANDLE handle, LONG exit_code ) { NTSTATUS ret; BOOL self; SERVER_START_REQ( terminate_process ) { req->handle = wine_server_obj_handle( handle ); req->exit_code = exit_code; ret = wine_server_call( req ); self = reply->self; } SERVER_END_REQ; if (self && handle) abort_process( exit_code ); return ret; } #if defined(HAVE_MACH_MACH_H) static void fill_VM_COUNTERS( VM_COUNTERS_EX *pvmi ) { #if defined(MACH_TASK_BASIC_INFO) struct mach_task_basic_info info; mach_msg_type_number_t infoCount = MACH_TASK_BASIC_INFO_COUNT; if(task_info(mach_task_self(), MACH_TASK_BASIC_INFO, (task_info_t)&info, &infoCount) == KERN_SUCCESS) { pvmi->VirtualSize = info.resident_size + info.virtual_size; pvmi->PagefileUsage = info.virtual_size; pvmi->WorkingSetSize = info.resident_size; pvmi->PeakWorkingSetSize = info.resident_size_max; } #endif } #elif defined(linux) static void fill_VM_COUNTERS( VM_COUNTERS_EX *pvmi ) { FILE *f; char line[256]; unsigned long value; f = fopen("/proc/self/status", "r"); if (!f) return; while (fgets(line, sizeof(line), f)) { if (sscanf(line, "VmPeak: %lu", &value)) pvmi->PeakVirtualSize = (ULONG64)value * 1024; else if (sscanf(line, "VmSize: %lu", &value)) pvmi->VirtualSize = (ULONG64)value * 1024; else if (sscanf(line, "VmHWM: %lu", &value)) pvmi->PeakWorkingSetSize = (ULONG64)value * 1024; else if (sscanf(line, "VmRSS: %lu", &value)) pvmi->WorkingSetSize = (ULONG64)value * 1024; else if (sscanf(line, "RssAnon: %lu", &value)) pvmi->PagefileUsage += (ULONG64)value * 1024; else if (sscanf(line, "VmSwap: %lu", &value)) pvmi->PagefileUsage += (ULONG64)value * 1024; } pvmi->PeakPagefileUsage = pvmi->PagefileUsage; fclose(f); } #else static void fill_VM_COUNTERS( VM_COUNTERS_EX *pvmi ) { /* FIXME : real data */ } #endif #define UNIMPLEMENTED_INFO_CLASS(c) \ case c: \ FIXME( "(process=%p) Unimplemented information class: " #c "\n", handle); \ ret = STATUS_INVALID_INFO_CLASS; \ break /********************************************************************** * NtQueryInformationProcess (NTDLL.@) */ NTSTATUS WINAPI NtQueryInformationProcess( HANDLE handle, PROCESSINFOCLASS class, void *info, ULONG size, ULONG *ret_len ) { NTSTATUS ret = STATUS_SUCCESS; ULONG len = 0; TRACE( "(%p,0x%08x,%p,0x%08x,%p)\n", handle, class, info, size, ret_len ); switch (class) { UNIMPLEMENTED_INFO_CLASS(ProcessQuotaLimits); UNIMPLEMENTED_INFO_CLASS(ProcessBasePriority); UNIMPLEMENTED_INFO_CLASS(ProcessRaisePriority); UNIMPLEMENTED_INFO_CLASS(ProcessExceptionPort); UNIMPLEMENTED_INFO_CLASS(ProcessAccessToken); UNIMPLEMENTED_INFO_CLASS(ProcessLdtInformation); UNIMPLEMENTED_INFO_CLASS(ProcessLdtSize); UNIMPLEMENTED_INFO_CLASS(ProcessIoPortHandlers); UNIMPLEMENTED_INFO_CLASS(ProcessPooledUsageAndLimits); UNIMPLEMENTED_INFO_CLASS(ProcessWorkingSetWatch); UNIMPLEMENTED_INFO_CLASS(ProcessUserModeIOPL); UNIMPLEMENTED_INFO_CLASS(ProcessEnableAlignmentFaultFixup); UNIMPLEMENTED_INFO_CLASS(ProcessWx86Information); UNIMPLEMENTED_INFO_CLASS(ProcessPriorityBoost); UNIMPLEMENTED_INFO_CLASS(ProcessDeviceMap); UNIMPLEMENTED_INFO_CLASS(ProcessSessionInformation); UNIMPLEMENTED_INFO_CLASS(ProcessForegroundInformation); UNIMPLEMENTED_INFO_CLASS(ProcessLUIDDeviceMapsEnabled); UNIMPLEMENTED_INFO_CLASS(ProcessBreakOnTermination); UNIMPLEMENTED_INFO_CLASS(ProcessHandleTracing); case ProcessBasicInformation: { PROCESS_BASIC_INFORMATION pbi; const ULONG_PTR affinity_mask = get_system_affinity_mask(); if (size >= sizeof(PROCESS_BASIC_INFORMATION)) { if (!info) ret = STATUS_ACCESS_VIOLATION; else { SERVER_START_REQ(get_process_info) { req->handle = wine_server_obj_handle( handle ); if ((ret = wine_server_call( req )) == STATUS_SUCCESS) { pbi.ExitStatus = reply->exit_code; pbi.PebBaseAddress = wine_server_get_ptr( reply->peb ); pbi.AffinityMask = reply->affinity & affinity_mask; pbi.BasePriority = reply->priority; pbi.UniqueProcessId = reply->pid; pbi.InheritedFromUniqueProcessId = reply->ppid; } } SERVER_END_REQ; memcpy( info, &pbi, sizeof(PROCESS_BASIC_INFORMATION) ); len = sizeof(PROCESS_BASIC_INFORMATION); } if (size > sizeof(PROCESS_BASIC_INFORMATION)) ret = STATUS_INFO_LENGTH_MISMATCH; } else { len = sizeof(PROCESS_BASIC_INFORMATION); ret = STATUS_INFO_LENGTH_MISMATCH; } } break; case ProcessIoCounters: { IO_COUNTERS pii; if (size >= sizeof(IO_COUNTERS)) { if (!info) ret = STATUS_ACCESS_VIOLATION; else if (!handle) ret = STATUS_INVALID_HANDLE; else { /* FIXME : real data */ memset(&pii, 0 , sizeof(IO_COUNTERS)); memcpy(info, &pii, sizeof(IO_COUNTERS)); len = sizeof(IO_COUNTERS); } if (size > sizeof(IO_COUNTERS)) ret = STATUS_INFO_LENGTH_MISMATCH; } else { len = sizeof(IO_COUNTERS); ret = STATUS_INFO_LENGTH_MISMATCH; } } break; case ProcessVmCounters: { VM_COUNTERS_EX pvmi; /* older Windows versions don't have the PrivateUsage field */ if (size >= sizeof(VM_COUNTERS)) { if (!info) ret = STATUS_ACCESS_VIOLATION; else { memset(&pvmi, 0, sizeof(pvmi)); if (handle == GetCurrentProcess()) fill_VM_COUNTERS(&pvmi); else { SERVER_START_REQ(get_process_vm_counters) { req->handle = wine_server_obj_handle( handle ); if (!(ret = wine_server_call( req ))) { pvmi.PeakVirtualSize = reply->peak_virtual_size; pvmi.VirtualSize = reply->virtual_size; pvmi.PeakWorkingSetSize = reply->peak_working_set_size; pvmi.WorkingSetSize = reply->working_set_size; pvmi.PagefileUsage = reply->pagefile_usage; pvmi.PeakPagefileUsage = reply->peak_pagefile_usage; } } SERVER_END_REQ; if (ret) break; } if (size >= sizeof(VM_COUNTERS_EX)) pvmi.PrivateUsage = pvmi.PagefileUsage; len = size; if (len != sizeof(VM_COUNTERS)) len = sizeof(VM_COUNTERS_EX); memcpy(info, &pvmi, min(size, sizeof(pvmi))); } if (size != sizeof(VM_COUNTERS) && size != sizeof(VM_COUNTERS_EX)) ret = STATUS_INFO_LENGTH_MISMATCH; } else { len = sizeof(pvmi); ret = STATUS_INFO_LENGTH_MISMATCH; } } break; case ProcessTimes: { KERNEL_USER_TIMES pti = {{{0}}}; if (size >= sizeof(KERNEL_USER_TIMES)) { if (!info) ret = STATUS_ACCESS_VIOLATION; else if (!handle) ret = STATUS_INVALID_HANDLE; else { long ticks = sysconf(_SC_CLK_TCK); struct tms tms; /* FIXME: user/kernel times only work for current process */ if (ticks && times( &tms ) != -1) { pti.UserTime.QuadPart = (ULONGLONG)tms.tms_utime * 10000000 / ticks; pti.KernelTime.QuadPart = (ULONGLONG)tms.tms_stime * 10000000 / ticks; } SERVER_START_REQ(get_process_info) { req->handle = wine_server_obj_handle( handle ); if ((ret = wine_server_call( req )) == STATUS_SUCCESS) { pti.CreateTime.QuadPart = reply->start_time; pti.ExitTime.QuadPart = reply->end_time; } } SERVER_END_REQ; memcpy(info, &pti, sizeof(KERNEL_USER_TIMES)); len = sizeof(KERNEL_USER_TIMES); } if (size > sizeof(KERNEL_USER_TIMES)) ret = STATUS_INFO_LENGTH_MISMATCH; } else { len = sizeof(KERNEL_USER_TIMES); ret = STATUS_INFO_LENGTH_MISMATCH; } } break; case ProcessDebugPort: len = sizeof(DWORD_PTR); if (size == len) { if (!info) ret = STATUS_ACCESS_VIOLATION; else { SERVER_START_REQ(get_process_info) { req->handle = wine_server_obj_handle( handle ); if ((ret = wine_server_call( req )) == STATUS_SUCCESS) { *(DWORD_PTR *)info = reply->debugger_present ? ~(DWORD_PTR)0 : 0; } } SERVER_END_REQ; } } else ret = STATUS_INFO_LENGTH_MISMATCH; break; case ProcessDebugFlags: len = sizeof(DWORD); if (size == len) { if (!info) ret = STATUS_ACCESS_VIOLATION; else { SERVER_START_REQ(get_process_info) { req->handle = wine_server_obj_handle( handle ); if ((ret = wine_server_call( req )) == STATUS_SUCCESS) { *(DWORD *)info = reply->debug_children; } } SERVER_END_REQ; } } else ret = STATUS_INFO_LENGTH_MISMATCH; break; case ProcessDefaultHardErrorMode: len = sizeof(process_error_mode); if (size == len) memcpy(info, &process_error_mode, len); else ret = STATUS_INFO_LENGTH_MISMATCH; break; case ProcessDebugObjectHandle: /* "These are not the debuggers you are looking for." * * set it to 0 aka "no debugger" to satisfy copy protections */ len = sizeof(HANDLE); if (size == len) { if (!info) ret = STATUS_ACCESS_VIOLATION; else if (!handle) ret = STATUS_INVALID_HANDLE; else { memset(info, 0, size); ret = STATUS_PORT_NOT_SET; } } else ret = STATUS_INFO_LENGTH_MISMATCH; break; case ProcessHandleCount: if (size >= 4) { if (!info) ret = STATUS_ACCESS_VIOLATION; else if (!handle) ret = STATUS_INVALID_HANDLE; else { memset(info, 0, 4); len = 4; } if (size > 4) ret = STATUS_INFO_LENGTH_MISMATCH; } else { len = 4; ret = STATUS_INFO_LENGTH_MISMATCH; } break; case ProcessAffinityMask: len = sizeof(ULONG_PTR); if (size == len) { const ULONG_PTR system_mask = get_system_affinity_mask(); SERVER_START_REQ(get_process_info) { req->handle = wine_server_obj_handle( handle ); if (!(ret = wine_server_call( req ))) *(ULONG_PTR *)info = reply->affinity & system_mask; } SERVER_END_REQ; } else ret = STATUS_INFO_LENGTH_MISMATCH; break; case ProcessWow64Information: len = sizeof(ULONG_PTR); if (size != len) ret = STATUS_INFO_LENGTH_MISMATCH; else if (!info) ret = STATUS_ACCESS_VIOLATION; else if (!handle) ret = STATUS_INVALID_HANDLE; else { ULONG_PTR val = 0; if (handle == GetCurrentProcess()) val = is_wow64; else if (server_cpus & ((1 << CPU_x86_64) | (1 << CPU_ARM64))) { SERVER_START_REQ( get_process_info ) { req->handle = wine_server_obj_handle( handle ); if (!(ret = wine_server_call( req ))) val = (reply->cpu != CPU_x86_64 && reply->cpu != CPU_ARM64); } SERVER_END_REQ; } *(ULONG_PTR *)info = val; } break; case ProcessImageFileName: /* FIXME: Should return a device path */ case ProcessImageFileNameWin32: SERVER_START_REQ(get_dll_info) { UNICODE_STRING *image_file_name_str = info; req->handle = wine_server_obj_handle( handle ); req->base_address = 0; /* main module */ wine_server_set_reply( req, image_file_name_str ? image_file_name_str + 1 : NULL, size > sizeof(UNICODE_STRING) ? size - sizeof(UNICODE_STRING) : 0 ); ret = wine_server_call( req ); if (ret == STATUS_BUFFER_TOO_SMALL) ret = STATUS_INFO_LENGTH_MISMATCH; len = sizeof(UNICODE_STRING) + reply->filename_len; if (ret == STATUS_SUCCESS) { image_file_name_str->MaximumLength = image_file_name_str->Length = reply->filename_len; image_file_name_str->Buffer = (PWSTR)(image_file_name_str + 1); } } SERVER_END_REQ; break; case ProcessExecuteFlags: len = sizeof(ULONG); if (size == len) *(ULONG *)info = execute_flags; else ret = STATUS_INFO_LENGTH_MISMATCH; break; case ProcessPriorityClass: len = sizeof(PROCESS_PRIORITY_CLASS); if (size == len) { if (!info) ret = STATUS_ACCESS_VIOLATION; else { PROCESS_PRIORITY_CLASS *priority = info; SERVER_START_REQ(get_process_info) { req->handle = wine_server_obj_handle( handle ); if ((ret = wine_server_call( req )) == STATUS_SUCCESS) { priority->PriorityClass = reply->priority; /* FIXME: Not yet supported by the wineserver */ priority->Foreground = FALSE; } } SERVER_END_REQ; } } else ret = STATUS_INFO_LENGTH_MISMATCH; break; case ProcessCookie: FIXME( "ProcessCookie (%p,%p,0x%08x,%p) stub\n", handle, info, size, ret_len ); if (handle == NtCurrentProcess()) { len = sizeof(ULONG); if (size == len) *(ULONG *)info = 0; else ret = STATUS_INFO_LENGTH_MISMATCH; } else ret = STATUS_INVALID_PARAMETER; break; case ProcessImageInformation: len = sizeof(SECTION_IMAGE_INFORMATION); if (size == len) { if (info) { pe_image_info_t pe_info; SERVER_START_REQ( get_process_info ) { req->handle = wine_server_obj_handle( handle ); wine_server_set_reply( req, &pe_info, sizeof(pe_info) ); if ((ret = wine_server_call( req )) == STATUS_SUCCESS) virtual_fill_image_information( &pe_info, info ); } SERVER_END_REQ; } else ret = STATUS_ACCESS_VIOLATION; } else ret = STATUS_INFO_LENGTH_MISMATCH; break; default: FIXME("(%p,info_class=%d,%p,0x%08x,%p) Unknown information class\n", handle, class, info, size, ret_len ); ret = STATUS_INVALID_INFO_CLASS; break; } if (ret_len) *ret_len = len; return ret; } /********************************************************************** * NtSetInformationProcess (NTDLL.@) */ NTSTATUS WINAPI NtSetInformationProcess( HANDLE handle, PROCESSINFOCLASS class, void *info, ULONG size ) { NTSTATUS ret = STATUS_SUCCESS; switch (class) { case ProcessDefaultHardErrorMode: if (size != sizeof(UINT)) return STATUS_INVALID_PARAMETER; process_error_mode = *(UINT *)info; break; case ProcessAffinityMask: { const ULONG_PTR system_mask = get_system_affinity_mask(); if (size != sizeof(DWORD_PTR)) return STATUS_INVALID_PARAMETER; if (*(PDWORD_PTR)info & ~system_mask) return STATUS_INVALID_PARAMETER; if (!*(PDWORD_PTR)info) return STATUS_INVALID_PARAMETER; SERVER_START_REQ( set_process_info ) { req->handle = wine_server_obj_handle( handle ); req->affinity = *(PDWORD_PTR)info; req->mask = SET_PROCESS_INFO_AFFINITY; ret = wine_server_call( req ); } SERVER_END_REQ; break; } case ProcessPriorityClass: if (size != sizeof(PROCESS_PRIORITY_CLASS)) return STATUS_INVALID_PARAMETER; else { PROCESS_PRIORITY_CLASS* ppc = info; SERVER_START_REQ( set_process_info ) { req->handle = wine_server_obj_handle( handle ); /* FIXME Foreground isn't used */ req->priority = ppc->PriorityClass; req->mask = SET_PROCESS_INFO_PRIORITY; ret = wine_server_call( req ); } SERVER_END_REQ; } break; case ProcessExecuteFlags: if (is_win64 || size != sizeof(ULONG)) return STATUS_INVALID_PARAMETER; if (execute_flags & MEM_EXECUTE_OPTION_PERMANENT) return STATUS_ACCESS_DENIED; else { BOOL enable; switch (*(ULONG *)info & (MEM_EXECUTE_OPTION_ENABLE|MEM_EXECUTE_OPTION_DISABLE)) { case MEM_EXECUTE_OPTION_ENABLE: enable = TRUE; break; case MEM_EXECUTE_OPTION_DISABLE: enable = FALSE; break; default: return STATUS_INVALID_PARAMETER; } execute_flags = *(ULONG *)info; virtual_set_force_exec( enable ); } break; default: FIXME( "(%p,0x%08x,%p,0x%08x) stub\n", handle, class, info, size ); ret = STATUS_NOT_IMPLEMENTED; break; } return ret; } /********************************************************************** * NtOpenProcess (NTDLL.@) */ NTSTATUS WINAPI NtOpenProcess( HANDLE *handle, ACCESS_MASK access, const OBJECT_ATTRIBUTES *attr, const CLIENT_ID *id ) { NTSTATUS status; SERVER_START_REQ( open_process ) { req->pid = HandleToULong( id->UniqueProcess ); req->access = access; req->attributes = attr ? attr->Attributes : 0; status = wine_server_call( req ); if (!status) *handle = wine_server_ptr_handle( reply->handle ); } SERVER_END_REQ; return status; } /********************************************************************** * NtSuspendProcess (NTDLL.@) */ NTSTATUS WINAPI NtSuspendProcess( HANDLE handle ) { NTSTATUS ret; SERVER_START_REQ( suspend_process ) { req->handle = wine_server_obj_handle( handle ); ret = wine_server_call( req ); } SERVER_END_REQ; return ret; } /********************************************************************** * NtResumeProcess (NTDLL.@) */ NTSTATUS WINAPI NtResumeProcess( HANDLE handle ) { NTSTATUS ret; SERVER_START_REQ( resume_process ) { req->handle = wine_server_obj_handle( handle ); ret = wine_server_call( req ); } SERVER_END_REQ; return ret; }