5a6f2f1cbfcfab31ecc8b9d7768b9348fae6e806
[platform/upstream/nodejs.git] / deps / v8 / src / base / platform / platform-win32.cc
1 // Copyright 2012 the V8 project authors. All rights reserved.
2 // Use of this source code is governed by a BSD-style license that can be
3 // found in the LICENSE file.
4
5 // Platform-specific code for Win32.
6
7 // Secure API functions are not available using MinGW with msvcrt.dll
8 // on Windows XP. Make sure MINGW_HAS_SECURE_API is not defined to
9 // disable definition of secure API functions in standard headers that
10 // would conflict with our own implementation.
11 #ifdef __MINGW32__
12 #include <_mingw.h>
13 #ifdef MINGW_HAS_SECURE_API
14 #undef MINGW_HAS_SECURE_API
15 #endif  // MINGW_HAS_SECURE_API
16 #endif  // __MINGW32__
17
18 #include <limits>
19
20 #include "src/base/win32-headers.h"
21
22 #include "src/base/bits.h"
23 #include "src/base/lazy-instance.h"
24 #include "src/base/macros.h"
25 #include "src/base/platform/platform.h"
26 #include "src/base/platform/time.h"
27 #include "src/base/utils/random-number-generator.h"
28
29
30 // Extra functions for MinGW. Most of these are the _s functions which are in
31 // the Microsoft Visual Studio C++ CRT.
32 #ifdef __MINGW32__
33
34
35 #ifndef __MINGW64_VERSION_MAJOR
36
37 #define _TRUNCATE 0
38 #define STRUNCATE 80
39
40 inline void MemoryBarrier() {
41   int barrier = 0;
42   __asm__ __volatile__("xchgl %%eax,%0 ":"=r" (barrier));
43 }
44
45 #endif  // __MINGW64_VERSION_MAJOR
46
47
48 int localtime_s(tm* out_tm, const time_t* time) {
49   tm* posix_local_time_struct = localtime(time);
50   if (posix_local_time_struct == NULL) return 1;
51   *out_tm = *posix_local_time_struct;
52   return 0;
53 }
54
55
56 int fopen_s(FILE** pFile, const char* filename, const char* mode) {
57   *pFile = fopen(filename, mode);
58   return *pFile != NULL ? 0 : 1;
59 }
60
61 int _vsnprintf_s(char* buffer, size_t sizeOfBuffer, size_t count,
62                  const char* format, va_list argptr) {
63   DCHECK(count == _TRUNCATE);
64   return _vsnprintf(buffer, sizeOfBuffer, format, argptr);
65 }
66
67
68 int strncpy_s(char* dest, size_t dest_size, const char* source, size_t count) {
69   CHECK(source != NULL);
70   CHECK(dest != NULL);
71   CHECK_GT(dest_size, 0);
72
73   if (count == _TRUNCATE) {
74     while (dest_size > 0 && *source != 0) {
75       *(dest++) = *(source++);
76       --dest_size;
77     }
78     if (dest_size == 0) {
79       *(dest - 1) = 0;
80       return STRUNCATE;
81     }
82   } else {
83     while (dest_size > 0 && count > 0 && *source != 0) {
84       *(dest++) = *(source++);
85       --dest_size;
86       --count;
87     }
88   }
89   CHECK_GT(dest_size, 0);
90   *dest = 0;
91   return 0;
92 }
93
94 #endif  // __MINGW32__
95
96 namespace v8 {
97 namespace base {
98
99 namespace {
100
101 bool g_hard_abort = false;
102
103 }  // namespace
104
105 class TimezoneCache {
106  public:
107   TimezoneCache() : initialized_(false) { }
108
109   void Clear() {
110     initialized_ = false;
111   }
112
113   // Initialize timezone information. The timezone information is obtained from
114   // windows. If we cannot get the timezone information we fall back to CET.
115   void InitializeIfNeeded() {
116     // Just return if timezone information has already been initialized.
117     if (initialized_) return;
118
119     // Initialize POSIX time zone data.
120     _tzset();
121     // Obtain timezone information from operating system.
122     memset(&tzinfo_, 0, sizeof(tzinfo_));
123     if (GetTimeZoneInformation(&tzinfo_) == TIME_ZONE_ID_INVALID) {
124       // If we cannot get timezone information we fall back to CET.
125       tzinfo_.Bias = -60;
126       tzinfo_.StandardDate.wMonth = 10;
127       tzinfo_.StandardDate.wDay = 5;
128       tzinfo_.StandardDate.wHour = 3;
129       tzinfo_.StandardBias = 0;
130       tzinfo_.DaylightDate.wMonth = 3;
131       tzinfo_.DaylightDate.wDay = 5;
132       tzinfo_.DaylightDate.wHour = 2;
133       tzinfo_.DaylightBias = -60;
134     }
135
136     // Make standard and DST timezone names.
137     WideCharToMultiByte(CP_UTF8, 0, tzinfo_.StandardName, -1,
138                         std_tz_name_, kTzNameSize, NULL, NULL);
139     std_tz_name_[kTzNameSize - 1] = '\0';
140     WideCharToMultiByte(CP_UTF8, 0, tzinfo_.DaylightName, -1,
141                         dst_tz_name_, kTzNameSize, NULL, NULL);
142     dst_tz_name_[kTzNameSize - 1] = '\0';
143
144     // If OS returned empty string or resource id (like "@tzres.dll,-211")
145     // simply guess the name from the UTC bias of the timezone.
146     // To properly resolve the resource identifier requires a library load,
147     // which is not possible in a sandbox.
148     if (std_tz_name_[0] == '\0' || std_tz_name_[0] == '@') {
149       OS::SNPrintF(std_tz_name_, kTzNameSize - 1,
150                    "%s Standard Time",
151                    GuessTimezoneNameFromBias(tzinfo_.Bias));
152     }
153     if (dst_tz_name_[0] == '\0' || dst_tz_name_[0] == '@') {
154       OS::SNPrintF(dst_tz_name_, kTzNameSize - 1,
155                    "%s Daylight Time",
156                    GuessTimezoneNameFromBias(tzinfo_.Bias));
157     }
158     // Timezone information initialized.
159     initialized_ = true;
160   }
161
162   // Guess the name of the timezone from the bias.
163   // The guess is very biased towards the northern hemisphere.
164   const char* GuessTimezoneNameFromBias(int bias) {
165     static const int kHour = 60;
166     switch (-bias) {
167       case -9*kHour: return "Alaska";
168       case -8*kHour: return "Pacific";
169       case -7*kHour: return "Mountain";
170       case -6*kHour: return "Central";
171       case -5*kHour: return "Eastern";
172       case -4*kHour: return "Atlantic";
173       case  0*kHour: return "GMT";
174       case +1*kHour: return "Central Europe";
175       case +2*kHour: return "Eastern Europe";
176       case +3*kHour: return "Russia";
177       case +5*kHour + 30: return "India";
178       case +8*kHour: return "China";
179       case +9*kHour: return "Japan";
180       case +12*kHour: return "New Zealand";
181       default: return "Local";
182     }
183   }
184
185
186  private:
187   static const int kTzNameSize = 128;
188   bool initialized_;
189   char std_tz_name_[kTzNameSize];
190   char dst_tz_name_[kTzNameSize];
191   TIME_ZONE_INFORMATION tzinfo_;
192   friend class Win32Time;
193 };
194
195
196 // ----------------------------------------------------------------------------
197 // The Time class represents time on win32. A timestamp is represented as
198 // a 64-bit integer in 100 nanoseconds since January 1, 1601 (UTC). JavaScript
199 // timestamps are represented as a doubles in milliseconds since 00:00:00 UTC,
200 // January 1, 1970.
201
202 class Win32Time {
203  public:
204   // Constructors.
205   Win32Time();
206   explicit Win32Time(double jstime);
207   Win32Time(int year, int mon, int day, int hour, int min, int sec);
208
209   // Convert timestamp to JavaScript representation.
210   double ToJSTime();
211
212   // Set timestamp to current time.
213   void SetToCurrentTime();
214
215   // Returns the local timezone offset in milliseconds east of UTC. This is
216   // the number of milliseconds you must add to UTC to get local time, i.e.
217   // LocalOffset(CET) = 3600000 and LocalOffset(PST) = -28800000. This
218   // routine also takes into account whether daylight saving is effect
219   // at the time.
220   int64_t LocalOffset(TimezoneCache* cache);
221
222   // Returns the daylight savings time offset for the time in milliseconds.
223   int64_t DaylightSavingsOffset(TimezoneCache* cache);
224
225   // Returns a string identifying the current timezone for the
226   // timestamp taking into account daylight saving.
227   char* LocalTimezone(TimezoneCache* cache);
228
229  private:
230   // Constants for time conversion.
231   static const int64_t kTimeEpoc = 116444736000000000LL;
232   static const int64_t kTimeScaler = 10000;
233   static const int64_t kMsPerMinute = 60000;
234
235   // Constants for timezone information.
236   static const bool kShortTzNames = false;
237
238   // Return whether or not daylight savings time is in effect at this time.
239   bool InDST(TimezoneCache* cache);
240
241   // Accessor for FILETIME representation.
242   FILETIME& ft() { return time_.ft_; }
243
244   // Accessor for integer representation.
245   int64_t& t() { return time_.t_; }
246
247   // Although win32 uses 64-bit integers for representing timestamps,
248   // these are packed into a FILETIME structure. The FILETIME structure
249   // is just a struct representing a 64-bit integer. The TimeStamp union
250   // allows access to both a FILETIME and an integer representation of
251   // the timestamp.
252   union TimeStamp {
253     FILETIME ft_;
254     int64_t t_;
255   };
256
257   TimeStamp time_;
258 };
259
260
261 // Initialize timestamp to start of epoc.
262 Win32Time::Win32Time() {
263   t() = 0;
264 }
265
266
267 // Initialize timestamp from a JavaScript timestamp.
268 Win32Time::Win32Time(double jstime) {
269   t() = static_cast<int64_t>(jstime) * kTimeScaler + kTimeEpoc;
270 }
271
272
273 // Initialize timestamp from date/time components.
274 Win32Time::Win32Time(int year, int mon, int day, int hour, int min, int sec) {
275   SYSTEMTIME st;
276   st.wYear = year;
277   st.wMonth = mon;
278   st.wDay = day;
279   st.wHour = hour;
280   st.wMinute = min;
281   st.wSecond = sec;
282   st.wMilliseconds = 0;
283   SystemTimeToFileTime(&st, &ft());
284 }
285
286
287 // Convert timestamp to JavaScript timestamp.
288 double Win32Time::ToJSTime() {
289   return static_cast<double>((t() - kTimeEpoc) / kTimeScaler);
290 }
291
292
293 // Set timestamp to current time.
294 void Win32Time::SetToCurrentTime() {
295   // The default GetSystemTimeAsFileTime has a ~15.5ms resolution.
296   // Because we're fast, we like fast timers which have at least a
297   // 1ms resolution.
298   //
299   // timeGetTime() provides 1ms granularity when combined with
300   // timeBeginPeriod().  If the host application for v8 wants fast
301   // timers, it can use timeBeginPeriod to increase the resolution.
302   //
303   // Using timeGetTime() has a drawback because it is a 32bit value
304   // and hence rolls-over every ~49days.
305   //
306   // To use the clock, we use GetSystemTimeAsFileTime as our base;
307   // and then use timeGetTime to extrapolate current time from the
308   // start time.  To deal with rollovers, we resync the clock
309   // any time when more than kMaxClockElapsedTime has passed or
310   // whenever timeGetTime creates a rollover.
311
312   static bool initialized = false;
313   static TimeStamp init_time;
314   static DWORD init_ticks;
315   static const int64_t kHundredNanosecondsPerSecond = 10000000;
316   static const int64_t kMaxClockElapsedTime =
317       60*kHundredNanosecondsPerSecond;  // 1 minute
318
319   // If we are uninitialized, we need to resync the clock.
320   bool needs_resync = !initialized;
321
322   // Get the current time.
323   TimeStamp time_now;
324   GetSystemTimeAsFileTime(&time_now.ft_);
325   DWORD ticks_now = timeGetTime();
326
327   // Check if we need to resync due to clock rollover.
328   needs_resync |= ticks_now < init_ticks;
329
330   // Check if we need to resync due to elapsed time.
331   needs_resync |= (time_now.t_ - init_time.t_) > kMaxClockElapsedTime;
332
333   // Check if we need to resync due to backwards time change.
334   needs_resync |= time_now.t_ < init_time.t_;
335
336   // Resync the clock if necessary.
337   if (needs_resync) {
338     GetSystemTimeAsFileTime(&init_time.ft_);
339     init_ticks = ticks_now = timeGetTime();
340     initialized = true;
341   }
342
343   // Finally, compute the actual time.  Why is this so hard.
344   DWORD elapsed = ticks_now - init_ticks;
345   this->time_.t_ = init_time.t_ + (static_cast<int64_t>(elapsed) * 10000);
346 }
347
348
349 // Return the local timezone offset in milliseconds east of UTC. This
350 // takes into account whether daylight saving is in effect at the time.
351 // Only times in the 32-bit Unix range may be passed to this function.
352 // Also, adding the time-zone offset to the input must not overflow.
353 // The function EquivalentTime() in date.js guarantees this.
354 int64_t Win32Time::LocalOffset(TimezoneCache* cache) {
355   cache->InitializeIfNeeded();
356
357   Win32Time rounded_to_second(*this);
358   rounded_to_second.t() =
359       rounded_to_second.t() / 1000 / kTimeScaler * 1000 * kTimeScaler;
360   // Convert to local time using POSIX localtime function.
361   // Windows XP Service Pack 3 made SystemTimeToTzSpecificLocalTime()
362   // very slow.  Other browsers use localtime().
363
364   // Convert from JavaScript milliseconds past 1/1/1970 0:00:00 to
365   // POSIX seconds past 1/1/1970 0:00:00.
366   double unchecked_posix_time = rounded_to_second.ToJSTime() / 1000;
367   if (unchecked_posix_time > INT_MAX || unchecked_posix_time < 0) {
368     return 0;
369   }
370   // Because _USE_32BIT_TIME_T is defined, time_t is a 32-bit int.
371   time_t posix_time = static_cast<time_t>(unchecked_posix_time);
372
373   // Convert to local time, as struct with fields for day, hour, year, etc.
374   tm posix_local_time_struct;
375   if (localtime_s(&posix_local_time_struct, &posix_time)) return 0;
376
377   if (posix_local_time_struct.tm_isdst > 0) {
378     return (cache->tzinfo_.Bias + cache->tzinfo_.DaylightBias) * -kMsPerMinute;
379   } else if (posix_local_time_struct.tm_isdst == 0) {
380     return (cache->tzinfo_.Bias + cache->tzinfo_.StandardBias) * -kMsPerMinute;
381   } else {
382     return cache->tzinfo_.Bias * -kMsPerMinute;
383   }
384 }
385
386
387 // Return whether or not daylight savings time is in effect at this time.
388 bool Win32Time::InDST(TimezoneCache* cache) {
389   cache->InitializeIfNeeded();
390
391   // Determine if DST is in effect at the specified time.
392   bool in_dst = false;
393   if (cache->tzinfo_.StandardDate.wMonth != 0 ||
394       cache->tzinfo_.DaylightDate.wMonth != 0) {
395     // Get the local timezone offset for the timestamp in milliseconds.
396     int64_t offset = LocalOffset(cache);
397
398     // Compute the offset for DST. The bias parameters in the timezone info
399     // are specified in minutes. These must be converted to milliseconds.
400     int64_t dstofs =
401         -(cache->tzinfo_.Bias + cache->tzinfo_.DaylightBias) * kMsPerMinute;
402
403     // If the local time offset equals the timezone bias plus the daylight
404     // bias then DST is in effect.
405     in_dst = offset == dstofs;
406   }
407
408   return in_dst;
409 }
410
411
412 // Return the daylight savings time offset for this time.
413 int64_t Win32Time::DaylightSavingsOffset(TimezoneCache* cache) {
414   return InDST(cache) ? 60 * kMsPerMinute : 0;
415 }
416
417
418 // Returns a string identifying the current timezone for the
419 // timestamp taking into account daylight saving.
420 char* Win32Time::LocalTimezone(TimezoneCache* cache) {
421   // Return the standard or DST time zone name based on whether daylight
422   // saving is in effect at the given time.
423   return InDST(cache) ? cache->dst_tz_name_ : cache->std_tz_name_;
424 }
425
426
427 // Returns the accumulated user time for thread.
428 int OS::GetUserTime(uint32_t* secs,  uint32_t* usecs) {
429   FILETIME dummy;
430   uint64_t usertime;
431
432   // Get the amount of time that the thread has executed in user mode.
433   if (!GetThreadTimes(GetCurrentThread(), &dummy, &dummy, &dummy,
434                       reinterpret_cast<FILETIME*>(&usertime))) return -1;
435
436   // Adjust the resolution to micro-seconds.
437   usertime /= 10;
438
439   // Convert to seconds and microseconds
440   *secs = static_cast<uint32_t>(usertime / 1000000);
441   *usecs = static_cast<uint32_t>(usertime % 1000000);
442   return 0;
443 }
444
445
446 // Returns current time as the number of milliseconds since
447 // 00:00:00 UTC, January 1, 1970.
448 double OS::TimeCurrentMillis() {
449   return Time::Now().ToJsTime();
450 }
451
452
453 TimezoneCache* OS::CreateTimezoneCache() {
454   return new TimezoneCache();
455 }
456
457
458 void OS::DisposeTimezoneCache(TimezoneCache* cache) {
459   delete cache;
460 }
461
462
463 void OS::ClearTimezoneCache(TimezoneCache* cache) {
464   cache->Clear();
465 }
466
467
468 // Returns a string identifying the current timezone taking into
469 // account daylight saving.
470 const char* OS::LocalTimezone(double time, TimezoneCache* cache) {
471   return Win32Time(time).LocalTimezone(cache);
472 }
473
474
475 // Returns the local time offset in milliseconds east of UTC without
476 // taking daylight savings time into account.
477 double OS::LocalTimeOffset(TimezoneCache* cache) {
478   // Use current time, rounded to the millisecond.
479   Win32Time t(TimeCurrentMillis());
480   // Time::LocalOffset inlcudes any daylight savings offset, so subtract it.
481   return static_cast<double>(t.LocalOffset(cache) -
482                              t.DaylightSavingsOffset(cache));
483 }
484
485
486 // Returns the daylight savings offset in milliseconds for the given
487 // time.
488 double OS::DaylightSavingsOffset(double time, TimezoneCache* cache) {
489   int64_t offset = Win32Time(time).DaylightSavingsOffset(cache);
490   return static_cast<double>(offset);
491 }
492
493
494 int OS::GetLastError() {
495   return ::GetLastError();
496 }
497
498
499 int OS::GetCurrentProcessId() {
500   return static_cast<int>(::GetCurrentProcessId());
501 }
502
503
504 int OS::GetCurrentThreadId() {
505   return static_cast<int>(::GetCurrentThreadId());
506 }
507
508
509 // ----------------------------------------------------------------------------
510 // Win32 console output.
511 //
512 // If a Win32 application is linked as a console application it has a normal
513 // standard output and standard error. In this case normal printf works fine
514 // for output. However, if the application is linked as a GUI application,
515 // the process doesn't have a console, and therefore (debugging) output is lost.
516 // This is the case if we are embedded in a windows program (like a browser).
517 // In order to be able to get debug output in this case the the debugging
518 // facility using OutputDebugString. This output goes to the active debugger
519 // for the process (if any). Else the output can be monitored using DBMON.EXE.
520
521 enum OutputMode {
522   UNKNOWN,  // Output method has not yet been determined.
523   CONSOLE,  // Output is written to stdout.
524   ODS       // Output is written to debug facility.
525 };
526
527 static OutputMode output_mode = UNKNOWN;  // Current output mode.
528
529
530 // Determine if the process has a console for output.
531 static bool HasConsole() {
532   // Only check the first time. Eventual race conditions are not a problem,
533   // because all threads will eventually determine the same mode.
534   if (output_mode == UNKNOWN) {
535     // We cannot just check that the standard output is attached to a console
536     // because this would fail if output is redirected to a file. Therefore we
537     // say that a process does not have an output console if either the
538     // standard output handle is invalid or its file type is unknown.
539     if (GetStdHandle(STD_OUTPUT_HANDLE) != INVALID_HANDLE_VALUE &&
540         GetFileType(GetStdHandle(STD_OUTPUT_HANDLE)) != FILE_TYPE_UNKNOWN)
541       output_mode = CONSOLE;
542     else
543       output_mode = ODS;
544   }
545   return output_mode == CONSOLE;
546 }
547
548
549 static void VPrintHelper(FILE* stream, const char* format, va_list args) {
550   if ((stream == stdout || stream == stderr) && !HasConsole()) {
551     // It is important to use safe print here in order to avoid
552     // overflowing the buffer. We might truncate the output, but this
553     // does not crash.
554     char buffer[4096];
555     OS::VSNPrintF(buffer, sizeof(buffer), format, args);
556     OutputDebugStringA(buffer);
557   } else {
558     vfprintf(stream, format, args);
559   }
560 }
561
562
563 FILE* OS::FOpen(const char* path, const char* mode) {
564   FILE* result;
565   if (fopen_s(&result, path, mode) == 0) {
566     return result;
567   } else {
568     return NULL;
569   }
570 }
571
572
573 bool OS::Remove(const char* path) {
574   return (DeleteFileA(path) != 0);
575 }
576
577
578 FILE* OS::OpenTemporaryFile() {
579   // tmpfile_s tries to use the root dir, don't use it.
580   char tempPathBuffer[MAX_PATH];
581   DWORD path_result = 0;
582   path_result = GetTempPathA(MAX_PATH, tempPathBuffer);
583   if (path_result > MAX_PATH || path_result == 0) return NULL;
584   UINT name_result = 0;
585   char tempNameBuffer[MAX_PATH];
586   name_result = GetTempFileNameA(tempPathBuffer, "", 0, tempNameBuffer);
587   if (name_result == 0) return NULL;
588   FILE* result = FOpen(tempNameBuffer, "w+");  // Same mode as tmpfile uses.
589   if (result != NULL) {
590     Remove(tempNameBuffer);  // Delete on close.
591   }
592   return result;
593 }
594
595
596 // Open log file in binary mode to avoid /n -> /r/n conversion.
597 const char* const OS::LogFileOpenMode = "wb";
598
599
600 // Print (debug) message to console.
601 void OS::Print(const char* format, ...) {
602   va_list args;
603   va_start(args, format);
604   VPrint(format, args);
605   va_end(args);
606 }
607
608
609 void OS::VPrint(const char* format, va_list args) {
610   VPrintHelper(stdout, format, args);
611 }
612
613
614 void OS::FPrint(FILE* out, const char* format, ...) {
615   va_list args;
616   va_start(args, format);
617   VFPrint(out, format, args);
618   va_end(args);
619 }
620
621
622 void OS::VFPrint(FILE* out, const char* format, va_list args) {
623   VPrintHelper(out, format, args);
624 }
625
626
627 // Print error message to console.
628 void OS::PrintError(const char* format, ...) {
629   va_list args;
630   va_start(args, format);
631   VPrintError(format, args);
632   va_end(args);
633 }
634
635
636 void OS::VPrintError(const char* format, va_list args) {
637   VPrintHelper(stderr, format, args);
638 }
639
640
641 int OS::SNPrintF(char* str, int length, const char* format, ...) {
642   va_list args;
643   va_start(args, format);
644   int result = VSNPrintF(str, length, format, args);
645   va_end(args);
646   return result;
647 }
648
649
650 int OS::VSNPrintF(char* str, int length, const char* format, va_list args) {
651   int n = _vsnprintf_s(str, length, _TRUNCATE, format, args);
652   // Make sure to zero-terminate the string if the output was
653   // truncated or if there was an error.
654   if (n < 0 || n >= length) {
655     if (length > 0)
656       str[length - 1] = '\0';
657     return -1;
658   } else {
659     return n;
660   }
661 }
662
663
664 char* OS::StrChr(char* str, int c) {
665   return const_cast<char*>(strchr(str, c));
666 }
667
668
669 void OS::StrNCpy(char* dest, int length, const char* src, size_t n) {
670   // Use _TRUNCATE or strncpy_s crashes (by design) if buffer is too small.
671   size_t buffer_size = static_cast<size_t>(length);
672   if (n + 1 > buffer_size)  // count for trailing '\0'
673     n = _TRUNCATE;
674   int result = strncpy_s(dest, length, src, n);
675   USE(result);
676   DCHECK(result == 0 || (n == _TRUNCATE && result == STRUNCATE));
677 }
678
679
680 #undef _TRUNCATE
681 #undef STRUNCATE
682
683
684 // Get the system's page size used by VirtualAlloc() or the next power
685 // of two. The reason for always returning a power of two is that the
686 // rounding up in OS::Allocate expects that.
687 static size_t GetPageSize() {
688   static size_t page_size = 0;
689   if (page_size == 0) {
690     SYSTEM_INFO info;
691     GetSystemInfo(&info);
692     page_size = base::bits::RoundUpToPowerOfTwo32(info.dwPageSize);
693   }
694   return page_size;
695 }
696
697
698 // The allocation alignment is the guaranteed alignment for
699 // VirtualAlloc'ed blocks of memory.
700 size_t OS::AllocateAlignment() {
701   static size_t allocate_alignment = 0;
702   if (allocate_alignment == 0) {
703     SYSTEM_INFO info;
704     GetSystemInfo(&info);
705     allocate_alignment = info.dwAllocationGranularity;
706   }
707   return allocate_alignment;
708 }
709
710
711 static LazyInstance<RandomNumberGenerator>::type
712     platform_random_number_generator = LAZY_INSTANCE_INITIALIZER;
713
714
715 void OS::Initialize(int64_t random_seed, bool hard_abort,
716                     const char* const gc_fake_mmap) {
717   if (random_seed) {
718     platform_random_number_generator.Pointer()->SetSeed(random_seed);
719   }
720   g_hard_abort = hard_abort;
721 }
722
723
724 void* OS::GetRandomMmapAddr() {
725   // The address range used to randomize RWX allocations in OS::Allocate
726   // Try not to map pages into the default range that windows loads DLLs
727   // Use a multiple of 64k to prevent committing unused memory.
728   // Note: This does not guarantee RWX regions will be within the
729   // range kAllocationRandomAddressMin to kAllocationRandomAddressMax
730 #ifdef V8_HOST_ARCH_64_BIT
731   static const intptr_t kAllocationRandomAddressMin = 0x0000000080000000;
732   static const intptr_t kAllocationRandomAddressMax = 0x000003FFFFFF0000;
733 #else
734   static const intptr_t kAllocationRandomAddressMin = 0x04000000;
735   static const intptr_t kAllocationRandomAddressMax = 0x3FFF0000;
736 #endif
737   uintptr_t address =
738       (platform_random_number_generator.Pointer()->NextInt() << kPageSizeBits) |
739       kAllocationRandomAddressMin;
740   address &= kAllocationRandomAddressMax;
741   return reinterpret_cast<void *>(address);
742 }
743
744
745 static void* RandomizedVirtualAlloc(size_t size, int action, int protection) {
746   LPVOID base = NULL;
747
748   if (protection == PAGE_EXECUTE_READWRITE || protection == PAGE_NOACCESS) {
749     // For exectutable pages try and randomize the allocation address
750     for (size_t attempts = 0; base == NULL && attempts < 3; ++attempts) {
751       base = VirtualAlloc(OS::GetRandomMmapAddr(), size, action, protection);
752     }
753   }
754
755   // After three attempts give up and let the OS find an address to use.
756   if (base == NULL) base = VirtualAlloc(NULL, size, action, protection);
757
758   return base;
759 }
760
761
762 void* OS::Allocate(const size_t requested,
763                    size_t* allocated,
764                    bool is_executable) {
765   // VirtualAlloc rounds allocated size to page size automatically.
766   size_t msize = RoundUp(requested, static_cast<int>(GetPageSize()));
767
768   // Windows XP SP2 allows Data Excution Prevention (DEP).
769   int prot = is_executable ? PAGE_EXECUTE_READWRITE : PAGE_READWRITE;
770
771   LPVOID mbase = RandomizedVirtualAlloc(msize,
772                                         MEM_COMMIT | MEM_RESERVE,
773                                         prot);
774
775   if (mbase == NULL) return NULL;
776
777   DCHECK((reinterpret_cast<uintptr_t>(mbase) % OS::AllocateAlignment()) == 0);
778
779   *allocated = msize;
780   return mbase;
781 }
782
783
784 void OS::Free(void* address, const size_t size) {
785   // TODO(1240712): VirtualFree has a return value which is ignored here.
786   VirtualFree(address, 0, MEM_RELEASE);
787   USE(size);
788 }
789
790
791 intptr_t OS::CommitPageSize() {
792   return 4096;
793 }
794
795
796 void OS::ProtectCode(void* address, const size_t size) {
797   DWORD old_protect;
798   VirtualProtect(address, size, PAGE_EXECUTE_READ, &old_protect);
799 }
800
801
802 void OS::Guard(void* address, const size_t size) {
803   DWORD oldprotect;
804   VirtualProtect(address, size, PAGE_NOACCESS, &oldprotect);
805 }
806
807
808 void OS::Sleep(int milliseconds) {
809   ::Sleep(milliseconds);
810 }
811
812
813 void OS::Abort() {
814   if (g_hard_abort) {
815     V8_IMMEDIATE_CRASH();
816   }
817   // Make the MSVCRT do a silent abort.
818   raise(SIGABRT);
819 }
820
821
822 void OS::DebugBreak() {
823 #if V8_CC_MSVC
824   // To avoid Visual Studio runtime support the following code can be used
825   // instead
826   // __asm { int 3 }
827   __debugbreak();
828 #else
829   ::DebugBreak();
830 #endif
831 }
832
833
834 class Win32MemoryMappedFile : public OS::MemoryMappedFile {
835  public:
836   Win32MemoryMappedFile(HANDLE file,
837                         HANDLE file_mapping,
838                         void* memory,
839                         int size)
840       : file_(file),
841         file_mapping_(file_mapping),
842         memory_(memory),
843         size_(size) { }
844   virtual ~Win32MemoryMappedFile();
845   virtual void* memory() { return memory_; }
846   virtual int size() { return size_; }
847  private:
848   HANDLE file_;
849   HANDLE file_mapping_;
850   void* memory_;
851   int size_;
852 };
853
854
855 OS::MemoryMappedFile* OS::MemoryMappedFile::open(const char* name) {
856   // Open a physical file
857   HANDLE file = CreateFileA(name, GENERIC_READ | GENERIC_WRITE,
858       FILE_SHARE_READ | FILE_SHARE_WRITE, NULL, OPEN_EXISTING, 0, NULL);
859   if (file == INVALID_HANDLE_VALUE) return NULL;
860
861   int size = static_cast<int>(GetFileSize(file, NULL));
862
863   // Create a file mapping for the physical file
864   HANDLE file_mapping = CreateFileMapping(file, NULL,
865       PAGE_READWRITE, 0, static_cast<DWORD>(size), NULL);
866   if (file_mapping == NULL) return NULL;
867
868   // Map a view of the file into memory
869   void* memory = MapViewOfFile(file_mapping, FILE_MAP_ALL_ACCESS, 0, 0, size);
870   return new Win32MemoryMappedFile(file, file_mapping, memory, size);
871 }
872
873
874 OS::MemoryMappedFile* OS::MemoryMappedFile::create(const char* name, int size,
875     void* initial) {
876   // Open a physical file
877   HANDLE file = CreateFileA(name, GENERIC_READ | GENERIC_WRITE,
878       FILE_SHARE_READ | FILE_SHARE_WRITE, NULL, OPEN_ALWAYS, 0, NULL);
879   if (file == NULL) return NULL;
880   // Create a file mapping for the physical file
881   HANDLE file_mapping = CreateFileMapping(file, NULL,
882       PAGE_READWRITE, 0, static_cast<DWORD>(size), NULL);
883   if (file_mapping == NULL) return NULL;
884   // Map a view of the file into memory
885   void* memory = MapViewOfFile(file_mapping, FILE_MAP_ALL_ACCESS, 0, 0, size);
886   if (memory) memmove(memory, initial, size);
887   return new Win32MemoryMappedFile(file, file_mapping, memory, size);
888 }
889
890
891 Win32MemoryMappedFile::~Win32MemoryMappedFile() {
892   if (memory_ != NULL)
893     UnmapViewOfFile(memory_);
894   CloseHandle(file_mapping_);
895   CloseHandle(file_);
896 }
897
898
899 // The following code loads functions defined in DbhHelp.h and TlHelp32.h
900 // dynamically. This is to avoid being depending on dbghelp.dll and
901 // tlhelp32.dll when running (the functions in tlhelp32.dll have been moved to
902 // kernel32.dll at some point so loading functions defines in TlHelp32.h
903 // dynamically might not be necessary any more - for some versions of Windows?).
904
905 // Function pointers to functions dynamically loaded from dbghelp.dll.
906 #define DBGHELP_FUNCTION_LIST(V)  \
907   V(SymInitialize)                \
908   V(SymGetOptions)                \
909   V(SymSetOptions)                \
910   V(SymGetSearchPath)             \
911   V(SymLoadModule64)              \
912   V(StackWalk64)                  \
913   V(SymGetSymFromAddr64)          \
914   V(SymGetLineFromAddr64)         \
915   V(SymFunctionTableAccess64)     \
916   V(SymGetModuleBase64)
917
918 // Function pointers to functions dynamically loaded from dbghelp.dll.
919 #define TLHELP32_FUNCTION_LIST(V)  \
920   V(CreateToolhelp32Snapshot)      \
921   V(Module32FirstW)                \
922   V(Module32NextW)
923
924 // Define the decoration to use for the type and variable name used for
925 // dynamically loaded DLL function..
926 #define DLL_FUNC_TYPE(name) _##name##_
927 #define DLL_FUNC_VAR(name) _##name
928
929 // Define the type for each dynamically loaded DLL function. The function
930 // definitions are copied from DbgHelp.h and TlHelp32.h. The IN and VOID macros
931 // from the Windows include files are redefined here to have the function
932 // definitions to be as close to the ones in the original .h files as possible.
933 #ifndef IN
934 #define IN
935 #endif
936 #ifndef VOID
937 #define VOID void
938 #endif
939
940 // DbgHelp isn't supported on MinGW yet
941 #ifndef __MINGW32__
942 // DbgHelp.h functions.
943 typedef BOOL (__stdcall *DLL_FUNC_TYPE(SymInitialize))(IN HANDLE hProcess,
944                                                        IN PSTR UserSearchPath,
945                                                        IN BOOL fInvadeProcess);
946 typedef DWORD (__stdcall *DLL_FUNC_TYPE(SymGetOptions))(VOID);
947 typedef DWORD (__stdcall *DLL_FUNC_TYPE(SymSetOptions))(IN DWORD SymOptions);
948 typedef BOOL (__stdcall *DLL_FUNC_TYPE(SymGetSearchPath))(
949     IN HANDLE hProcess,
950     OUT PSTR SearchPath,
951     IN DWORD SearchPathLength);
952 typedef DWORD64 (__stdcall *DLL_FUNC_TYPE(SymLoadModule64))(
953     IN HANDLE hProcess,
954     IN HANDLE hFile,
955     IN PSTR ImageName,
956     IN PSTR ModuleName,
957     IN DWORD64 BaseOfDll,
958     IN DWORD SizeOfDll);
959 typedef BOOL (__stdcall *DLL_FUNC_TYPE(StackWalk64))(
960     DWORD MachineType,
961     HANDLE hProcess,
962     HANDLE hThread,
963     LPSTACKFRAME64 StackFrame,
964     PVOID ContextRecord,
965     PREAD_PROCESS_MEMORY_ROUTINE64 ReadMemoryRoutine,
966     PFUNCTION_TABLE_ACCESS_ROUTINE64 FunctionTableAccessRoutine,
967     PGET_MODULE_BASE_ROUTINE64 GetModuleBaseRoutine,
968     PTRANSLATE_ADDRESS_ROUTINE64 TranslateAddress);
969 typedef BOOL (__stdcall *DLL_FUNC_TYPE(SymGetSymFromAddr64))(
970     IN HANDLE hProcess,
971     IN DWORD64 qwAddr,
972     OUT PDWORD64 pdwDisplacement,
973     OUT PIMAGEHLP_SYMBOL64 Symbol);
974 typedef BOOL (__stdcall *DLL_FUNC_TYPE(SymGetLineFromAddr64))(
975     IN HANDLE hProcess,
976     IN DWORD64 qwAddr,
977     OUT PDWORD pdwDisplacement,
978     OUT PIMAGEHLP_LINE64 Line64);
979 // DbgHelp.h typedefs. Implementation found in dbghelp.dll.
980 typedef PVOID (__stdcall *DLL_FUNC_TYPE(SymFunctionTableAccess64))(
981     HANDLE hProcess,
982     DWORD64 AddrBase);  // DbgHelp.h typedef PFUNCTION_TABLE_ACCESS_ROUTINE64
983 typedef DWORD64 (__stdcall *DLL_FUNC_TYPE(SymGetModuleBase64))(
984     HANDLE hProcess,
985     DWORD64 AddrBase);  // DbgHelp.h typedef PGET_MODULE_BASE_ROUTINE64
986
987 // TlHelp32.h functions.
988 typedef HANDLE (__stdcall *DLL_FUNC_TYPE(CreateToolhelp32Snapshot))(
989     DWORD dwFlags,
990     DWORD th32ProcessID);
991 typedef BOOL (__stdcall *DLL_FUNC_TYPE(Module32FirstW))(HANDLE hSnapshot,
992                                                         LPMODULEENTRY32W lpme);
993 typedef BOOL (__stdcall *DLL_FUNC_TYPE(Module32NextW))(HANDLE hSnapshot,
994                                                        LPMODULEENTRY32W lpme);
995
996 #undef IN
997 #undef VOID
998
999 // Declare a variable for each dynamically loaded DLL function.
1000 #define DEF_DLL_FUNCTION(name) DLL_FUNC_TYPE(name) DLL_FUNC_VAR(name) = NULL;
1001 DBGHELP_FUNCTION_LIST(DEF_DLL_FUNCTION)
1002 TLHELP32_FUNCTION_LIST(DEF_DLL_FUNCTION)
1003 #undef DEF_DLL_FUNCTION
1004
1005 // Load the functions. This function has a lot of "ugly" macros in order to
1006 // keep down code duplication.
1007
1008 static bool LoadDbgHelpAndTlHelp32() {
1009   static bool dbghelp_loaded = false;
1010
1011   if (dbghelp_loaded) return true;
1012
1013   HMODULE module;
1014
1015   // Load functions from the dbghelp.dll module.
1016   module = LoadLibrary(TEXT("dbghelp.dll"));
1017   if (module == NULL) {
1018     return false;
1019   }
1020
1021 #define LOAD_DLL_FUNC(name)                                                 \
1022   DLL_FUNC_VAR(name) =                                                      \
1023       reinterpret_cast<DLL_FUNC_TYPE(name)>(GetProcAddress(module, #name));
1024
1025 DBGHELP_FUNCTION_LIST(LOAD_DLL_FUNC)
1026
1027 #undef LOAD_DLL_FUNC
1028
1029   // Load functions from the kernel32.dll module (the TlHelp32.h function used
1030   // to be in tlhelp32.dll but are now moved to kernel32.dll).
1031   module = LoadLibrary(TEXT("kernel32.dll"));
1032   if (module == NULL) {
1033     return false;
1034   }
1035
1036 #define LOAD_DLL_FUNC(name)                                                 \
1037   DLL_FUNC_VAR(name) =                                                      \
1038       reinterpret_cast<DLL_FUNC_TYPE(name)>(GetProcAddress(module, #name));
1039
1040 TLHELP32_FUNCTION_LIST(LOAD_DLL_FUNC)
1041
1042 #undef LOAD_DLL_FUNC
1043
1044   // Check that all functions where loaded.
1045   bool result =
1046 #define DLL_FUNC_LOADED(name) (DLL_FUNC_VAR(name) != NULL) &&
1047
1048 DBGHELP_FUNCTION_LIST(DLL_FUNC_LOADED)
1049 TLHELP32_FUNCTION_LIST(DLL_FUNC_LOADED)
1050
1051 #undef DLL_FUNC_LOADED
1052   true;
1053
1054   dbghelp_loaded = result;
1055   return result;
1056   // NOTE: The modules are never unloaded and will stay around until the
1057   // application is closed.
1058 }
1059
1060 #undef DBGHELP_FUNCTION_LIST
1061 #undef TLHELP32_FUNCTION_LIST
1062 #undef DLL_FUNC_VAR
1063 #undef DLL_FUNC_TYPE
1064
1065
1066 // Load the symbols for generating stack traces.
1067 static std::vector<OS::SharedLibraryAddress> LoadSymbols(
1068     HANDLE process_handle) {
1069   static std::vector<OS::SharedLibraryAddress> result;
1070
1071   static bool symbols_loaded = false;
1072
1073   if (symbols_loaded) return result;
1074
1075   BOOL ok;
1076
1077   // Initialize the symbol engine.
1078   ok = _SymInitialize(process_handle,  // hProcess
1079                       NULL,            // UserSearchPath
1080                       false);          // fInvadeProcess
1081   if (!ok) return result;
1082
1083   DWORD options = _SymGetOptions();
1084   options |= SYMOPT_LOAD_LINES;
1085   options |= SYMOPT_FAIL_CRITICAL_ERRORS;
1086   options = _SymSetOptions(options);
1087
1088   char buf[OS::kStackWalkMaxNameLen] = {0};
1089   ok = _SymGetSearchPath(process_handle, buf, OS::kStackWalkMaxNameLen);
1090   if (!ok) {
1091     int err = GetLastError();
1092     OS::Print("%d\n", err);
1093     return result;
1094   }
1095
1096   HANDLE snapshot = _CreateToolhelp32Snapshot(
1097       TH32CS_SNAPMODULE,       // dwFlags
1098       GetCurrentProcessId());  // th32ProcessId
1099   if (snapshot == INVALID_HANDLE_VALUE) return result;
1100   MODULEENTRY32W module_entry;
1101   module_entry.dwSize = sizeof(module_entry);  // Set the size of the structure.
1102   BOOL cont = _Module32FirstW(snapshot, &module_entry);
1103   while (cont) {
1104     DWORD64 base;
1105     // NOTE the SymLoadModule64 function has the peculiarity of accepting a
1106     // both unicode and ASCII strings even though the parameter is PSTR.
1107     base = _SymLoadModule64(
1108         process_handle,                                       // hProcess
1109         0,                                                    // hFile
1110         reinterpret_cast<PSTR>(module_entry.szExePath),       // ImageName
1111         reinterpret_cast<PSTR>(module_entry.szModule),        // ModuleName
1112         reinterpret_cast<DWORD64>(module_entry.modBaseAddr),  // BaseOfDll
1113         module_entry.modBaseSize);                            // SizeOfDll
1114     if (base == 0) {
1115       int err = GetLastError();
1116       if (err != ERROR_MOD_NOT_FOUND &&
1117           err != ERROR_INVALID_HANDLE) {
1118         result.clear();
1119         return result;
1120       }
1121     }
1122     int lib_name_length = WideCharToMultiByte(
1123         CP_UTF8, 0, module_entry.szExePath, -1, NULL, 0, NULL, NULL);
1124     std::string lib_name(lib_name_length, 0);
1125     WideCharToMultiByte(CP_UTF8, 0, module_entry.szExePath, -1, &lib_name[0],
1126                         lib_name_length, NULL, NULL);
1127     result.push_back(OS::SharedLibraryAddress(
1128         lib_name, reinterpret_cast<unsigned int>(module_entry.modBaseAddr),
1129         reinterpret_cast<unsigned int>(module_entry.modBaseAddr +
1130                                        module_entry.modBaseSize)));
1131     cont = _Module32NextW(snapshot, &module_entry);
1132   }
1133   CloseHandle(snapshot);
1134
1135   symbols_loaded = true;
1136   return result;
1137 }
1138
1139
1140 std::vector<OS::SharedLibraryAddress> OS::GetSharedLibraryAddresses() {
1141   // SharedLibraryEvents are logged when loading symbol information.
1142   // Only the shared libraries loaded at the time of the call to
1143   // GetSharedLibraryAddresses are logged.  DLLs loaded after
1144   // initialization are not accounted for.
1145   if (!LoadDbgHelpAndTlHelp32()) return std::vector<OS::SharedLibraryAddress>();
1146   HANDLE process_handle = GetCurrentProcess();
1147   return LoadSymbols(process_handle);
1148 }
1149
1150
1151 void OS::SignalCodeMovingGC() {
1152 }
1153
1154
1155 #else  // __MINGW32__
1156 std::vector<OS::SharedLibraryAddress> OS::GetSharedLibraryAddresses() {
1157   return std::vector<OS::SharedLibraryAddress>();
1158 }
1159
1160
1161 void OS::SignalCodeMovingGC() { }
1162 #endif  // __MINGW32__
1163
1164
1165 int OS::ActivationFrameAlignment() {
1166 #ifdef _WIN64
1167   return 16;  // Windows 64-bit ABI requires the stack to be 16-byte aligned.
1168 #elif defined(__MINGW32__)
1169   // With gcc 4.4 the tree vectorization optimizer can generate code
1170   // that requires 16 byte alignment such as movdqa on x86.
1171   return 16;
1172 #else
1173   return 8;  // Floating-point math runs faster with 8-byte alignment.
1174 #endif
1175 }
1176
1177
1178 VirtualMemory::VirtualMemory() : address_(NULL), size_(0) { }
1179
1180
1181 VirtualMemory::VirtualMemory(size_t size)
1182     : address_(ReserveRegion(size)), size_(size) { }
1183
1184
1185 VirtualMemory::VirtualMemory(size_t size, size_t alignment)
1186     : address_(NULL), size_(0) {
1187   DCHECK((alignment % OS::AllocateAlignment()) == 0);
1188   size_t request_size = RoundUp(size + alignment,
1189                                 static_cast<intptr_t>(OS::AllocateAlignment()));
1190   void* address = ReserveRegion(request_size);
1191   if (address == NULL) return;
1192   uint8_t* base = RoundUp(static_cast<uint8_t*>(address), alignment);
1193   // Try reducing the size by freeing and then reallocating a specific area.
1194   bool result = ReleaseRegion(address, request_size);
1195   USE(result);
1196   DCHECK(result);
1197   address = VirtualAlloc(base, size, MEM_RESERVE, PAGE_NOACCESS);
1198   if (address != NULL) {
1199     request_size = size;
1200     DCHECK(base == static_cast<uint8_t*>(address));
1201   } else {
1202     // Resizing failed, just go with a bigger area.
1203     address = ReserveRegion(request_size);
1204     if (address == NULL) return;
1205   }
1206   address_ = address;
1207   size_ = request_size;
1208 }
1209
1210
1211 VirtualMemory::~VirtualMemory() {
1212   if (IsReserved()) {
1213     bool result = ReleaseRegion(address(), size());
1214     DCHECK(result);
1215     USE(result);
1216   }
1217 }
1218
1219
1220 bool VirtualMemory::IsReserved() {
1221   return address_ != NULL;
1222 }
1223
1224
1225 void VirtualMemory::Reset() {
1226   address_ = NULL;
1227   size_ = 0;
1228 }
1229
1230
1231 bool VirtualMemory::Commit(void* address, size_t size, bool is_executable) {
1232   return CommitRegion(address, size, is_executable);
1233 }
1234
1235
1236 bool VirtualMemory::Uncommit(void* address, size_t size) {
1237   DCHECK(IsReserved());
1238   return UncommitRegion(address, size);
1239 }
1240
1241
1242 bool VirtualMemory::Guard(void* address) {
1243   if (NULL == VirtualAlloc(address,
1244                            OS::CommitPageSize(),
1245                            MEM_COMMIT,
1246                            PAGE_NOACCESS)) {
1247     return false;
1248   }
1249   return true;
1250 }
1251
1252
1253 void* VirtualMemory::ReserveRegion(size_t size) {
1254   return RandomizedVirtualAlloc(size, MEM_RESERVE, PAGE_NOACCESS);
1255 }
1256
1257
1258 bool VirtualMemory::CommitRegion(void* base, size_t size, bool is_executable) {
1259   int prot = is_executable ? PAGE_EXECUTE_READWRITE : PAGE_READWRITE;
1260   if (NULL == VirtualAlloc(base, size, MEM_COMMIT, prot)) {
1261     return false;
1262   }
1263   return true;
1264 }
1265
1266
1267 bool VirtualMemory::UncommitRegion(void* base, size_t size) {
1268   return VirtualFree(base, size, MEM_DECOMMIT) != 0;
1269 }
1270
1271
1272 bool VirtualMemory::ReleaseRegion(void* base, size_t size) {
1273   return VirtualFree(base, 0, MEM_RELEASE) != 0;
1274 }
1275
1276
1277 bool VirtualMemory::HasLazyCommits() {
1278   // TODO(alph): implement for the platform.
1279   return false;
1280 }
1281
1282
1283 // ----------------------------------------------------------------------------
1284 // Win32 thread support.
1285
1286 // Definition of invalid thread handle and id.
1287 static const HANDLE kNoThread = INVALID_HANDLE_VALUE;
1288
1289 // Entry point for threads. The supplied argument is a pointer to the thread
1290 // object. The entry function dispatches to the run method in the thread
1291 // object. It is important that this function has __stdcall calling
1292 // convention.
1293 static unsigned int __stdcall ThreadEntry(void* arg) {
1294   Thread* thread = reinterpret_cast<Thread*>(arg);
1295   thread->NotifyStartedAndRun();
1296   return 0;
1297 }
1298
1299
1300 class Thread::PlatformData {
1301  public:
1302   explicit PlatformData(HANDLE thread) : thread_(thread) {}
1303   HANDLE thread_;
1304   unsigned thread_id_;
1305 };
1306
1307
1308 // Initialize a Win32 thread object. The thread has an invalid thread
1309 // handle until it is started.
1310
1311 Thread::Thread(const Options& options)
1312     : stack_size_(options.stack_size()),
1313       start_semaphore_(NULL) {
1314   data_ = new PlatformData(kNoThread);
1315   set_name(options.name());
1316 }
1317
1318
1319 void Thread::set_name(const char* name) {
1320   OS::StrNCpy(name_, sizeof(name_), name, strlen(name));
1321   name_[sizeof(name_) - 1] = '\0';
1322 }
1323
1324
1325 // Close our own handle for the thread.
1326 Thread::~Thread() {
1327   if (data_->thread_ != kNoThread) CloseHandle(data_->thread_);
1328   delete data_;
1329 }
1330
1331
1332 // Create a new thread. It is important to use _beginthreadex() instead of
1333 // the Win32 function CreateThread(), because the CreateThread() does not
1334 // initialize thread specific structures in the C runtime library.
1335 void Thread::Start() {
1336   data_->thread_ = reinterpret_cast<HANDLE>(
1337       _beginthreadex(NULL,
1338                      static_cast<unsigned>(stack_size_),
1339                      ThreadEntry,
1340                      this,
1341                      0,
1342                      &data_->thread_id_));
1343 }
1344
1345
1346 // Wait for thread to terminate.
1347 void Thread::Join() {
1348   if (data_->thread_id_ != GetCurrentThreadId()) {
1349     WaitForSingleObject(data_->thread_, INFINITE);
1350   }
1351 }
1352
1353
1354 Thread::LocalStorageKey Thread::CreateThreadLocalKey() {
1355   DWORD result = TlsAlloc();
1356   DCHECK(result != TLS_OUT_OF_INDEXES);
1357   return static_cast<LocalStorageKey>(result);
1358 }
1359
1360
1361 void Thread::DeleteThreadLocalKey(LocalStorageKey key) {
1362   BOOL result = TlsFree(static_cast<DWORD>(key));
1363   USE(result);
1364   DCHECK(result);
1365 }
1366
1367
1368 void* Thread::GetThreadLocal(LocalStorageKey key) {
1369   return TlsGetValue(static_cast<DWORD>(key));
1370 }
1371
1372
1373 void Thread::SetThreadLocal(LocalStorageKey key, void* value) {
1374   BOOL result = TlsSetValue(static_cast<DWORD>(key), value);
1375   USE(result);
1376   DCHECK(result);
1377 }
1378
1379
1380
1381 void Thread::YieldCPU() {
1382   Sleep(0);
1383 }
1384
1385 } }  // namespace v8::base