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 <mmsystem.h>
  27#include <unistd.h>
  28#include <fcntl.h>
  29#include <signal.h>
  30#include <time.h>
  31#include <errno.h>
  32#include <sys/time.h>
  33#include "config-host.h"
  34#include "sysemu/sysemu.h"
  35#include "qemu-options.h"
  36
  37/***********************************************************/
  38/* Functions missing in mingw */
  39
  40int setenv(const char *name, const char *value, int overwrite)
  41{
  42    int result = 0;
  43    if (overwrite || !getenv(name)) {
  44        size_t length = strlen(name) + strlen(value) + 2;
  45        char *string = g_malloc(length);
  46        snprintf(string, length, "%s=%s", name, value);
  47        result = putenv(string);
  48
  49        /* Windows takes a copy and does not continue to use our string.
  50         * Therefore it can be safely freed on this platform.  POSIX code
  51         * typically has to leak the string because according to the spec it
  52         * becomes part of the environment.
  53         */
  54        g_free(string);
  55    }
  56    return result;
  57}
  58
  59static BOOL WINAPI qemu_ctrl_handler(DWORD type)
  60{
  61    qemu_system_shutdown_request();
  62    /* Windows 7 kills application when the function returns.
  63       Sleep here to give QEMU a try for closing.
  64       Sleep period is 10000ms because Windows kills the program
  65       after 10 seconds anyway. */
  66    Sleep(10000);
  67
  68    return TRUE;
  69}
  70
  71static TIMECAPS mm_tc;
  72
  73static void os_undo_timer_resolution(void)
  74{
  75    timeEndPeriod(mm_tc.wPeriodMin);
  76}
  77
  78void os_setup_early_signal_handling(void)
  79{
  80    SetConsoleCtrlHandler(qemu_ctrl_handler, TRUE);
  81    timeGetDevCaps(&mm_tc, sizeof(mm_tc));
  82    timeBeginPeriod(mm_tc.wPeriodMin);
  83    atexit(os_undo_timer_resolution);
  84}
  85
  86/* Look for support files in the same directory as the executable.  */
  87char *os_find_datadir(const char *argv0)
  88{
  89    char *p;
  90    char buf[MAX_PATH];
  91    DWORD len;
  92
  93    len = GetModuleFileName(NULL, buf, sizeof(buf) - 1);
  94    if (len == 0) {
  95        return NULL;
  96    }
  97
  98    buf[len] = 0;
  99    p = buf + len - 1;
 100    while (p != buf && *p != '\\')
 101        p--;
 102    *p = 0;
 103    if (access(buf, R_OK) == 0) {
 104        return g_strdup(buf);
 105    }
 106    return NULL;
 107}
 108
 109void os_set_line_buffering(void)
 110{
 111    setbuf(stdout, NULL);
 112    setbuf(stderr, NULL);
 113}
 114
 115/*
 116 * Parse OS specific command line options.
 117 * return 0 if option handled, -1 otherwise
 118 */
 119void os_parse_cmd_args(int index, const char *optarg)
 120{
 121    return;
 122}
 123
 124void os_pidfile_error(void)
 125{
 126    fprintf(stderr, "Could not acquire pid file: %s\n", strerror(errno));
 127}
 128
 129int qemu_create_pidfile(const char *filename)
 130{
 131    char buffer[128];
 132    int len;
 133    HANDLE file;
 134    OVERLAPPED overlap;
 135    BOOL ret;
 136    memset(&overlap, 0, sizeof(overlap));
 137
 138    file = CreateFile(filename, GENERIC_WRITE, FILE_SHARE_READ, NULL,
 139                      OPEN_ALWAYS, FILE_ATTRIBUTE_NORMAL, NULL);
 140
 141    if (file == INVALID_HANDLE_VALUE) {
 142        return -1;
 143    }
 144    len = snprintf(buffer, sizeof(buffer), "%d\n", getpid());
 145    ret = WriteFile(file, (LPCVOID)buffer, (DWORD)len,
 146                    NULL, &overlap);
 147    CloseHandle(file);
 148    if (ret == 0) {
 149        return -1;
 150    }
 151    return 0;
 152}
 153