1 /* 2 * os-win32.c 3 * 4 * Copyright (c) 2003-2008 Fabrice Bellard 5 * Copyright (c) 2010 Red Hat, Inc. 6 * 7 * QEMU library functions for win32 which are shared between QEMU and 8 * the QEMU tools. 9 * 10 * Permission is hereby granted, free of charge, to any person obtaining a copy 11 * of this software and associated documentation files (the "Software"), to deal 12 * in the Software without restriction, including without limitation the rights 13 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell 14 * copies of the Software, and to permit persons to whom the Software is 15 * furnished to do so, subject to the following conditions: 16 * 17 * The above copyright notice and this permission notice shall be included in 18 * all copies or substantial portions of the Software. 19 * 20 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR 21 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, 22 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL 23 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER 24 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, 25 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN 26 * THE SOFTWARE. 27 */ 28 #include <windows.h> 29 #include <glib.h> 30 #include <stdlib.h> 31 #include "config-host.h" 32 #include "sysemu/sysemu.h" 33 #include "qemu/main-loop.h" 34 #include "trace.h" 35 #include "qemu/sockets.h" 36 37 /* this must come after including "trace.h" */ 38 #include <shlobj.h> 39 40 void *qemu_oom_check(void *ptr) 41 { 42 if (ptr == NULL) { 43 fprintf(stderr, "Failed to allocate memory: %lu\n", GetLastError()); 44 abort(); 45 } 46 return ptr; 47 } 48 49 void *qemu_memalign(size_t alignment, size_t size) 50 { 51 void *ptr; 52 53 if (!size) { 54 abort(); 55 } 56 ptr = qemu_oom_check(VirtualAlloc(NULL, size, MEM_COMMIT, PAGE_READWRITE)); 57 trace_qemu_memalign(alignment, size, ptr); 58 return ptr; 59 } 60 61 void *qemu_anon_ram_alloc(size_t size) 62 { 63 void *ptr; 64 65 /* FIXME: this is not exactly optimal solution since VirtualAlloc 66 has 64Kb granularity, but at least it guarantees us that the 67 memory is page aligned. */ 68 if (!size) { 69 abort(); 70 } 71 ptr = qemu_oom_check(VirtualAlloc(NULL, size, MEM_COMMIT, PAGE_READWRITE)); 72 trace_qemu_anon_ram_alloc(size, ptr); 73 return ptr; 74 } 75 76 void qemu_vfree(void *ptr) 77 { 78 trace_qemu_vfree(ptr); 79 if (ptr) { 80 VirtualFree(ptr, 0, MEM_RELEASE); 81 } 82 } 83 84 void qemu_anon_ram_free(void *ptr, size_t size) 85 { 86 trace_qemu_anon_ram_free(ptr, size); 87 if (ptr) { 88 VirtualFree(ptr, 0, MEM_RELEASE); 89 } 90 } 91 92 /* FIXME: add proper locking */ 93 struct tm *gmtime_r(const time_t *timep, struct tm *result) 94 { 95 struct tm *p = gmtime(timep); 96 memset(result, 0, sizeof(*result)); 97 if (p) { 98 *result = *p; 99 p = result; 100 } 101 return p; 102 } 103 104 /* FIXME: add proper locking */ 105 struct tm *localtime_r(const time_t *timep, struct tm *result) 106 { 107 struct tm *p = localtime(timep); 108 memset(result, 0, sizeof(*result)); 109 if (p) { 110 *result = *p; 111 p = result; 112 } 113 return p; 114 } 115 116 void qemu_set_block(int fd) 117 { 118 unsigned long opt = 0; 119 WSAEventSelect(fd, NULL, 0); 120 ioctlsocket(fd, FIONBIO, &opt); 121 } 122 123 void qemu_set_nonblock(int fd) 124 { 125 unsigned long opt = 1; 126 ioctlsocket(fd, FIONBIO, &opt); 127 qemu_fd_register(fd); 128 } 129 130 int inet_aton(const char *cp, struct in_addr *ia) 131 { 132 uint32_t addr = inet_addr(cp); 133 if (addr == 0xffffffff) { 134 return 0; 135 } 136 ia->s_addr = addr; 137 return 1; 138 } 139 140 void qemu_set_cloexec(int fd) 141 { 142 } 143 144 /* Offset between 1/1/1601 and 1/1/1970 in 100 nanosec units */ 145 #define _W32_FT_OFFSET (116444736000000000ULL) 146 147 int qemu_gettimeofday(qemu_timeval *tp) 148 { 149 union { 150 unsigned long long ns100; /*time since 1 Jan 1601 in 100ns units */ 151 FILETIME ft; 152 } _now; 153 154 if(tp) { 155 GetSystemTimeAsFileTime (&_now.ft); 156 tp->tv_usec=(long)((_now.ns100 / 10ULL) % 1000000ULL ); 157 tp->tv_sec= (long)((_now.ns100 - _W32_FT_OFFSET) / 10000000ULL); 158 } 159 /* Always return 0 as per Open Group Base Specifications Issue 6. 160 Do not set errno on error. */ 161 return 0; 162 } 163 164 int qemu_get_thread_id(void) 165 { 166 return GetCurrentThreadId(); 167 } 168 169 char * 170 qemu_get_local_state_pathname(const char *relative_pathname) 171 { 172 HRESULT result; 173 char base_path[MAX_PATH+1] = ""; 174 175 result = SHGetFolderPath(NULL, CSIDL_COMMON_APPDATA, NULL, 176 /* SHGFP_TYPE_CURRENT */ 0, base_path); 177 if (result != S_OK) { 178 /* misconfigured environment */ 179 g_critical("CSIDL_COMMON_APPDATA unavailable: %ld", (long)result); 180 abort(); 181 } 182 return g_strdup_printf("%s" G_DIR_SEPARATOR_S "%s", base_path, 183 relative_pathname); 184 } 185