LXR qemu/os-win32.c

   1/*
   2 * os-win32.c
   3 *
   4 * Copyright (c) 2003-2008 Fabrice Bellard
   5 * Copyright (c) 2010 Red Hat, Inc.
   6 *
   7 * Permission is hereby granted, free of charge, to any person obtaining a copy
   8 * of this software and associated documentation files (the "Software"), to deal
   9 * in the Software without restriction, including without limitation the rights
  10 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
  11 * copies of the Software, and to permit persons to whom the Software is
  12 * furnished to do so, subject to the following conditions:
  13 *
  14 * The above copyright notice and this permission notice shall be included in
  15 * all copies or substantial portions of the Software.
  16 *
  17 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
  18 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
  19 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
  20 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
  21 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
  22 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
  23 * THE SOFTWARE.
  24 */
  25#include <windows.h>
  26#include <unistd.h>
  27#include <fcntl.h>
  28#include <signal.h>
  29#include <time.h>
  30#include <errno.h>
  31#include <sys/time.h>
  32#include "config-host.h"
  33#include "sysemu.h"
  34#include "qemu-options.h"
  35
  36/***********************************************************/
  37/* Functions missing in mingw */
  38
  39int setenv(const char *name, const char *value, int overwrite)
  40{
  41    int result = 0;
  42    if (overwrite || !getenv(name)) {
  43        size_t length = strlen(name) + strlen(value) + 2;
  44        char *string = g_malloc(length);
  45        snprintf(string, length, "%s=%s", name, value);
  46        result = putenv(string);
  47
  48        /* Windows takes a copy and does not continue to use our string.
  49         * Therefore it can be safely freed on this platform.  POSIX code
  50         * typically has to leak the string because according to the spec it
  51         * becomes part of the environment.
  52         */
  53        g_free(string);
  54    }
  55    return result;
  56}
  57
  58static BOOL WINAPI qemu_ctrl_handler(DWORD type)
  59{
  60    qemu_system_shutdown_request();
  61    /* Windows 7 kills application when the function returns.
  62       Sleep here to give QEMU a try for closing.
  63       Sleep period is 10000ms because Windows kills the program
  64       after 10 seconds anyway. */
  65    Sleep(10000);
  66
  67    return TRUE;
  68}
  69
  70void os_setup_early_signal_handling(void)
  71{
  72    /* Note: cpu_interrupt() is currently not SMP safe, so we force
  73       QEMU to run on a single CPU */
  74    HANDLE h;
  75    DWORD_PTR mask, smask;
  76    int i;
  77
  78    SetConsoleCtrlHandler(qemu_ctrl_handler, TRUE);
  79
  80    h = GetCurrentProcess();
  81    if (GetProcessAffinityMask(h, &mask, &smask)) {
  82        for(i = 0; i < 32; i++) {
  83            if (mask & (1 << i))
  84                break;
  85        }
  86        if (i != 32) {
  87            mask = 1 << i;
  88            SetProcessAffinityMask(h, mask);
  89        }
  90    }
  91}
  92
  93/* Look for support files in the same directory as the executable.  */
  94char *os_find_datadir(const char *argv0)
  95{
  96    char *p;
  97    char buf[MAX_PATH];
  98    DWORD len;
  99
 100    len = GetModuleFileName(NULL, buf, sizeof(buf) - 1);
 101    if (len == 0) {
 102        return NULL;
 103    }
 104
 105    buf[len] = 0;
 106    p = buf + len - 1;
 107    while (p != buf && *p != '\\')
 108        p--;
 109    *p = 0;
 110    if (access(buf, R_OK) == 0) {
 111        return g_strdup(buf);
 112    }
 113    return NULL;
 114}
 115
 116void os_set_line_buffering(void)
 117{
 118    setbuf(stdout, NULL);
 119    setbuf(stderr, NULL);
 120}
 121
 122/*
 123 * Parse OS specific command line options.
 124 * return 0 if option handled, -1 otherwise
 125 */
 126void os_parse_cmd_args(int index, const char *optarg)
 127{
 128    return;
 129}
 130
 131void os_pidfile_error(void)
 132{
 133    fprintf(stderr, "Could not acquire pid file: %s\n", strerror(errno));
 134}
 135
 136int qemu_create_pidfile(const char *filename)
 137{
 138    char buffer[128];
 139    int len;
 140    HANDLE file;
 141    OVERLAPPED overlap;
 142    BOOL ret;
 143    memset(&overlap, 0, sizeof(overlap));
 144
 145    file = CreateFile(filename, GENERIC_WRITE, FILE_SHARE_READ, NULL,
 146                      OPEN_ALWAYS, FILE_ATTRIBUTE_NORMAL, NULL);
 147
 148    if (file == INVALID_HANDLE_VALUE) {
 149        return -1;
 150    }
 151    len = snprintf(buffer, sizeof(buffer), "%d\n", getpid());
 152    ret = WriteFile(file, (LPCVOID)buffer, (DWORD)len,
 153                    NULL, &overlap);
 154    CloseHandle(file);
 155    if (ret == 0) {
 156        return -1;
 157    }
 158    return 0;
 159}
 160